Database Reference
In-Depth Information
•
User::OkToProceed
•
User::SourceFileDirectory
•
User::WorkingCopyFileName
Click the Edit Script button to open the VSTAProjects script editor. At the top of
Listing 7-11
.
Declaring a Reference to the System.IO Namspace
Imports System.IO
Listing 7-12
.
Code for the Main() Subroutine
Public Sub Main()
' 1: declare bDebug
Dim bDebug As Boolean
' 2: detect Debug mode...
bDebug
= Convert.ToBoolean(Dts.Variables("Debug").Value)
' 3:variables declaration...
Dim sPackageName As String
= Dts.Variables("System::PackageName").Value.ToString
Dim sTaskName As String
= Dts.Variables("System::TaskName").Value.ToString
Dim sSubComponent As String = sPackageName & "."
& sTaskName
Dim sDateStampFormat As String = _
Dts.Variables("$Package::DateStampFormat").Value.ToString
Dim sSourceFilePath As String = _
Dts.Variables("$Package::SourceFilePath").Value.ToString
Dim bExceptionOnFileNotFound As Boolean = _
Search WWH ::
Custom Search