缝纫机油哪个牌子好:[Microsoft][ODBC Microsoft Access Driver] 语法错误 (操作符丢失) 在查询表达式 'leavewordid=' 中

来源:百度文库 编辑:高考问答 时间:2024/05/08 01:45:23
<%
Set con=Server.CreateObject("ADODB.Connection")
con.Open "DSN=MessageBoardDSN;UID=admin;Database=MessageBoard "
Set rs=Server.CreateObject("ADODB.Recordset")
msgErr=""

issue=trim(Request.QueryString("issue")+"")
if len(issue)>=1 then '回复留言
IssueUser=trim(Request("IssueUser")+"")
Issuedate=trim(Request("Issuedate")+"")
Laveword=trim(Request("Laveword")+"")
checked=true '用于判断所有信息是否合法,如合法则保存数据
if len(Issuedate)<1 then
checked=false
msgErr="回复日期必须输入!"
end if
if len(IssueUser)<1 then
checked=false
msgErr=msgErr+"回复人必须输入!"
end if
if checked then
strsql="insert into xt_t_restore (leavewordid,restore_date,name,restore)"
strsql=strsql+" values("+leavewordid+",#"+Issuedate+"#"
strsql=strsql+",'"+IssueUser+"','"+Laveword+"')"

con.Execute strsql
msgErr="回复留言成功!"
end if
end if

ispage=trim(Request.QueryString("ispage")+"")
prevpage=trim(Request("Nowpage")+"")'取保存的翻页前显示的页数
if len(prevpage)<1 then prevpage="1"
previous=prevpage*1 '翻页前显示的页数
pagenum=10 '每页显示的回复留言条数
allnums=0 '总回复留言条数
allpages=1 '回复留言总页数
nowpage=1 '当前显示的页数
stnums=1 '开始显示的回复留言数

strsql="select count(*) as allnums from xt_t_restore "
strsql=strsql+" where leavewordid=" +leavewordid
rs.Open strsql,con
if not rs.EOF then
allnums=rs("allnums")*1
allpages=allnums/pagenum +1
end if

if ispage="0" then nowpage=1 '显示首页
if ispage="1" then
nowpage=previous-1 '显示前一页
end if
if ispage="2" then nowpage=previous+1 '显示

leavewordid 这个变量在哪
是Laveword=trim(Request("Laveword")+"")吧
还有如果是字符型的应该写
strsql=strsql+" where leavewordid='" +leaveword+"'"
如果是数字类型的就你那么写就可以了

没有告诉你说是哪一行错了?????