Memeriksa keberadaan suatu folder di dalam komputer bisa kita lakukan dengan fasilitas search yang disediakan oleh sistem operasi Windows. Namun kita juga dapat membuat program untuk mencari folder di dalam drive.
Berikut kode untuk mencari folder "C:Folder" ada. Anda dapat mengubahnya dengan mencari nama folder pada sebuah teks boks atau kode di jalankan saat kita memencet suatu tombol. Berkreasilah!
Private Sub Form_Load()
Const ATTR_DIRECTORY = 16
If Dir$("C:Folder", ATTR_DIRECTORY) <> "" Then
MsgBox "Direktori ada!", vbInformation, "Ada"
Else
MsgBox "Direktori tidak ada!", vbCritical, "Tidak Ada"
End If
End Sub
Facebook Badge
About the author
Lahir pada 11 Oktober 1986, penulis menghabiskan masa remaja di kota Jogja.Setelah lulus dari SMAN 1 Sewon Bantul tahun 2005, penulis melanjutkan studi di jurusan Teknik Informatika Universitas Ahmad Dahlan Yogyakarta hingga sekarang.Penulis mengenal Visual Basic pada waktu duduk di bangku SMA.Walaupun masih dangkal di dalam pemrograman menggunakan Visual Basic,namun penulis berharap ilmunya masih dapat bermanfaat.
Blogger Templates
Facebook Badge
Shout Box
Lain-lain
 |
 |
 |
Komunitas
1 komentar:
script ini memang hanya mencari folder di C, tetapi kan anda bisa memodifikasi dengan teksboks misalnya, untuk mencari folder yang lain / yang sama dengan teks di teksboks.attr_directory itu nilai atribut dari sebuah folder (read-only, archive,dll), jadi yang di cari adalah folder dengan atribut 16....
Poskan Komentar