ASP連接SQL2005數據庫連接代碼

2020-07-27 12:52:54

字體：大中小

來源：轉載

供稿：網友

說明：
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 