Langsung ke konten utama

FileSystemObject. Mengumpulkan File Pada Satu Folder

Pada kesempatan yang indah ini saya mau berbagi source code vb6 untuk kebutuhan mengurus file-file yang berantakan kemana-mana dan mengumpulkan nya pada satu folder sesuai dengan jenis ekstensi sehingga deretan file bisa tersusun rapih dan membuka peluang bagi kita untuk menjadi pengguna komputer yang disiplin.Ide untuk membuat program ini adalah ketika saya ingin mencari subtitle di folder download, dimana pada folder tersebut banyak sekali tersimpan file-file yang sungguh begitu bejibun jumlahnya. Mungkin jika saya mengumpulkan nya pada satu folder maka rasa pusing saya akan berkurang dan itu merupakan keuntungan selain di malam minggu bisa tidur sebelum jam 8 HaHa

Contoh masalah
Fix

Saya menggunakan bukan dengan native code(WinApi) melainkan dengan Libs yaitu FileSystemObject yang sudah bult-in dengan vb6 untuk berintaksi dengan file object yang mencakup Drive Folder & File.
Tidak ada fitur yang spesial melainkan;
  • Membuka file dengan Program default (WinApi)
  • 3 mode tindakan. Copy or Move or Kill 
  • Error Handling
  • Mendukung 8 esktensi file berbeda (bisa kalian tambah sendiri)
Bug;
  • Bukan Ditunjukan untuk FileSytem
  • Skill belum nyampe untuk membuat GUI Window Choose Folder, jadi kita berkeja dengan mengetik Lokasi nya secara manual
  • Tidak bisa mengetahui sampe mana proses berjalan(detail loading), karena sudah saya bilang saya bukan menggunak native code
 

Komentar

Postingan populer dari blog ini

Pemahaman Do While dan Do Until

Proses Pengulangan dengan menggunakan Do While dan Do Until adalah proses pengulangan yang di tentukan oleh sebuah kondisi, sama seperti statement IF Then Else beda nya do While adalah untuk proses pengulangan yang artinya proses akan berulang terus sesuai kondisi apa yang di berikan. 1/ Do While Proses Pengulangan dengan menggunakan do while adalah sebuah proses pengulangan dalam kondisi benar/true, jadi jika nilai pada sebuah kondisi adalah benar/true maka proses akan terus berulang dan akan berhenti jika nilai pada sebuah kondisi adalah salah/false. Contoh; dim a as integer a = 1 Do While a < 10      MsgBox a      a = a + 1 Loop Dari coding diatas, kita membuat variable "a" sebagai integer, dan 1 adalah nilainya, berarti a adalah 1. Selanjutnya adalah melakukan perulangan dengan menentukan kondisi yang benar, bahwa "1 itu lebih kecil dari 10". Karena kondisi yang di tentukan adalah kondisi yang benar maka proses pengulangan di ...

Fungsi Split VB 6.0

Split VB 6.0     Fungsi atau kegunaan split adalah untuk memecahkan/memisahkan string dengan ditentukan pembatasnya kemudian di tampung dalam variable array.    syntax;             split(ekspresi as string,[delimiter],[limit as long=-1],[Compare as VbCompareMethod=VbBinaryCompore])

Full Tutorial - Manipulasi Folder dan Protect

Pada waktu yang indah ini blog yang sedang kalian baca mau share project + Tutorial Manipulasi Folder yang bisa kalian coba untuk mengamankan folder kalian dari tangan jahil. Maksud manipulasi folder disini adalah untuk menjadikan content folder kita berubah total menjadi filesystem yang seperti sampah itu