加入收藏 | 设为首页 | 会员中心 | 我要投稿 聊城站长网 (https://www.0635zz.com/)- 智能语音交互、行业智能、AI应用、云计算、5G!
当前位置: 首页 > 站长学院 > Asp教程 > 正文

ASP连接SQL2005数据库连接代码推荐

发布时间:2023-06-06 13:28:32 所属栏目:Asp教程 来源:
导读:说明:

a、以下字符中数据库名forum,数据库服务器名WWW-2443D34E558/SQL2005(或者127.0.0.1)

b、查看sql数据库服务器名称:对象资源管理器->数据库->右键点击自己建的数据库->属性->权限

c、Provider
说明:
 
a、以下字符中数据库名forum,数据库服务器名WWW-2443D34E558/SQL2005(或者127.0.0.1)
 
b、查看sql数据库服务器名称:对象资源管理器->数据库->右键点击自己建的数据库->属性->权限
 
c、Provider=sqlncli也可以,UID与“=”之间不可以有空格,如果换用user id就可以有
 
空格,Initial Catalog可以换用database,pwd可以换用password,data source可以换用server,
 
在VBScript中,不区分大小写,因此UID等同uid等同Uid。。。,其中provider、uid、pwd、
 
Initial Catalog、data source等位置可以自由放
 
(1)、windows身份验证连接SQL2005字符串,使用Integrated Security=SSPI方法
 
复制代码代码如下:
 
'以下为建立connection对象连接数据库
 
Dim conn
 
Set conn=Server.CreateObject("ADODB.Connection")
 
sql="Provider=SQLoledb;data source=WWW-2443D34E558/SQL2005;UID=;PWD=;Initial Catalog=forum;Integrated Security=SSPI"
 
conn.Open sql
 
'以下为判断是否连接
 
If conn.state=2 Then
 
Response.Write("正在连接")
 
ElseIf conn.state=1 Then
 
Response.Write("连接已经打开")
 
Else
 
Response.Write("对不起,无法打开连接")
 
End If
 
(2)、SQL SERVER用户名身份验证连接方法,此例中SQL用户名为sa ,密码********
 
复制代码代码如下:
 
'以下为建立connection对象连接数据库
 
Dim conn
 
Set conn=Server.CreateObject("ADODB.Connection")
 
sql="Provider=SQLoledb;data source=WWW-2443D34E558/SQL2005;UID=sa;PWD=********;Initial Catalog=forum"
 
conn.Open sql
 
'以下为判断是否连接
 
If conn.state=2 Then
 
Response.Write("正在连接")
 
ElseIf conn.state=1 Then
 
Response.Write("连接已经打开")
 
Else
 
Response.Write("对不起,无法打开连接")
 
End If
 
(3)、以上两种方法也可以用以下方式
 
复制代码代码如下:
 
Dim SqlDatabaseName,SqlPassword,SqlUsername,SqlLocalName,ConnStr,Conn
 
SqlDatabaseName = "forum" 'SQL数据库名
 
SqlUsername = "sa" 'SQL数据库用户名
 
SqlPassword = "**********" 'SQL数据库用户密码
 
SqlLocalName = "WWW-2443D34E558/SQL2005" 'SQL主机IP地址(服务器名)
 
ConnStr = " Password = "&SqlPassword&"; user id =" & SqlUsername&"; Initial Catalog ="&SqlDatabaseName&"; data source ="& SqlLocalName &";Provider = sqloledb;"
 
Set conn = Server.CreateObject("ADODB.Connection")
 
conn.open ConnStr
 
If conn.state=2 Then
 
Response.Write("正在连接")
 
ElseIf conn.state=1 Then
 
Response.Write("连接已经打开")
 
Else
 
Response.Write("对不起,无法打开连接")
 
End If
 
 

(编辑:聊城站长网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章