Every time I try the following statements I keep getting a command time out. How do I get around that?<br><br>Function StoredProc(gdate As String)<br><br>On Error GoTo ErrorHandler<br><br>Conn.BeginTrans<br><br>With Comm<br> .CommandText = "sp_rmvnull_inv"<br> .CommandType = adCmdStoredProc 'a constant<br> .CommandTimeout = 0<br> .ActiveConnection = Conn<br> .Parameters.Refresh<br> .Execute ' execute the stores procedure.<br>End With<br>With Comm<br> .CommandType = adCmdStoredProc 'a constant<br> .CommandText = "sp_run_invoices"<br> .CommandTimeout = 0<br> .ActiveConnection = Conn<br> .Parameters("@pub_date".Value = gdate<br> .Parameters("@pub_date".Direction = adParamInput<br> .Execute ' execute the stores procedure.<br>End With<br><br>Conn.CommitTrans<br><br>bDBConnectFail = False<br>Exit Function<br><br>ErrorHandler:<br><br>Conn.RollbackTrans<br>bDBConnectFail = True<br>MsgBox Err.Number & Err.Description, vbCritical<br><br>End Function<br>