Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Imports System
Imports System.Data
Imports System.Math
Imports Microsoft.SqlServer.Dts.Runtime
Public Class ScriptMain
Public Sub Main()
Dim TotFileName As String
MsgBox(CStr(Dts.Variables.Item("TrueFileName").Value))
TotFileName = CStr(Dts.Variables.Item("Unprocessed_Loc").Value) & LTrim(CStr(Dts.Variables.Item("TrueFileName").Value))
Dts.Variables.Item("TotFileName").Value = TotFileName
MsgBox(TotFileName & " is TotFileName")
MsgBox(Dts.Variables.Item("TotFileName").Value)
Dts.TaskResult = Dts.Results.Success
End Sub
End Class