误 '80004005'. [Microsoft][ODBC SQL Server Driver]超时已过期.
解决方法:
A.如果遇到连接超时的错误,我们可以在程序中修改 Connection 对象的超时设置,再打开该连接。例如:
<% Set Conn = Server.CreateObject("ADODB.Connection") DSNtest="DRIVER={SQL Server};SERVER=ServerName;UID=USER; PWD=password;DATABASE=mydatabase" Conn. Properties("Connect Timeout") = 15 '以秒为单位 Conn.open DSNtest %>
B. 如果遇到查询超时的错误,我们可以在程序中修改 Recordset 对象的超时设置,再打开结果集。例如:
Dim cn As New ADODB.Connection Dim rs As ADODB.Recordset . . . cmd1 = txtQuery.Text Set rs = New ADODB.Recordset rs.Properties("Command Time Out") = 300 '同样以秒为单位,如果设置为 0 表示无限制 rs.Open cmd1, cn rs.MoveFirst . . . 另外,一些硬件及网络方面的原因也可能造成SQL数据库连接超时.
|