明輝手游網(wǎng)中心:是一個(gè)免費(fèi)提供流行視頻軟件教程、在線(xiàn)學(xué)習(xí)分享的學(xué)習(xí)平臺(tái)!

ASP開(kāi)發(fā)中數(shù)據(jù)庫(kù)文件調(diào)用(3)

[摘要]上述代碼中函數(shù)名稱(chēng)為:GetSQLRecordset,文件名為ADOSQLFunctions.asp。  現(xiàn)在,利用該文件就可以調(diào)用任何Access數(shù)據(jù)庫(kù)的連接,同時(shí)對(duì)表記錄進(jìn)行篩選的操作。以Friend.mdb文件為例,列出表data中所有的記錄,程序代碼如下:<HTML><BODY><!--#...
上述代碼中函數(shù)名稱(chēng)為:GetSQLRecordset,文件名為ADOSQLFunctions.asp。

  現(xiàn)在,利用該文件就可以調(diào)用任何Access數(shù)據(jù)庫(kù)的連接,同時(shí)對(duì)表記錄進(jìn)行篩選的操作。以Friend.mdb文件為例,列出表data中所有的記錄,程序代碼如下:

<HTML><BODY>
<!--#include file="adovbs.inc"-->
<!--#include file="ADOSQLFunctions.asp"-->
<%
 Dim objRS
 Set objRS=GetSQLRecordset("SELECT 編號(hào),姓名,性別from_ data","Friend.mdb","data")
 Do While Not objRS.EOF
  Response.Write "編號(hào):"&objRS("編號(hào)")&"<BR>"
  Response.Write "姓名:"&objRS("姓名")&"<BR>"
  Response.Write "性別:"&objRS("性別")&"<BR>"
 Loop

 objRS.Close
 Set objRS=Nothing
 ObjConn.Close
 Set objConn=Nothing
%>
</BODY></HTML>

  小結(jié)

  在ASP編程中,利用好函數(shù)往往可以對(duì)我們的程序代碼簡(jiǎn)單明了化,讀取條理也容易維護(hù),同時(shí)也可避免大量的重復(fù)繁雜的代碼。像上述的情況,若只是簡(jiǎn)單的與數(shù)據(jù)庫(kù)連接,則用第一種情況,將文件ADORecordset.asp 裝(include)進(jìn)來(lái)就可以了,若要對(duì)數(shù)據(jù)庫(kù)中某個(gè)表的記錄進(jìn)行篩選或其他SQL語(yǔ)句操作,則用第二種情況,將文件ADOSQLRecordset.asp裝進(jìn)來(lái)就可以了。