全部

操作符丢失错误

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
求高手赐教

...全文

44 点赞收藏 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

回复赞

一把编程的菜刀 2008-04-12

不完整，请检查你各个变量传值问题

回复赞

cqnuzjj 2008-04-12

回复赞

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") & "')"

回复赞