Verifica existencia do arquivo–Visual Basic 2008–SSIS

 

Código utiliza no SSIS para verificação da existencia de uma arquivo antes de realizar a Leitura

' Microsoft SQL Server Integration Services Script Task

' Write scripts using Microsoft Visual Basic 2008.

' The ScriptMain is the entry point class of the script.

Imports System

Imports System.Data

Imports System.Math

Imports Microsoft.SqlServer.Dts.Runtime

<System.AddIn.AddIn("ScriptMain", Version:="1.0", Publisher:="", Description:="")> _

<System.CLSCompliantAttribute(False)> _

Partial Public Class ScriptMain

Inherits Microsoft.SqlServer.Dts.Tasks.ScriptTask.VSTARTScriptObjectModelBase

Enum ScriptResults

Success = Microsoft.SqlServer.Dts.Runtime.DTSExecResult.Success

Failure = Microsoft.SqlServer.Dts.Runtime.DTSExecResult.Failure

End Enum

Public Sub Main()

If System.IO.File.Exists(Dts.Variables("sCaminhoArquivo").Value & Dts.Variables("sNomeArquivo").Value) Then

Dts.Variables("sExisteArquivo").Value = 1

Else

Dts.Variables("sExisteArquivo").Value = 0

End If

Dts.TaskResult = ScriptResults.Success

End Sub

End Class

No exemplo acima, acaso o arquivo exista será alimentado a variável sExisteArquivo, onde pode ser utilizada em um precedence Constraint Editor realizando a validação antes de fazer a leitura do Data Flow.

 

Obrigado