ADO存取數據庫如何與HTML結合
發(fā)表時間:2024-06-10 來源:明輝站整理相關軟件相關文章人氣:
[摘要]asp如何與HTML代碼配合,以顯示執(zhí)行ADO查詢數據庫資料的結果呢? 關于ASP跟SELECT、CHECKBOX、RADIO的詳細結合,請參考:使用動態(tài)數據初始化下拉菜單、使用動態(tài)數據初始化單選框、使用動態(tài)數據初始化復選框,這里只做個簡單的介紹。 ASP程序代碼部份,首先使用ado連結到Acce...
asp如何與HTML代碼配合,以顯示執(zhí)行ADO查詢數據庫資料的結果呢?
關于ASP跟SELECT、CHECKBOX、RADIO的詳細結合,請參考:使用動態(tài)數據初始化下拉菜單、使用動態(tài)數據初始化單選框、使用動態(tài)數據初始化復選框,這里只做個簡單的介紹。
ASP程序代碼部份,首先使用ado連結到Access數據庫ntopsamp.mdb,下SQL指令「Select * from 著作」查
詢表「著作」的所有資料,將查詢的結果傳回到rs2的recordset當中:
<%
Set conn1 = Server.CreateObject("ADODB.Connection")
conn1.Open "DBQ="& Server.MapPath("ntopsamp.mdb") &";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;"
Set rs2 = Server.CreateObject("ADODB.Recordset")
SqlStr = "SELECT * From 著作"
rs2.Open SqlStr,conn1,1,1
%>
接著,將查詢的結果由rs2的recordset與HTML碼相結合,顯示在瀏覽器中。
一、走馬燈文字Marquee
用戶端使用瀏覽器,瀏覽執(zhí)行rs51.asp的結果,為由右向左移動的走馬燈文字。與走馬燈文字<Marquee>的
HTML碼相結合的ASP程式碼如下:
<marquee><%= rs2("書名") %></marquee>
其中「rs2("書名")」將「著作」表「書名」字段的資料顯示為走馬燈文字。
二、文字輸入Text
與文字輸入的HTML碼Text相結合的ASP程式碼如下:
<input type=text size=20 value=<%= rs2("書名") %> >
其中由value為「rs2("書名")」將文字輸入預設為字段「書名」的資料。
三、多行文字輸入Textarea
與多行文字輸入的HTML碼< Textarea>相結合的ASP程式碼如下:
<textarea><%= rs2("書名") %></textarea>
其中「rs2("書名")」將多行文字輸入預設為字段「書名」的資料。
四、勾選Checkbox
與勾選的HTML碼Checkbox相結合的ASP程式碼如下:
<input type=checkbox <% if rs2("新書") = True then %> Checked <% end if %>>新書
其中由「if rs2("新書") = True then」檢查「著作」表中字段「新書」資料的值,若為True則勾選(Checked)。
五、圖片
與圖片的HTML碼<IMG…>相結合的ASP程式碼如下:
<img src="../rds/<%= rs2("圖片") %>">
其中「rs2("書名")」將字段「圖片」的資料顯示為圖片,「../rds/」將圖片文件路徑設定為rds/下,「../」表示為上一層的路徑。
六、超連結
與超連結的HTML碼<A HREF…>相結合的ASP程式碼如下:
<A href="../rds/<%= rs2("簡介") %>"><%= rs2("簡介") %></A>
其中「rs2("書名")」將字段「簡介」的資料顯示為超連結。
七、下拉式選單SELECT
與下拉式菜單的HTML碼<SELECT>相結合的ASP程式碼如下:
<SELECT NAME="sel1">
<% Do While not rs.EOF %>
<OPTION VALUE=<% = rs("書名") %>> <% = rs("書名") %>
<% rs.MoveNext %>
<% Loop %>
</SELECT>
其中「rs2("書名")」為字段「書名」的資料,由「Do While not rs.EOF…Loop」循環(huán)與「rs.MoveNext」
移到下一記錄,「not rs.EOF」表示未移動到尾,將「著作」表所有資料顯示到下拉式選單當中。
八、單選RADIO
與單選的HTML碼RADIO相結合的ASP程式碼如下:
<% Do While not rs.EOF %>
<input name=ra1 type=radio Value="<% = rs("書名") %>"><% = rs("書名") %> <br>
<% rs.MoveNext %>
<% Loop %>
其中「rs2("書名")」為字段「書名」的資料,由「Do While not rs.EOF…Loop」循環(huán)與「rs.MoveNext」
移到下一記錄,「not rs.EOF」表示未移動到尾,將「著作」表所有資料顯示到單選選項當中。
(出處:熱點網絡)