ASP菜鸟问题

fifafan2000 2003-08-13 05:39:36
小弟在做一个程序时,需要用到asp做几个网页以方便试验。
但是却遇到意想不到的问题。
按照名字查询某个人的信息时,第一次成功显示,如果立即回退到前页,重新查询,则会报错:
Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp,行242
Provider 错误 '80004005'
未指定的错误
/patientquery/namequery.asp,行3

如果等待一会儿再查询,则正常。不知什么原因?(为了简单,我用的access数据库,ODBC连接,数据源名称设定为MIDPDB)
asp文件的全文如下,各位大虾帮忙。

<%
Set patientDB = Server.CreateObject("ADODB.Connection")
patientDB.Open "MIDPDB"
querySQL = "SELECT * FROM patients where name='" & request("txtName") & "'"
set records = Server.CreateObject("ADODB.Recordset")
records.Open querySQL,patientDB

if records.EOF then
Response.Write "Not found"
else
Response.Write "ID:"
Response.Write records("ID")
Response.Write "\n"
Response.Write "Name:"
Response.Write records("name")
Response.Write "\n"
Response.Write "Age:"
Response.Write records("age")
Response.Write "\n"
Response.Write "Disease:"
Response.Write records("disease")
Response.Write "\n"
Response.Write "Address:"
Response.Write records("address")
end if
records.Close
set records = nothing
patientDB.Close
set patientDB = nothing
%>
...全文
48 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
fifafan2000 2003-08-14
  • 打赏
  • 举报
回复
多谢各位,问题已经解决了。
将patientDB.Open "MIDPDB"这句改成:
patientDB.Open "driver={Driver do Microsoft Access (*.mdb)};dbq=" & Server.MapPath("MIDP.mdb")
就好了(其中,MIDP.mdb是Access数据库文件名)。原因我也不知道。
fifafan2000 2003-08-14
  • 打赏
  • 举报
回复
我的IIS版本是5.0
fifafan2000 2003-08-14
  • 打赏
  • 举报
回复
to:jiejifeng(zj)
我试过了,还是不行

to:xuya(图梦)
什么版本可以?
xuya 2003-08-13
  • 打赏
  • 举报
回复

Microsoft VBScript 编译器错误 错误 '800a03f6'
缺少 'End'
/iisHelp/common/500-100.asp,行242
Provider 错误 '80004005'

是系统固有的,建议升级iis,代码应该没问题
fengchu2 2003-08-13
  • 打赏
  • 举报
回复
可能你的电脑有问题!
jiejifeng 2003-08-13
  • 打赏
  • 举报
回复
records.Open querySQL,patientDB
这句改成
records.Open querySQL,patientDB,3,1
试试

28,408

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧