Login
Совсем не понимаю...
683 просмотров
Перейти к просмотру всей ветки
Murr патриот
Совсем не понимаю...
Простая функция (код не мой - можно тапки бросать мимо):
Public Function fillDT(ByVal sql As String) As DataTableDim oraCN As New OracleConnectionDim oraDA As New Oracle.DataAccess.Client.OracleDataAdapterDim DT As New DataTableDim oraCmd As New OracleCommandTryoraCN.ConnectionString = _connectionStringoraCN.Open()Debug.Print(sql)oraCmd.CommandText = sqloraDA.SelectCommand = oraCmdoraDA.SelectCommand.Connection = oraCNDT.Columns.GetEnumerator()oraDA.Fill(DT)Return DTCatch ex As ExceptionEmail.SendMailMessage(_senderAddress, My.Settings.emailErrorRecipient, "", "", _My.Computer.Name.ToString & ": " & _"error in: DANenprod1." & _System.Reflection.MethodBase.GetCurrentMethod.Name.ToString, _sql & ControlChars.CrLf & _ex.ToString)Return DTFinallyoraCN.Dispose()End TryEnd Function
Успешно работала несколько лет.
Никаких изменений в код мною не вносилось.
Передаваемая СКЛ-строка - сложная, но относительно быстрая - в дбФорже-студии выполняется за 1.578 сек.
Что могло измениться так, что oraDA.Fill(DT) не может выполнится в течении 12-15 часов?
Ошибок выполнения или таймаутов - нет.
Данных - да, много, но ведь работало...