asp連接資料庫的代碼

⑴ 如何用ASP連接sqlSERVER資料庫

思路：

1、ASP連接SQL資料庫，連接字元串是關鍵

2、連接後一般是執行查詢語句獲得結果集，或者是執行SQL語句，不需要返回結果

3、關閉資料庫連接對象

示例代碼：

dimConn,strConn,rs,strSQL
strConn="Provider=SQLOLEDB;DataSource=127.0.0.1;UserID=Test;Password=Test;InitialCatalog=Test_DBName"
SetConn=Server.CreateObject("ADODB.Connection")
Conn.openstrConn
iferr.number<>0then
response.Write"資料庫鏈接失敗。"&err.Description
response.End
endif
setrs=server.CreateObject("adodb.recordset")
strSQL="selecttitlefromdbo.tb_e_table"
rs.openstrSQL,conn,1,1
IfNotrs.eofThen
	'結果集存在，則可輸出rs
	response.writers("title")
EndIf
rs.close
Setrs=Nothing
Conn.close
SetConn=Nothing

其中

【Provider=SQLOLEDB;】：是聲明使用的是MSSQL協議，

【Data Source=127.0.0.1;】：是資料庫的所在伺服器IP地址或計算機名稱，

【User ID=Test;】：要連接的資料庫用戶名，

【Password=Test;】：要連接的資料庫用戶密碼，

【Initial Catalog=Test_DBName】：要連接的資料庫名稱

⑵ asp榪炴帴sqlserver鏁版嵁搴撳疄鐜頒唬鐮

銆銆鏈鏂囩珷浠嬬粛浜嗗埄鐢╝sp榪炴帴sqlserver鏁版嵁搴撳疄渚嬩唬鐮 榪炴帴鏂規硶鏈変笁縐嶅垎鍒涓洪氳繃ODBC DSN寤虹珛榪炴帴 閫氳繃oledb寤虹珛榪炴帴 閫氳繃driver寤虹珛榪炴帴涓夌 涓嬮潰鎴戜滑鏉ョ湅鐪嬬涓縐

銆銆閫氳繃driver寤虹珛榪炴帴

浠ｇ爜濡備笅 <% Const DataBaseType= If DataBaseType= then DBPath="/jb /news asp" SqlNowString = "Now()" ystr=true nstr=false suiji="rnd(id)" Else 濡傛灉鏄瘲QL鏁版嵁搴 璇瘋ょ湡淇鏀瑰ソ浠ヤ笅鏁版嵁搴撻夐」 DataServer = " cnnet" 鏁版嵁搴撴湇鍔″櫒IP DataUser = "jb net" 璁塊棶鏁版嵁搴撶敤鎴峰悕 DataBaseName = "jb net" 鏁版嵁搴撳悕縐 DataBasePsw = "瀵嗙爜" 璁塊棶鏁版嵁搴撳瘑鐮 SqlNowString = "getdate()" ystr= nstr= suiji="newid()" End if On Error Resume Next If DataBaseType = Then ConnStr="driver={SQL Server};server="&dataserver&";UID="&datauser&";PWD="&databasepsw&";Database="&databasename Else ConnStr = "Provider=Microsoft Jet OLEDB ;Data Source=" & Server MapPath(DBPath) End If Set conn = Server CreateObject("ADODB Connection") conn open ConnStr If Err Then Err Clear:Set conn = Nothing:Response Write "鏁版嵁搴撹繛鎺ュ嚭閿 璇鋒鏌Conn asp鏂囦歡涓鐨勬暟鎹搴撳弬鏁拌劇疆 ":Response End %>

銆銆閫氳繃driver寤虹珛榪炴帴

銆銆閫氳繃driver寤虹珛欏甸潰涓庢暟鎹搴撶殑榪炴帴 鍚屾牱涓嶉渶瑕佸壋寤篛DBC DSN鏁版嵁婧 浣嗗繀欏葷煡閬撳疄闄呯殑鏁版嵁搴撴枃浠惰礬寰勬垨鑰呮暟鎹婧愬悕(渚嬪 SQLserver鐨勬暟鎹搴)

浠ｇ爜濡備笅 Set conn=Server CreateObject("ADODB Connection") conn Open"driver={SQL Server};server=abc;DataSource=(test);uid=;pwd=;database=UserDB"

銆銆 緙栧啓鑴氭湰鍜屾暟鎹搴撴簮寤虹珛榪炴帴

銆銆ADO錛圓ctiveX Data Objects 錛 鎻愪緵 Connection 瀵硅薄 鍙浠ヤ嬌鐢ㄨュ硅薄寤虹珛鍜岀＄悊搴旂敤紼嬪簭鍜 ODBC 鏁版嵁搴撲箣闂寸殑榪炴帴 Connection 瀵硅薄鍏鋒湁鍚勭嶅睘鎬у拰鏂規硶 鍙浠ヤ嬌鐢ㄥ畠浠鎵撳紑鍜屽叧闂鏁版嵁搴撹繛鎺 緙栧啓鏁版嵁搴撹繛鎺ヨ剼鏈 棣栧厛搴斿壋寤 Connection 瀵硅薄鐨勫疄渚 鎺ョ潃鎵撳紑鏁版嵁搴撹繛鎺

浠ｇ爜濡備笅

銆銆 ******************************************************************** 涓嶴QL Server 鏈夊叧鐨勮繛鎺 鍙浠ュ弬鐓у畠寤虹珛鎮ㄧ殑鏁版嵁搴撹繛鎺 ******************************************************************** 鏁璇鋒敞鎰 璇鋒牴鎹鎯呭喌閰嶇疆StrServer StrUid StrSapwd StrDbName鍥涗釜鍙傛暟 Dim StrServer StrUid StrSaPwd StrDbName StrServer="(local)" 鏁版嵁搴撴湇鍔″櫒鍚 StrUid="testuser" 鎮ㄧ殑鐧誨綍甯愬彿 StrSaPwd=" " 鎮ㄧ殑鐧誨綍瀵嗙爜 StrDbName="db_test_" 鎮ㄧ殑鏁版嵁搴撳悕縐

lishixin/Article/program/net/201311/14116

⑶ asp 連接 access 資料庫 幾種方法

方法1：
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("data.mdb")
方法2：
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("data.mdb")
注意：一個頁面中，只要連接一次就可以了，資料庫使用完後要及時關閉連接。
conn.Close
Set conn = Nothing

⑷ ASp榪炴帴鏁版嵁搴(ASP榪炴帴鏁版嵁搴撴椂,鍙浠ヤ嬌鐢ㄥ摢涓夌嶆柟寮忕殑榪炴帴鏂規硶)

鐢ㄧ殑鏈澶氱殑灝辨槸ACCESS鍜孲QL

Server鏁版嵁搴擄紝榪炴帴璇鍙ュ備笅:

1.

ASP榪炴帴Aess鏁版嵁搴撹鍙

Set

Conn=Server.("ADODB.Connection")

Connstr="DBQ="server.mappath("www/bbs.mdb")";DefaultDir=;DRIVER={Microsoft

AessDriver(*.mdb)};"

Conn.Open

connstr

鍏朵腑Set

Conn=Server.("ADODB.Connection")涓哄緩絝嬩竴涓璁塊棶鏁版嵁鐨勫硅薄

server.mappath("www/bbs.mdb")鏄鍛婅瘔鏈嶅姟鍣╝ess

鏁版嵁搴撹塊棶鐨勮礬寰

2.

ASP榪炴帴Sqlserver鏁版嵁搴撹鍙

Set

conn

=

Server.("ADODB.Connection")

conn.Open"driver={SQLServer};server=202.108.32.94;uid=wu77445;pwd=p780522;database=w

ww_panwei_com"

conn

open

鍏朵腑/Set

conn

=

Server.("ADODB.Connection")涓鴻劇疆涓涓鏁版嵁搴撶殑榪炴帴瀵硅薄

driver=()鍛婅瘔榪炴帴鐨勮懼囧悕鏄瘲QL-SERVER

server鏄榪炴帴鐨勬湇鍔″櫒鐨剗p鍦板潃錛孶id鏄鎸囩敤鎴風殑鐢ㄦ埛鍚嶏紝pwd鏄鎸囩殑鐢ㄦ埛鐨刾assword錛宒atabase鏄鐢ㄦ埛鏁版嵁搴撳湪鏈嶅姟鍣ㄧ鐨勬暟鎹搴撶殑鍚嶇О