打开网站时提示“数据库连接出错,请检查Conn.asp文件中的数据库参数设置。”请高手指教! 70
<%Response.CodePage=65001Response.Charset="utf-8"DimSqlNowString,DataPart_D,DataPart_...
<%
Response.CodePage=65001
Response.Charset="utf-8"
Dim SqlNowString,DataPart_D,DataPart_Y,DataPart_H,DataPart_S,DataPart_W,DataPart_M,CurrentPage
Dim Conn,DBPath,CollectDBPath,DataServer,DataUser,DataBaseName,DataBasePsw,ConnStr,CollcetConnStr
Const DataBaseType=1 '系统数据库类型,"1"为MS SQL2000数据库,"0"为MS ACCESS 2000数据库
Const MsxmlVersion=".3.0" '系统采用XML版本设置
Const EnableSiteManageCode = True '是否启用后台管理认证密码 是: True 否: False
Const SiteManageCode = "modengkeji" '后台管理认证密码,请修改,这样即使有人知道了您的后台用户名和密码也不能登录后台
Const IsBusiness=False
If DataBaseType=0 then
'如果是ACCESS数据库,请认真修改好下面的数据库的文件名
DBPath = "/wap/KS_Data/icar.mdb" 'ACCESS数据库的文件名,请使用相对于网站根目录的的绝对路径
Else
'如果是SQL数据库,请认真修改好以下数据库选项
DataServer = "(local)" '数据库服务器IP
DataUser = "sa" '访问数据库用户名
DataBaseName = "sa" '数据库名称
DataBasePsw = "sa" '访问数据库密码
End if
'采集数据库路径
CollectDBPath="\wap\KS_Data\Collect\KS_Collect.Mdb"
数据库类型为ms2000 展开
Response.CodePage=65001
Response.Charset="utf-8"
Dim SqlNowString,DataPart_D,DataPart_Y,DataPart_H,DataPart_S,DataPart_W,DataPart_M,CurrentPage
Dim Conn,DBPath,CollectDBPath,DataServer,DataUser,DataBaseName,DataBasePsw,ConnStr,CollcetConnStr
Const DataBaseType=1 '系统数据库类型,"1"为MS SQL2000数据库,"0"为MS ACCESS 2000数据库
Const MsxmlVersion=".3.0" '系统采用XML版本设置
Const EnableSiteManageCode = True '是否启用后台管理认证密码 是: True 否: False
Const SiteManageCode = "modengkeji" '后台管理认证密码,请修改,这样即使有人知道了您的后台用户名和密码也不能登录后台
Const IsBusiness=False
If DataBaseType=0 then
'如果是ACCESS数据库,请认真修改好下面的数据库的文件名
DBPath = "/wap/KS_Data/icar.mdb" 'ACCESS数据库的文件名,请使用相对于网站根目录的的绝对路径
Else
'如果是SQL数据库,请认真修改好以下数据库选项
DataServer = "(local)" '数据库服务器IP
DataUser = "sa" '访问数据库用户名
DataBaseName = "sa" '数据库名称
DataBasePsw = "sa" '访问数据库密码
End if
'采集数据库路径
CollectDBPath="\wap\KS_Data\Collect\KS_Collect.Mdb"
数据库类型为ms2000 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询