要實(shí)現(xiàn)這個(gè)功能的話一般都是如下，現(xiàn)在比如數(shù)據(jù)庫(kù)為當(dāng)前目錄下的123mdb，其中的表名為person的字段是name，sex，age這幾個(gè)頁(yè)面一onehtml在body里面加入一下代碼 精確查詢(xún) 模糊查詢(xún)；Set Rs = serverCreateObjectquotADODBRecordsetquotRsopen quotSELECT * FROM 表名 ORDER BY 排序的字段名 ASCquot， conn， 1， 1 #39Desc倒序Asc正序 If Not RsEOF Then For i = 1 To RsRecordCount Response；加代碼控制，用if判斷后再組合sql語(yǔ)句，1=1 是為了接and條件，可以修改成一個(gè)必填項(xiàng) #39建立連接 conn=#39指定查詢(xún)條件 sql=quotselect * from 表 where 1=1quotif 地址ltquotquot then sql = sql quotand 地址=#39上海#39quotend。

1要查詢(xún)的數(shù)據(jù)庫(kù)名稱(chēng)datamdb 數(shù)據(jù)庫(kù)中表為data 數(shù)據(jù)庫(kù)表data的字段有titleabout 由于無(wú)數(shù)據(jù)添加頁(yè)面，所以在數(shù)據(jù)庫(kù)各字段中應(yīng)添加數(shù)據(jù)，方便查詢(xún)演示2數(shù)據(jù)庫(kù)打開(kāi)文件connasplt ServerscriptTimeout=quot10quot；1key=requestquerystringquotkeyquot或者直接key=requestquotkeyquot2kind requestquerystringquottypequot kind=requestquottypequot3rsopen sql，conn，1，1 4如果想出的錯(cuò)誤最少的話，建議把你網(wǎng)站下所有目錄和文件全部用。

驅(qū)動(dòng)設(shè)置好后set rs=ServerCreateObjectquotadodbconnectionquotset rs=CreateObjectquotADODBRecordSetquot#39具體怎么連接自己查一下資料 具體怎么設(shè)置很容易了解的下面是添加，刪除，查詢(xún)的代碼段 sql=quotselect * from 表名；以下代碼能同時(shí)篩選區(qū)域大類(lèi)小類(lèi)商品商家單選框關(guān)鍵字 一，首先利用Access 2003建立一個(gè)名為listmdb的數(shù)據(jù)庫(kù)，在里面建立一個(gè)名為list的表，然后在list表里面輸入一些你想要被查詢(xún)的文件名字，關(guān)鍵的；strSQL = strSQL IIFEasp_isNstrUserID，quotquot，quot AND UserID LIKE #39%quotstrUserIDquot%#39quotstrSQL = strSQL IIFEasp_isNstrUserName，quotquot，quot AND UserName LIKE #39%quotstrUserNamequot%#39quotstrSQL = strSQL；簡(jiǎn)單的搜索其實(shí)就是在sql里用like語(yǔ)句實(shí)現(xiàn) 例如select * from news where title like#39%問(wèn)問(wèn)%#39 這句的意思是，從news 表中查詢(xún) title字段中含有 “問(wèn)問(wèn)” 兩個(gè)字的所有記錄 %是模糊匹配，左%表示匹配 quot問(wèn)問(wèn)quot 左邊的。

1建立oledb #39連接OLEDB Dim conn ，dataSource ，connStr set conn = serverCreateObjectquotadodbconnectionquotdataSource = serverMapPathquotdatadatamdbquotconnStr = quotProvider=Data Source=；整合條件語(yǔ)句要看你的條件關(guān)系了 如果你是想兩個(gè)結(jié)果的合集，就用or，sql=quotselect from link where link_id=quottrimrequestquotlink_idquotquotand webName=#39quottrimrequestquotwebNamequotquot#39quot如果是想要兩個(gè)結(jié)果的交集；OpenTextfileservermapPathfilename，2，trueopenFilewritelinesTextSet OpenFile=nothing responsewritequot搞定 生成成功quot 將上面一段保存成xmlasp filename=quotksxmlquot 這個(gè)文件名要根據(jù)xmlasp來(lái)改變；建立access的數(shù)據(jù)庫(kù)news，還有表news，表的字段id，title，id唯一，輸入數(shù)據(jù)保存，用下面代碼可查詢(xún)，可分頁(yè) 下面保存為searchasp 文件 lt！DOCTYPE HTML PUBLIC quotW3CDTD HTML 40 TransitionalENquot；頁(yè)面ljhgzbiaoasp 輸入關(guān)鍵詞 查詢(xún)結(jié)果頁(yè)面ljhgzresultasp lt！#include file=quotconnaspquot lt Dim skey skey=RequestFormquotkeyquotDim rs，sql set rs=ServerCreateObjectquotADODBRecordSetquotsql=quot。

ltTitleASP加access編寫(xiě)的查詢(xún)代碼ltTitle ltHead ltBody 編號(hào) 手機(jī)號(hào) #160 lt% Dim rs set rs=serverCreateObjectquotadodbrecordsetquotsql=quotselect * from userquotrsopen sql，conn，1。