ASP下的簡(jiǎn)潔的多重查詢的方法與函數(shù) 真不錯(cuò)
更新時(shí)間：2007年10月30日 21:56:50 作者：
ASP簡(jiǎn)潔的多重查詢的解決方案
'subject 信息標(biāo)題
'company 發(fā)布信息的公司名稱
'content 發(fā)布信息的內(nèi)容
'address 公司地址
'infomation 公司簡(jiǎn)介
'note 相關(guān)說(shuō)明
以上值均由FORM提交，然后通過(guò):subject=trim(Request.Form("subject"))等得到相應(yīng)的值。
<%
'這個(gè)函數(shù)很關(guān)鍵！---------------------------
Function sql(a,b,sqls)
if b<>"" then '如果客戶端沒(méi)有提交此值，則不會(huì)產(chǎn)生相應(yīng)的SQL語(yǔ)句。
sqls=sqls & " and " & a & " like '%" & b & "%'"
end if
sql=sqls
End Function
'-----------------調(diào)用數(shù)據(jù)庫(kù)
Set con_n=Server.CreateObject("ADODB.Connection")
DBpath=Server.MapPath("/database/mydb.mdb")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};pwd=;dbq=" & DBpath
Set rs=Server.CreateObject("ADODB.Recordset")
sqls="select * from mytable where 1=1 "
'以下調(diào)用上面的函數(shù)即可,可以很多個(gè)調(diào)用（理論上是任意）
sqls=sql("subject",subject,sqls)
sqls=sql("company",company,sqls)
sqls=sql("content",content,sqls)
sqls=sql("address",address,sqls)
sqls=sql("infomation",infomation,sqls)
sqls=sql("note",note,sqls)
sqls=sqls & " order by id desc"
rs.open sqls,conn,3,2
%>
復(fù)制代碼 代碼如下:
'subject 信息標(biāo)題
'company 發(fā)布信息的公司名稱
'content 發(fā)布信息的內(nèi)容
'address 公司地址
'infomation 公司簡(jiǎn)介
'note 相關(guān)說(shuō)明
以上值均由FORM提交，然后通過(guò):subject=trim(Request.Form("subject"))等得到相應(yīng)的值。
<%
'這個(gè)函數(shù)很關(guān)鍵！---------------------------
Function sql(a,b,sqls)
if b<>"" then '如果客戶端沒(méi)有提交此值，則不會(huì)產(chǎn)生相應(yīng)的SQL語(yǔ)句。
sqls=sqls & " and " & a & " like '%" & b & "%'"
end if
sql=sqls
End Function
'-----------------調(diào)用數(shù)據(jù)庫(kù)
Set con_n=Server.CreateObject("ADODB.Connection")
DBpath=Server.MapPath("/database/mydb.mdb")
Conn.Open "driver={Microsoft Access Driver (*.mdb)};pwd=;dbq=" & DBpath
Set rs=Server.CreateObject("ADODB.Recordset")
sqls="select * from mytable where 1=1 "
'以下調(diào)用上面的函數(shù)即可,可以很多個(gè)調(diào)用（理論上是任意）
sqls=sql("subject",subject,sqls)
sqls=sql("company",company,sqls)
sqls=sql("content",content,sqls)
sqls=sql("address",address,sqls)
sqls=sql("infomation",infomation,sqls)
sqls=sql("note",note,sqls)
sqls=sqls & " order by id desc"
rs.open sqls,conn,3,2
%>
相關(guān)文章
關(guān)于Asp代碼與頁(yè)面的分離模板技術(shù)
使用模板實(shí)現(xiàn)ASP代碼與頁(yè)面分離，以后用asp就可以更方便的前后臺(tái)分開(kāi)制作2008-04-04
通過(guò)表單的做為二進(jìn)制文件上傳request.totalbytes提取出上傳的二級(jí)制數(shù)據(jù)
通過(guò)表單的做為二進(jìn)制文件上傳request.totalbytes提取出上傳的二級(jí)制數(shù)據(jù)的代碼說(shuō)明。2009-09-09
沒(méi)有完美的東西，所以有漏洞在所難免，漏洞產(chǎn)生后隨之而來(lái)的就是各種應(yīng)對(duì)的招數(shù)，比如改數(shù)據(jù)庫(kù)的后綴、修改數(shù)據(jù)庫(kù)的名字等等。很多人以為只要這么做就可以解決問(wèn)題了，但事實(shí)往往不如你我所愿，即使你這么做了也難逃被高手攻擊的命運(yùn)。2015-04-04
如何編寫(xiě)適合FireFox的對(duì)話框？...2006-08-08
asp中response.write(''中文'')或者js中文亂碼問(wèn)題
這篇文章主要介紹了asp中response.write('中文')或者js中文亂碼問(wèn)題，有時(shí)候我們需要輸出js也會(huì)出現(xiàn)亂碼，這里給出了幾個(gè)解決方法,需要的朋友可以參考下2020-03-03
LINE9的目錄瀏覽源程序...2006-08-08
ASP中SELECT下拉菜單同時(shí)獲取VALUE和TEXT值的實(shí)現(xiàn)代碼
這篇文章主要介紹了ASP中SELECT下拉菜單同時(shí)獲取VALUE和TEXT值的實(shí)現(xiàn)代碼,需要的朋友可以參考下2020-06-06
ASP轉(zhuǎn)換格林威治時(shí)間函數(shù)DateDiff()應(yīng)用
ASP提供了一個(gè)叫 DateDiff() 的函數(shù)，這個(gè)函數(shù)可以返回一個(gè)時(shí)間差的秒，那就是說(shuō)我們放進(jìn)去一個(gè)格林威治標(biāo)準(zhǔn)時(shí)間與現(xiàn)在的時(shí)間對(duì)比一下返回秒就OK2014-06-06
檢查access數(shù)據(jù)庫(kù)中是否存在某個(gè)名字的表的asp代碼
首先調(diào)用adodb.connection對(duì)象中的openSchema函數(shù)，這樣會(huì)得到一個(gè)Recordset，其中每一條“紀(jì)錄”對(duì)應(yīng)著數(shù)據(jù)庫(kù)中的一張表，“紀(jì)錄”的每個(gè)“字段”包含了對(duì)應(yīng)表的某方面信息。其中TABLE_NAME字段包含了對(duì)應(yīng)表的名稱2009-06-06
這篇文章主要是分享一個(gè)asp中for循環(huán)的一個(gè)小技巧，平時(shí)真沒(méi)注意呢，希望懂a(chǎn)sp的朋友可以參考下2013-06-06