ASP连接SQL Server 2005连接数据库
StrConn="Driver={SQLServer};Description=sqldemo;SERVER=127.0.0.1;UID=sa;Password=1;DA...
StrConn = "Driver={SQL Server};Description=sqldemo;SERVER=127.0.0.1;UID=sa;Password=1;DATABASE=127dbsql1"
'StrConn ="driver={SQL Server};server=127.0.0.1;uid=sa;Password=1;DATABASE=127dbsql1"
set Conn = server.createobject("adodb.connection")
set Conn1 = server.createobject("adodb.connection")
Conn.open Strconn
Conn1.open Strconn
ASP连接SQL Server 2005 为什么总连接不上数据库?请高手们解决一下,谢谢 展开
'StrConn ="driver={SQL Server};server=127.0.0.1;uid=sa;Password=1;DATABASE=127dbsql1"
set Conn = server.createobject("adodb.connection")
set Conn1 = server.createobject("adodb.connection")
Conn.open Strconn
Conn1.open Strconn
ASP连接SQL Server 2005 为什么总连接不上数据库?请高手们解决一下,谢谢 展开
4个回答
展开全部
用这个吧
<%
Response.Buffer = True
'On Error Resume Next
Dim Conn,Connstr
Dim Sqldatabase,Sql_pass_word,Sql_User_ID,Sql_Data_Source
Sqldatabase="tidcjob1Data" '填写数据库的名称
Sql_pass_word="sa" '数据库的密码
Sql_User_ID="sa" '数据库的用户名
Sql_Data_Source="(local)" '数据库的地址
Set Conn = Server.CreateObject("ADODB.Connection")
ConnStr = "Provider=SQLOLEDB.1;Password='"&Sql_pass_word&"';Persist Security Info=False;User ID='"&Sql_User_ID&"';Initial Catalog='"&Sqldatabase&"';Data Source='"&Sql_Data_Source&"'"
Conn.Open Connstr
Function CloseDB
Conn.close
Set conn = Nothing
End Function
Function CloseRs
Rs.Close
Set Rs = Nothing
End Function
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "数据库连接出错,请检查连接字串。"
Response.End
End If
%>
<%
Response.Buffer = True
'On Error Resume Next
Dim Conn,Connstr
Dim Sqldatabase,Sql_pass_word,Sql_User_ID,Sql_Data_Source
Sqldatabase="tidcjob1Data" '填写数据库的名称
Sql_pass_word="sa" '数据库的密码
Sql_User_ID="sa" '数据库的用户名
Sql_Data_Source="(local)" '数据库的地址
Set Conn = Server.CreateObject("ADODB.Connection")
ConnStr = "Provider=SQLOLEDB.1;Password='"&Sql_pass_word&"';Persist Security Info=False;User ID='"&Sql_User_ID&"';Initial Catalog='"&Sqldatabase&"';Data Source='"&Sql_Data_Source&"'"
Conn.Open Connstr
Function CloseDB
Conn.close
Set conn = Nothing
End Function
Function CloseRs
Rs.Close
Set Rs = Nothing
End Function
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "数据库连接出错,请检查连接字串。"
Response.End
End If
%>
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
今至电子科技有限公司
2024-08-23 广告
2024-08-23 广告
数据库备份是确保数据安全与业务连续性的关键环节。我们上海今至电子科技有限公司高度重视数据保护,定期执行全面的数据库备份策略。这包括使用先进工具和技术,对关键业务数据进行自动化备份,并存储在安全可靠的外部存储介质或云端。通过定期验证备份的完整...
点击进入详情页
本回答由今至电子科技有限公司提供
展开全部
问题出在这句话上,SERVER=127.0.0.1,不能这么写的,这里要填写你的本机sql实例的名字 ,如果是远程服务器才填写IP,但是很明显你这是本机实例
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
你要看提示什么信息,是不是服务器ip不能那么用呀。。。。
追问
我在桌面建了个udl文件,测试了数据库连接是成功的,可是不知道为什么运行asp文件就进不去。一直提示“正在载入。”
追答
那你在别人的电脑上,连接下看看可行,是不是什么服务没启动还是什么原因。。。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询
广告 您可能关注的内容 |