求ASP网站新闻搜索代码
答案:2 悬赏:30 手机版
解决时间 2021-11-15 00:27
- 提问者网友:浪荡绅士
- 2021-11-14 09:00
求ASP网站新闻搜索代码
最佳答案
- 五星知识达人网友:雾月
- 2021-11-14 10:28
CompanyName = Request.Form("CompanyName") set rs=server.createobject("adodb.recordset") sql = "Select * From zy_Company where (Company_Name Like '%"& CompanyName &"%' or Company_Address Like '%"& CompanyName &"%' )" rs.open sql,conn,1,3 if rs.eof and rs.bof thenresponse.write "没有找到相关信息!!"elseDo while not rs.eof then//你要显示的字段!!rs.MoveNextloop
全部回答
- 1楼网友:孤老序
- 2021-11-14 12:01
title =checkstr(request("title "))
content =checkstr(request("content "))
sql_1=""
if title <>"" then
if content <>"" then
sql_1 = sql_1 & " and title ="&title &" "
else
sql_1 = sql_1 & " and title ="&title &" "
end if
end if
if content <>"" then
sql_1 = sql_1 & " and content like '%"& content &"%'"
end if
sql = "SELECt * FROM Conews WHERe 1=1 "&sql_1&""
rs.open sql,conn,1,1
主要的已经出来了 其他的你也没写清楚
content =checkstr(request("content "))
sql_1=""
if title <>"" then
if content <>"" then
sql_1 = sql_1 & " and title ="&title &" "
else
sql_1 = sql_1 & " and title ="&title &" "
end if
end if
if content <>"" then
sql_1 = sql_1 & " and content like '%"& content &"%'"
end if
sql = "SELECt * FROM Conews WHERe 1=1 "&sql_1&""
rs.open sql,conn,1,1
主要的已经出来了 其他的你也没写清楚
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯