ASP接続SQL 2005データベース接続コード

説明:
a、以下の文字の中でデータベース名forum、データベースサーバー名WWW-2443 D 34 E 558SQL 2005(または127.0.0.1)
b、sqlデータベースサーバー名の表示:オブジェクトエクスプローラ->データベース->自分で作ったデータベースを右クリック->属性->権限
c、Provider=sqlncliでもいいし、UIDと"="の間にスペースがあってはいけません.user idに置き換えれば
スペース、Initial Catalogはdatabase、pwdはpassword、data sourceはserver、
VBScriptでは、大文字と小文字を区別しないので、UIDはuidと同等である...ここでprovider、uid、pwd、
Initial Catalog、data sourceなどの位置は自由に置けます
(1)、windows認証接続SQL 2005文字列、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)、以上の2つの方法は、以下のようにしてもよい

 
  
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