Script VB .NET untuk Meng-Copy Berkas (File)

Untuk dapat menjalankan script VB.NET yang akan digunakan untuk menyalin/meng-copy berkas membutuhkan File object System.IO.File yang harus disertakan dengan perintah:

Imports.System.IO.File


Contoh script yang digunakan untuk menyalin berkas:

Dim FSumber As String
Dim FTarget As String
FSumber = "C:\Data\Form01.Doc"
FTarget = " C:\Data\Form01Rev.Doc "
If Exists(FSumber ) = True Then
Copy(FSumber , FTarget)
MsgBox("Berkas Berhasil DiSalin")
End If

Untuk mengantisipasi kesalahan karena tidak ada nama berkas yang akan disalin, digunakan perintah:

If Exists(FileToCopy) = True Then

Jika berkas yang dimaksud ada, maka akan dilanjutkan dengan perintah:

Copy(FileToCopy, NewCopy)

Sumber