access转SQL 提示ADODB.Recordset 错误 '800a0bb9'

来源：百度知道 编辑：UC知道 时间：2024/05/28 10:03:24
<%
dim webname,webemail,dizhi,youbian,dianhua,copyright,webbanner,weblogo,weburl,gonggao
set rs=server.CreateObject("adodb.recordset")
rs.Open "select from wq_config webname,webemail,dizhi,youbian,dianhua,icp,copyright,musicurl,gonggao,weblogo,weburl,alipayid,alipaymd5,alipaytype,webbanner,xinpin,remai,reping,qqzt,payid ",conn,1,1
webname=rtrim(rs("webname"))
webemail=rtrim(rs("webemail"))
dizhi=rtrim(rs("dizhi"))
youbian=rtrim(rs("youbian"))
dianhua=rtrim(rs("dianhua"))
icp=rtrim(rs("icp"))
copyright=rtrim(rs("copyright"))
weblogo=rtrim(rs("weblogo"))
webbanner=rtrim(rs("webbanner"))
weburl=rtrim(rs("weburl"))
shopurl=rtrim(rs("musicurl"))
gonggao=rtrim(rs("gonggao"))
alipayid=rtrim(rs("alipayid"))
alipaymd5=rtrim(rs("alipaymd5"))
ali

试试这个:
开始。。。运行。。。regsvr32 jscript.dll (命令功能： 修复Java动态链接库)
开始。。。运行。。。regsvr32 vbscript.dll(命令功能：修复VB动态链接库)
开始。。。运行。。。iisreset (命令功能：重启IIS)
最后一句:if err.number<>0 then err.clear
end function
%>
改为if err.number<>0 then err.clear end if
end function
%>

你确认？？
这一行，通常不可能出错的。除非是你的ado驱动有问题。