Visual Basic.NET - Saber si se ejecuto DTS

 
Vista:

Saber si se ejecuto DTS

Publicado por Gil (94 intervenciones) el 25/10/2004 18:24:14
Hola:

Estoy ejecutando un DTS, desde VB .Net,
de que manera puedo saber si el DTS se ejecuto de manera correcta o hubo algun problema,
Que tengo que hacer desde VB .Net para saber que error fue...

Gracias...
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Saber si se ejecuto DTS

Publicado por htb (32 intervenciones) el 26/10/2004 16:25:19
tal vez te sirva esto:

' EFECTO : Revisar Ejecucion del DTS
Public Sub ReturnPackage(ByVal pvo_Package As DTS.Package)
Try
Dim vln_ErrorCode, vln_ErrorHelpContext As Long
Dim vlc_ErrorSource, vlc_ErrorDescription, vlc_ErrorHelpFile As String
Dim vlc_ErrorIDofInterfaceWithError As String
Dim vlo_Step As DTS.Step

For Each vlo_Step In pvo_Package.Steps
If vlo_Step.ExecutionResult = DTS.DTSStepExecResult.DTSStepExecResult_Failure Then
vlo_Step.GetExecutionErrorInfo(vln_ErrorCode, vlc_ErrorSource, _
vlc_ErrorDescription, vlc_ErrorHelpFile, vln_ErrorHelpContext, _
vlc_ErrorIDofInterfaceWithError)
MessageBox.Show(vlo_Step.Name & "...fallo" & vbNewLine & _
vlc_ErrorSource & vbNewLine & vlc_ErrorDescription, _
"DTS: Data Transformation Services", _
MessageBoxButtons.OK, MessageBoxIcon.Error)
End If
Next
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar