下面是CONN,ASP代码:
<%@ LANGUAGE = VBScript CodePage = 936%>
<%
Option Explicit
Response.Buffer=True
Session.TimeOut=1024
Const iDataBaseType=1 '定义数据库类别,0为Access,1为SQL数据库,2=SQL Pro
Const bIsShowRunTime=1
Const BowelVersion="HY616-1-2"
Const SysVersion="HY616 System Version 1.2"
Const sCacheName="HY20070418"
Const SystemFolder="/"
Dim Conn,db,connstr
Dim StarTime,EndTime
Dim FoundErr,ErrMsg
StarTime=Timer()
FoundErr=False
ErrMsg=""
db=SystemFolder&"DataBase/DataBase.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
Function ConnectionDatabase
On Error Resume Next
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ConnStr
If Err Then
Response.Clear
CloseDataBase
Response.Write "数据库连接出错,请检查Conn.asp文件中的数据库参数设置。"
Err.Clear
Response.End
End If
End Function
Function CloseDataBase
If IsObject(EA_Temp) Then
EA_Temp.Close_Obj
Set EA_Temp=Nothing
End If
If IsObject(Rs) Then
If Rs.State=1 Then Rs.Close
Set Rs=Nothing
End If
If Conn.State=1 Then Conn.Close
Set Conn = Nothing
End Function
%>
以下是出错的提示:
HTTP 错误 500.100 - 内部服务器错误 - ASP 错误
Internet 信息服务
--------------------------------------------------------------------------------
技术信息(用于支持人员)
错误类型:
Microsoft JET Database Engine (0x80004005)
'C:\Inetpub\wwwroot\DataBase\DataBase.mdb'不是一个有效的路径。 确定路径名称拼写是否正确,以及是否连接到文件存放的服务器。
/ce/Inc/conn.asp, 第 25 行
浏览器类型:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; Maxthon; Alexa Toolbar)
网页:
GET /ce/index.asp
我这个网站是放在我电脑IIS虚拟目录"ce"的下面.
[此贴子已经被作者于2007-7-4 22:37:49编辑过]