%
Response.write "关键字:("&trim(request("Q"))&")"&"hr"
x=Replace(trim(request("Q"))," ",",")
'x=array(x)
t=split(x,",")
SQL="Select * From TB where kis0"
for i=0 to UBound(t)
if t(i)"" then
Response.write "第"&i+1&":"&t(i)&"hr"
SQL=SQL&" or title like '"&t(i)&"'" '这个是关键
end if
next
Response.write SQL
%
Form action=""
table
tr
tdInput Name="Q" onkeyup="this.value=this.value.replace(/s+/g,' ')"input type="submit" value="查
询"/td
/tr
/table
/form