ASP開發中數據庫文件調用(3)

　　上述代碼中函數名稱為：GetSQLRecordset，文件名為ADOSQLFunctions.asp。

　　現在，利用該文件就可以調用任何Aclearcase/" target="_blank" >ccess數據庫的連接，同時對表記錄進行篩選的操作。以Friend.mdb文件為例，列出表data中所有的記錄，程序代碼如下：

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

　objRS.Close
　Set objRS=Nothing
　ObjConn.Close
　Set objConn=Nothing
%＞
＜/BODY＞＜/HTML＞

　　小結

　　在ASP編程中，利用好函數往往可以對我們的程序代碼簡單明了化，讀取條理也容易維護，同時也可避免大量的重復繁雜的代碼。像上述的情況，若只是簡單的與數據庫連接，則用第一種情況，將文件ADORecordset.asp 裝（include）進來就可以了，若要對數據庫中某個表的記錄進行篩選或其他SQL語句操作，則用第二種情況，將文件ADOSQLRecordset.asp裝進來就可以了。

原文轉自：http://www.kjueaiud.com