Halo gan, selamat menikmati blog saya .. SALAM GALAU!!? :)
Something you might want to know about us.
Don't be hesitated to contact us if you have something to say.

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

| | Friday, September 30, 2011
|

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)




0 comments:

Post a Comment

There was an error in this gadget
 
There was an error in this gadget

Anda Pengunjung ke