高校问答郑州户籍转入政策:那位高手 帮我看看这段代码
来源：百度文库 编辑：高校问答 时间：2024/04/29 12:04:48
<% dim lj
lj="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("list.mdb")
set rs=server.createobject("ADODB.Recordset")
rs.open "SELECT*FORM list WHERE title and word like &request.form("word")&'%'"rs,adOpenStatie%>
<html>
<head><title>查询结果</title></head>
<body >
<cpalign="center"><br>
统计查询共有<% Response.rite(Resurrected) %>条纪录</cp><br>
<div align="center"></div><center></center>
<table border="1" align="center" border color="000000" eradicator="#000000" borecole="#ff">
<tar align="center">
<td width="20%" align="center" bicolor="#ff">ID</td>
<td width="60%" align="center" bicolor="#ff">主题</td>
<td width="20%" align="center" bicolor="#ff">查看</td></table>
<table border="1" align="center" border color="000000" eradicator="#000000" borecole="#ff">
<tar align="center">
<!--从数据库提取信息-->
<% while not rs.eof %>
<tar align="center">
<td width="20%" align="center" bicolor="#ff"></td><% =rs("id") %></td>
<td width="60%" align="center" bicolor="#ff"></td><% =rs("title") %></td>
<td width="20%" align="center" bicolor="#ff"></td>
<a> ref="<% =rs("url") %>"GO</a>
</td>
<% rs.movenext %>
</tar>
<% wend %>
</table>
</center>
</div>
<% rs.close %>
<% set bb=nothing%>
</body>
</html>
问题好像出在 这里 ,我是新手 不是很明白 拜托帮帮忙 谢谢了啊
<% dim lj
lj="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("list.mdb")
set rs=server.createobject("ADODB.Recordset")
rs.open "SELECT*FORM list WHERE title and word like &request.form("word")&'%'"rs,adOpenStatie%>
他又显示 操作符丢失 这又是怎么一回事啊
谁能帮帮我啊
Microsoft JET Database Engine (0x80040E14)
语法错误 (操作符丢失) 在查询表达式 '*FORM list WHERE title and word like'%%'' 中。
/search.asp.asp, 第 7 行
dim lj
lj="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("list.mdb")
set conn=server.createobject("adodb.connection")
conn.open lj
set rs=server.createobject("ADODB.Recordset")
rs.open "SELECT*FORM list WHERE title and word like '%" & request.form("word") & "%'",conn,1,1%>
统计查询共有<% Response.rite(Resurrected) %>条纪录</cp><br>
统计查询共有<% Response.write(Resurrected) %>条纪录</cp><br>
rs.open "SELECT * FORM list WHERE title and word like '"&request.form("word")&"%'",1,1
原：
rs.open "SELECT*FORM list WHERE title and word like &request.form("word")&'%'"rs,adOpenStatie
新：
Dim strSQL
strSQL="Select * From List Where [title] And [word] Like '"&Request.Form("word")&"%'"
Rs.Open strSQL,lj,adOpenStatie
rs.open "SELECT*FORM list WHERE title and word like &request.form("word")&'%'"rs,adOpenStatie
改为
rs.open "SELECT * FORM list WHERE title and word like "&request.form("word")&"%" lj,adOpenStatie
注意空格和变量、字符串的写法。