推薦：怎樣使ASP分頁(yè)顯示Recordset數(shù)據(jù)
1．建立Recordset對(duì)象 以下為引用的內(nèi)容： Dim objMyRst Set objMyRst=Server.CreateObject(“ADODB.Recordse

在web開(kāi)發(fā)中經(jīng)常遇到多關(guān)鍵詞對(duì)對(duì)單個(gè)字段查詢(xún)，我一般是通過(guò)動(dòng)態(tài)數(shù)組來(lái)實(shí)現(xiàn)的。當(dāng)然多個(gè)關(guān)鍵詞的一般是用空格或,隔開(kāi)，我這幾假設(shè)多個(gè)關(guān)鍵詞用空格隔開(kāi),關(guān)鍵字字符串為keyStr，具體代碼為。

程序代碼如下：

以下為引用的內(nèi)容：
'關(guān)鍵字的搜索
str="select * from tableName where id>4"
if srhKey<>"" then
keyArr=split(srhKey," ")
j=UBound(keyArr)
t=0
dim keystrArr()
for i=0 to j
if keyArr(i)<>"" then
redim preserve keystrArr(t)
strfilter="(empZw like '%"&keyArr(i)&"%' or empDep like '%"&keyArr(i)&"%' or empGz like '%"
strfilter=strfilter&keyArr(i)&"%' or empWy1 like '%"&keyArr(i)&"%' or empWy2 like '%"&keyArr(i)
strfilter=strfilter&"%' or empYq like '%"&keyArr(i)&"%' or com_name like '%"&keyArr(i)&"%')"
keystrArr(t)=strfilter
t=t 1
end if
next
keystr=join(keystrArr," and ")
str=str&" and "&keystr
end if

分享：解析ASP實(shí)例:幻燈片新聞代碼
以下為引用的內(nèi)容： !--這是一個(gè)主頁(yè)文件--> html> head> meta http-equiv=Content-Type content=