Selasa, 09 April 2013

Menghapus File Melalui VBScript

VBScript memiliki kemampuan untuk menghapus(delete) file tertentu yang ada di dalam hardisk komputer. Berikut adalah contoh listing program untuk menghapus file dengan VBScript

 Code VBScript untuk menghapus file :
set objectFSO = CreateObject("Scripting.FileSystemObject")

filePath = "D:\DeleteThis.txt"

If objectFSO.fileExists(filePath) Then
   objectFSO.deleteFile(filePath)
End If

set objectFSO  = nothing

Penjelasan code :
  1. Code bagian ini adalah untuk create object VBScript yang digunakan untuk manajemen file
    set objectFSO = CreateObject("Scripting.FileSystemObject")
    
  2. Variable filePath untuk menyimpan alamat dari file yang hendak dihapus. filePath berisi alamat file DeleteThis.txt yang berada di drive D
    filePath = "D:\DeleteThis.txt"
    
  3. Conditional If untuk mengecek apakah file D:\DeleteThis.txt benar benar ada. Ini untuk memastikan agar proses delete file tidak error.
    If objectFSO.fileExists(filePath) Then
    ...
    End If
    
  4. Ini adalah bagian inti, bagian ini untuk menghapus file D:\DeleteThis.txt. Menggunakan method deleteFile yang menerima parameter alamat file. variable filePath berisi alamat dari DeleteThis.txt
    objectFSO.deleteFile(filePath)
    
  5. Bagian akhir adalah untuk menghapus object dari memori. Tujuaanya yaitu agar tidak boros memori. Setelah selesai memakai suatu object, maka object tersebut harus dibersihkan dari memori
    set objectFSO  = nothing
    

1 komentar:

  1. Jika menghapus folder kan tinggal di rubah DeleteFile nya menjadi DeleteFolder..
    tpi merubah permission dg VBS gmna ya, agar folder dapat dihapus?

    BalasHapus