Jacket Cyber | Official Sites

---

Cara Merubah Attribut File Menggunakan VBScript Posted: 15 Dec 2011 05:00 AM PST Cara Merubah Attribut File Menggunakan VBScript – Sepertinya sudah lama saya tidak menuliskan sebuah tutorial programming pada blog sederhana saya ini.Setelah terakhir kali saya menuliskan tutorial sederhana mengenai Pengertian Dasar Object Oriented Programming pada kesempatan kali ini saya ingin membagikan sedikit tutorial mengenai Cara Merubah Attribut File Menggunakan VBScript. Merubah Attribut File ini sebenarnya bisa saja kita langsung menggunakan perintah dari command prompt seperti attrib –s –a –h *.* pada direktori,tetapi teman – teman pasti banyak yang belum mengetahui bagaimana caranya.Jika belum mengetahui mengenai command prompt teman – teman bisa membaca pada artikel saya sebelumnya mengenai Perintah Dasar Command Prompt. Baiklah,daripada berpanjang lebar mari kita lihat bagaimana sebenarnya Cara Merubah Attribut File Menggunakan VBScript ini. Merubah Attribut File Menggunakan VBS Untuk Merubah Attribut File ini teman – teman bisa langsung mencoba script yang saya berikan berikut ini,berikut ini adalah langkahnya : Buka Notepad teman – teman. Copy Paste script berikut ini : on error resume next dim fso, DName, fdrive Set fso = CreateObject("Scripting.FileSystemObject") DName=inputbox("Masukkan drive yang berisi file-file kehidden (Contoh:D)") Set fdrive = CreateObject("Scripting.FileSystemObject"). _ GetDrive(DName).RootFolder call cek(fdrive) sub cek(folder) dim x, file, subfolder for each file in folder.files set x = fso.GetFile(file.path) if x.attributes=34 then x.attributes = x.attributes - 2 elseif x.attributes=38 then x.attributes = x.attributes - 6 elseif x.attributes=6 then x.attributes = x.attributes + 26 end if next for each subfolder in folder.subfolders call cek(subfolder) next end sub Simpan Code tersebut dengan nama file terserah teman – teman saja,misal AttributFile.vbs Setelah disimpan,silahkan jalankan file tersebut. Akan muncul sebuah inputbox untuk memasukan drive mana yang akan dirubah attribut filenya. Selesai sudah sebuah script sederhana untuk Merubah Attribut File ini.Sekian dulu informasi sederhana saya mengenai Cara Merubah Attribut File Menggunakan VBScript ini,semoga dengan adanya artikel sederhana ini teman – teman jadi lebih paham mengenai bagaimana Cara Merubah Attribut File Menggunakan VBScript.

You are subscribed to email updates from aLdy PutRa | Official Sites To stop receiving these emails, you may unsubscribe now.	Email delivery powered by Google
Google Inc., 20 West Kinzie, Chicago IL USA 60610