【发布时间】:2010-01-05 18:48:27
【问题描述】:
我将超时设置为0但连接过早关闭,这句话有什么问题?
Using odbcconn As New OdbcConnection(DataShared.gstrCNN)
odbcconn.ConnectionTimeout = 0
odbcconn.Open()
Dim OdbcCmd As New OdbcCommand( _
"{ ? = CALL [proc_Cp_GenEstadoCta](" & _
PCOD_EMPR & ", " & _
PPER_ANUAL & "," & _
DataShared.gintCODUSER & " ) }", odbcconn)
OdbcCmd.Parameters.Add("@return", OdbcType.Int)
OdbcCmd.Parameters("@return").Direction = ParameterDirection.ReturnValue
OdbcCmd.ExecuteNonQuery()
If CInt(OdbcCmd.Parameters("@return").Value) = 0 Then
GenEstadoMovsSaldos = True
Else
GenEstadoMovsSaldos = False
End If
End Using
修改后的代码
Using odbcconn As New OdbcConnection(DataShared.gstrCNN)
--odbcconn.ConnectionTimeout = 0
odbcconn.Open()
Dim OdbcCmd As New OdbcCommand( _
"{ ? = CALL [proc_Cp_GenEstadoCta](" & _
PCOD_EMPR & ", " & _
PPER_ANUAL & "," & _
DataShared.gintCODUSER & " ) }", odbcconn)
OdbcCmd.CommandTimeout = 60
OdbcCmd.Parameters.Add("@return", OdbcType.Int)
OdbcCmd.Parameters("@return").Direction = ParameterDirection.ReturnValue
OdbcCmd.ExecuteNonQuery()
If CInt(OdbcCmd.Parameters("@return").Value) = 0 Then
GenEstadoMovsSaldos = True
Else
GenEstadoMovsSaldos = False
End If
End Using
效果很好!
【问题讨论】:
标签: sql-server vb.net odbc