set rs=conn.execute("select url from web where url = '" & domain & "' or title = '" & title & "'")
if not rs.eof then
else
set rsin=conn.execute("insert into web(title,url) values('" & title & "','" & domain & "')")
rsin.close
set rsin=Nothing
end if
rs.close
set rs=Nothing
conn.close
set conn=nothing

------解决方案--------------------
一个select 一个insert into 从SQL 的角度的都是标准的语句。

关于rs和rsin的问题，我也不懂，

------解决方案--------------------

rs应该少不了吧，那只能减少rsin的使用，
改成下面试试
VBScript code

dim strSql
if not rs.eof then
else
set strSql=strSql+" insert into web(title,url) values(" & title & "," & domain & ")")
end if
set rsin=conn.execute(strSql)
rsin.close
set rsin=Nothing