笨啊,你把 on error resume next 这一行删掉或注释掉,VB就会显示出错误的具体原因了。建议你在设计阶段不要使用 on error resume next ,否则的话很多程序错误你都找不到原因的。程序设计完毕确认无误后再加上这一句。
不过你的程序很混乱啊,既有VB语句(比如App.Path),又有ASP语句(比如response.write、server.createobject),你这究竟是怎么回事?
connstr ="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\data
\xs.mdb;Mode=ReadWrite;Persist Security Info=False"
把4.0改成3.51试试