SSIS パッケージの Excel テンプレートを使用して動的にレポートを作成しています。Excel テンプレートをコピーして、スクリプト タスク オブジェクトで VB 2010 を使用して名前を変更しようとしています。
以下は私のコードです:
Public Sub Main()
Dim sourcePath As String = "\\server\Dir1\Dir2\Dir3\FileName_TEMPLATE.xlsx"
Dim destPath As String = "\\server\Dir1\Dir2\Dir3\FileName" + CDate(Date.Today.Date).ToString("yyyyMMdd") + ".xlsx"
If File.Exists(destPath) = True Then
File.Delete(destPath) 'delete existing file'
File.Copy(sourcePath, destPath) 'copy template file and rename'
End If
Dts.TaskResult = ScriptResults.Success
End Sub
End Class
が存在するかどうかを確認するために変更If File.Exists(destPath) = True Then...
し、ステートメントにa を追加したので、ソースファイルが存在し、それが状態を返している場合If File.Exists(sourcePath) = True...
sourcePath
MessageBox("File doesn't exist")
ELSE
MessageBox
"File doesn't exist"
テンプレート ファイルがそこにあり、Windows エクスプローラー ウィンドウからアドレスをコピーしてsourcePath
文字列に貼り付け、パスが正確であることを確認しました。
はsourcePath
別のサーバーにあります。
ファイルはソース パスにあります。
私は何を間違っていますか?
ありがとう