Переименование каталога с помощью VB.Net в пакете служб SSIS - PullRequest
Новая
       27

Переименование каталога с помощью VB.Net в пакете служб SSIS

0 голосов
/ 23 октября 2019

У меня есть проблема, которую я не до конца понимаю. 

    Public Sub Main()
    Dim OldBrokerFolder As String
    Dim NewBrokerFolderName As String

    OldBrokerFolder = CType(Dts.Variables("User::strBrokerStatementFolder").Value, String)
    NewBrokerFolderName = CType(Dts.Variables("User::strBrokerStatementNewFolderName").Value, String)

    OldBrokerFolder = OldBrokerFolder.Substring(0, 41)

    MsgBox(OldBrokerFolder)

    FileIO.FileSystem.RenameDirectory(OldBrokerFolder, NewBrokerFolderName)

    Dts.TaskResult = ScriptResults.Success
End Sub

Когда я закомментирую Msgbox, я получаю сообщение об ошибке. Однако, когда я оставляю Msgbox незафиксированным, я должен щелкнуть диалоговое окно, но папка переименовывается нормально.

Я не понимаю, что происходит? Я просто хочу переименовать старую папку с новым именем

Спасибо

...