Question

关于ASP中 连接文件 conn.asp 的一些问题

代码如下: <% Option Explicit dim conn '数据库连接 dim connstr '连接字符串 dim dbpath '数据库文件路径 on error resume next '程序产生错误时不要停止，继续执行 dbpath = "database/company.mdb" '数据所在路径 connstr = "Provider = Microsoft.Jet.4.0;Data Source = " & Server.MapPath(dbpath) '创建数据库连接对象 Set conn = Sercer.CreateObject("ADODB.connection") if err then '如果产生错误执行以下语句 err.clear '清楚错误 else conn.Open connstr '打开conn,连接到数据库 end if '关闭数据库连接。在每页中调用此函数，将连接放入连接池 sub Closeconn() conn.Close() Set conn = Nothing end sub %> 错误提示 缺少语句 第二行 把那行删除 有提示 变量重定义 是什么意思啊 怎么解决 帮帮忙吧 高手们

Answer 1

Set conn = Sercer.CreateObject("ADODB.connection") - > Set conn = Server.CreateObject("ADODB.connection") err 是什么? 没见你声明啊 你又用了 option explicit 什么是名称重定义? 比如, Dim a, Dim a 这样就是重定义 你检查一下

Answer 2

dim db,Conn,ConnStr db="database/company.mdb" set conn=Server.CreateObject("ADODB.Connection") ConnStr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(db) conn.open ConnStr 试试