操作符丢失 错误

cqnuzjj 2008-04-11 11:44:41
<%
set con=server.createobject("adodb.connection")
constr="provider=microsoft.jet.oledb.4.0;data source="&server.mappath("rss.mdb")
con.open constr
sql1="select * from feed "
set rs=server.createobject("adodb.recordset")
rs.open sql1,con,1,3
do while not rs.EOF
dim xmldoc,http
set http=server.createobject("microsoft.xmlhttp")
http.open "get",""&rs("f_url")&"",false
http.send
set xmldoc=server.createobject("microsoft.xmldom")
xmldoc.async=false
xmldoc.validateonparse=false
xmldoc.load(http.responsexml)
set items=xmldoc.getelementsbytagname("item")
for i=0 to items.length-1
title=items(i).selectSingleNode("title").text
link=items(i).selectSingleNode("link").text
i_description=items(i).selectSingleNode("description").text
sql2="select * from item where title='"&title&"'"
set rs2=con.execute(sql2)
if rs2.eof then
con.execute("insert into item values('"&title&"','"&link&"','"&i_description&"','"&rs("f_sort")&"')")
end if
next
rs.movenext
loop
con.close
set con=nothing
%>
以上代码实现的功能是:根据URL下载远程XML文件,解析后取得更新的信息并添加到数据库中.
程序报错如下:
Microsoft JET Database Engine '80040e14'

语法错误 (操作符丢失) 在查询表达式 ''

\feed.asp, line 26
求高手赐教
...全文
46 8 点赞 打赏 收藏 举报
写回复
8 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
小逗狗 2008-04-12
如果你表中还有别的字段,一定要用1楼的方法!
  • 打赏
  • 举报
回复
mysite365 2008-04-12
con.execute "insert into item (title, link, description, sort) values('" & title & "','" & link & "','" & i_description & "','" & rs

如果添加的字符不是全部列的话,要用item(列名1,列名2,...),如果是是全部列,你的用法应该是正确的。。。
  • 打赏
  • 举报
回复
Anlige 2008-04-12
[Quote=引用 1 楼 dogfish 的回复:]
少了那些字段要insert。

VBScript code
con.execute "insert into item (title, link, description, sort) values('" & title & "','" & link & "','" & i_description & "','" & rs("f_sort") & "')"
[/Quote]
  • 打赏
  • 举报
回复
Anlige 2008-04-12
if rs2.eof then
con.execute("insert into item values('"&title&"','"&link&"','"&i_description&"','"&rs("f_sort")&"')")
end if

if rs2.eof then
con.execute("insert into item values('"&title&"','"&link&"','"&i_description&"','"&rs("f_sort")&"'")
end if
  • 打赏
  • 举报
回复
不完整,请检查你各个变量传值问题
  • 打赏
  • 举报
回复
cqnuzjj 2008-04-12
[Quote=引用 1 楼 dogfish 的回复:]
少了那些字段要insert。

VBScript code
con.execute "insert into item (title, link, description, sort) values('" & title & "','" & link & "','" & i_description & "','" & rs("f_sort") & "')"
[/Quote]
没有少字段
程序虽然会报错
但是目的达到了
数据库里有数据
但这样总不完整
  • 打赏
  • 举报
回复
cqnuzjj 2008-04-12
[Quote=引用 3 楼 Anlige 的回复:]
if rs2.eof then
con.execute("insert into item values('"&title&"','"&link&"','"&i_description&"','"&rs("f_sort")&"')")
end if

if rs2.eof then
con.execute("insert into item values('"&title&"','"&link&"','"&i_description&"','"&rs("f_sort")&"'")
end if
[/Quote]
你这个不正确
直接报错
INSERT INTO 错误
  • 打赏
  • 举报
回复
Dogfish 2008-04-11
少了那些字段要insert。

con.execute "insert into item (title, link, description, sort) values('" & title & "','" & link & "','" & i_description & "','" & rs("f_sort") & "')"
  • 打赏
  • 举报
回复
相关推荐
发帖
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
帖子事件
创建了帖子
2008-04-11 11:44
社区公告
暂无公告