?? mdproconstringx.htm
字號:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 Final//EN">
<HTML dir=ltr>
<HEAD>
<META HTTP-EQUIV="Content-Type" Content="text/html; charset=gb2312"><title>ConnectionString、ConnectionTimeout 和 State 屬性范例</title>
<style>@import url(msdn_ie4.css);</style>
</HEAD>
<BODY>
<h3><a name="mdproconstringx"></a>ConnectionString、ConnectionTimeout 和 State 屬性范例</h3>
<p>
該范例說明了使用 <b>ConnectionString</b> 屬性打開 <b>Connection</b> 對象的不同方法。同時還使用 <b>ConnectionTimeout</b> 屬性設置連接超時時間,并使用 <b>State</b> 屬性檢查連接的狀態。該過程運行時需要 <b>GetState</b> 函數。</p>
<pre>Public Sub ConnectionStringX() Dim cnn1 As ADODB.Connection
Dim cnn2 As ADODB.Connection
Dim cnn3 As ADODB.Connection
Dim cnn4 As ADODB.Connection ' 不使用數據源名 (DSN) 打開連接。
Set cnn1 = New ADODB.Connection
cnn1.<span class=cfe><b>ConnectionString</b></span> = "driver={SQL Server};" & _
"server=bigsmile;uid=sa;pwd=pwd;database=pubs"
cnn1.<span class=cfe><b>ConnectionTimeout</b></span> = 30
cnn1.Open
' 使用 DSN 和 ODBC 標記打開連接。
Set cnn2 = New ADODB.Connection
cnn2.<span class=cfe><b>ConnectionString</b></span> = "DSN=Pubs;UID=sa;PWD=pwd;"
cnn2.Open
' 使用 DSN 和 OLE DB 標記打開連接。
Set cnn3 = New ADODB.Connection
cnn3.<span class=cfe><b>ConnectionString</b></span> = "Data Source=Pubs;User ID=sa;Password=pwd;"
cnn3.Open
' 使用 DSN 和單個參數而非連接字符串打開連接。
Set cnn4 = New ADODB.Connection
cnn4.Open "Pubs", "sa", "pwd"
' 顯示連接的狀態。
MsgBox "cnn1 state: " & GetState(cnn1.<span class=cfe><b>State</b></span>) & vbCr & _
"cnn2 state: " & GetState(cnn2.<span class=cfe><b>State</b></span>) & vbCr & _
"cnn3 state: " & GetState(cnn3.<span class=cfe><b>State</b></span>) & vbCr & _
"cnn4 state: " & GetState(cnn4.<span class=cfe><b>State</b></span>) cnn4.Close
cnn3.Close
cnn2.Close
cnn1.CloseEnd SubPublic Function GetState(intState As Integer) As String Select Case intState
Case adStateClosed
GetState = "adStateClosed"
Case adStateOpen
GetState = "adStateOpen"
End SelectEnd Function</pre>
<center> <A HREF="http://www.51windows.Net">www.51windows.Net</A></center>
<SCRIPT LANGUAGE="JavaScript" src="/log/sitelog2.asp"></SCRIPT>
<script src="script.js"></script></BODY>
</HTML>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -