网站本地测试没问题,上传到服务器就登陆不了后台了,提示 数据库连接错误,请检查连接字符串

<%'OptionExplicitresponse.buffer=true'开启缓冲页面功能Server.ScriptTimeout=100ConstSystemPath... <%
'Option Explicit
response.buffer=true '开启缓冲页面功能
Server.ScriptTimeout = 100
Const SystemPath="" '系统目录
Const ErrBackPath="/index.asp" '出错返回
Const MaxCharPage=3000
Const Edition = "全功能版"
Const Ke_System="明科EIS V5.1"
Const CreateHtml=0 ' 添加文章时是否同时生成HTML文章
Const Folder="/Article"
Const DelMode=1 '删除模式 1 表式删除文章时同时删除相关的图片,0 表示只删除文章
Const IsSqlDataBase=0 '数据数
'定义运行模式,测试的时候设置1,正常运行的时候设置为0,不输出错误信息有利于安全,
Const IsDeBug = 1
Dim Startime,Endtime,runtime
Startime=Timer()

Dim NewsTable,ArticleTable,SoftTable,PhotoTable,SMTP,pop3,DataPathbbs
Dim AdminPath,AdminTable,UserTable,MessageTable,BoardID,MyDbPath,F_Ext,Connbbs,Connstrbbs

'-------------用户自定义部分[开始]----------------------
'免费用户第一次使用请修改本处数据库地址并相应修改data目录中数据库名称,如将Kews2_free.mdb修改为Kews2_free.asp
'--------------------------------------------

'修改网站数据库的名称后,请修改以下内容
DataPath = SystemPath&"/data/#data.mdb" '数据库实际名称及路径
DataPathbbs =SystemPath&"/bbs/Data/Dvbbs7.mdb" '数据库实际名称及路径
MyDbPath=SystemPath&"/data/IP.mdb"
'后台管理路径
AdminPath =SystemPath& "admin" '只写目录名
'邮件服务顺器
SMTP="mail.mksun.com"
PoP3="mial.mksun.com"
'网站用户表表名
UserTable = "Ke_User"

NewsTable = "Ke_News"
ArticleTable = "Ke_Article"
SoftTable = "Ke_Soft"
PhotoTable = "Ke_Photo"
MessageTable = "Ke_Message"

'-------------用户自定义部分[结束]----------------------

Dim DataPath,Conn,Connstr,ArrshowLine(10)
Dim Ke,Re,Template,SqlNowString,MyUserOnline,Restr,Ka
Dim Title,ErrMsg,info
Set Re = New RegExp
Set Ke = New Cls_Ke
Set Ka=New ArticleClass
Set re = New RegExp
If IsSqlDataBase = 1 Then
SqlNowString = "GetDate()"
Else
SqlNowString = "Now()"
End If

'网站数据库连接
Sub Connect()
Set conn=server.createobject("ADODB.connection")

If IsSqlDataBase = 1 Then
Connstr="PROVIDER=SQLOLEDB;DATA SOURCE=127.0.0.1;UID=sa;PWD=123456;DATABASE=cncmr"
Else
Connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(DataPath)
End IF
On Error Resume Next
Set Conn = server.CreateObject("ADODB.Connection")
Conn.open Connstr

if Err Then
Err.Clear
Set Conn=nothing
Response.Write "用户数据库连接出错,请检查连接字串。"
Response.End
End if
End Sub
%>
这是conn.asp 高手帮忙看下
展开
 我来答
门店创业运营内参
2010-11-14 · TA获得超过316个赞
知道小有建树答主
回答量:710
采纳率:100%
帮助的人:267万
展开全部
SOURCE=127.0.0.1;
UID=sa;
PWD=123456;
DATABASE=cncmr"

服务器的数据库配置和你本地测试的时候一样吗?
合力亿捷
2023-07-25 广告
要快速搭建在线客服系统,可以考虑以下步骤:1. 确定需求:首先需要确定自己的需求和目标,例如需要什么类型的客服、需要支持多少用户、需要什么样的沟通工具等等。2. 选择合适的平台:选择一个合适的在线客服系统平台,可以选择公有云或私有云部署方式... 点击进入详情页
本回答由合力亿捷提供
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式