ADO ConnectionTimeout Property

The ConnectionTimeout property sets or returns the number of seconds to wait for a connection to open, before canceling the attempt and generate an error.

Default is 15 seconds.

Syntax

objconn.ConnectionTimeout

Example

Dim conn As ADODB.Connection
Dim strConn As String
Set conn = New ADODB.Connection

strConn = ConnectionString
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=F:\MaterialMaster\Material_Master.mdb;"
conn.ConnectionTimeout = 30
conn.Open strConn
Debug.Print "Connection to MaterialMaster database timeout in " & (conn.ConnectionTimeout) & " seconds"

conn.Close
Set conn = Nothing