我一般做网站用的是绝对路径可是我用虚拟路径看网站的时候报了这个错
可是我的代码没错我应当怎么改呢,请各位高手帮个忙。
这是路据库的链接:
Sub DBConnBegin()
' 如果数据库对象已打开,不要再打开
If IsObject(oConn) = True Then Exit Sub
' 你可以不需要打开数据库连接对象而直接打开记录集对象,但如果你需要打开多个记录集对象的话,效率是很低的。
' 如果你不创建一个数据库连接对象,ADO会在每个记录集打开时自动创建一个新的数据库连接对象,就算你用的是相同的SQL语句。
Set oConn = Server.CreateObject("ADODB.Connection")
On Error Resume Next
' Access数据库 数据库中已经增加了防止下载的机智!
DateBase = RootUrl&"/Data/数据库名字.mdb"
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath(DateBase)
If Err.Number > 0 Then
' 显示错误信息,并且发送邮件通知管理员
'Call DBConnError(Err)
' 完全地退出正在运行的脚本
Response.End
End If
' 创建一个记录集
Set oRs = Server.CreateObject( "ADODB.Recordset" )
End Sub
就是这里报错
////
sql="select * from webinfo"
oRs.open sql,oConn,1,1
\\\\\\
[此贴子已经被作者于2007-6-25 11:14:04编辑过]