Showing posts with label Files Directory. Show all posts
Showing posts with label Files Directory. Show all posts

Monday, December 10, 2012

VB Code - Fungsi Untuk Mendapatkan Directory My Documents

Di bawah ini merupakan fungsi VB6 untuk mendapatkan directory My Documents.'Fungsi untuk mendapatkan directory My Documents:Function GetDocumentsPath() As String GetDocumentsPath = Environ("USERPROFILE") & "\My Documents"End Function'Contoh penggunaan...
READ MORE - VB Code - Fungsi Untuk Mendapatkan Directory My Documents

VB6 Code - Mendapatkan Directory Common Files

Di bawah ini merupakan fungsi VB6 untuk mendapatkan directory common files.'Fungsi untuk mendapatkan directory common files:Function GetCommonPath() As String GetCommonPath = Environ("CommonProgramFiles")End Function'Contoh penggunaan fungsi untuk...
READ MORE - VB6 Code - Mendapatkan Directory Common Files

VB6 Code - Mendapatkan Directory Application Data

Di bawah ini merupakan fungsi VB6 untuk mendapatkan Aplication Data atau disingkat dengan AppData.'Fungsi untuk mendapatkan Aplication Data:Function GetAppDataPath() As String GetAppDataPath = Environ("AppData")End Function'Contoh penggunaan fungsi...
READ MORE - VB6 Code - Mendapatkan Directory Application Data

VB6 Code - Mendapatkan Directory All User Profile

Di bawah ini merupakan fungsi VB6 untuk mendapatkan directory All User Profile (AllUserProfile)'Fungsi untuk mendapatkan directory All User ProfileFunction GetAllUserPath() As String GetAllUserPath = Environ("AllUsersProfile")End Function'Contoh penggunaan...
READ MORE - VB6 Code - Mendapatkan Directory All User Profile

VB6 Code - Fungsi Untuk Mendapatkan Directory Temporary

Di bawah ini merupakan Fungsi VB6 untuk mendapatkan directory temporary files tanpa terpengaruh oleh drive tempat Windows berada mis. C:\ D:\ dan seterusnya:'Fungsi untuk mendapatkan directory temporaryFunction GetTempPath() As String GetTempPath=...
READ MORE - VB6 Code - Fungsi Untuk Mendapatkan Directory Temporary

Fungsi Untuk Mendapatkan Directory System | Visual Basic 6.0

Di bawah ini merupakan Fungsi untuk mendapatkan directory system tanpa terpengaruh oleh drive tempat Windows berada mis. C:\ D:\ dan seterusnya:'Fungsi untuk mendapatkan directory systemFunction GetSystemPath() As String GetSystemPath = Environ("WinDir")...
READ MORE - Fungsi Untuk Mendapatkan Directory System | Visual Basic 6.0

VB6 Code - Fungsi Untuk Mendapatkan Directory Windows

Di bawah ini merupakan fungsi VB6 untuk mendapatkan directory windows tanpa terpengaruh oleh drive tempat Windows berada mis. C:\ D:\ dan seterusnya:'Fungsi untuk mendapatkan directory windowsFunction GetWinPath() As String GetWinPath = Environ("WinDir")End...
READ MORE - VB6 Code - Fungsi Untuk Mendapatkan Directory Windows

Saturday, April 3, 2010

VB6 Code - Mencari Aplikasi Asosiasi Sebuah File

Di bawah ini merupakan fungsi VB6 untuk mencari aplikasi yang diasosiasikan terhadap sebuah file. Bingung? misalnya kita double klik file berektensi .ini maka aplikasinya notepad.exe, double klik file berektensi .doc maka aplikasinya Microsoft Word,...
READ MORE - VB6 Code - Mencari Aplikasi Asosiasi Sebuah File

VB6 Code - Class Untuk Mengetahui Crc32 Dari Sebuah File

Di bawah ini merupakan class VB6 untuk mengetahui CRC32 dari sebuah file. Untuk keperluan ini copy dan pastekan kode di bawah ini ke dalam class, kemudian ganti nama kelasnya menjadi clsCRC.Option ExplicitPrivate crcTable(0 To 255) As Long 'crc32Private...
READ MORE - VB6 Code - Class Untuk Mengetahui Crc32 Dari Sebuah File

VB6 Code - Memindahkan Seluruh File Dalam Satu Directory

Di bawah ini merupakan fungsi VB6 untuk memindahkan seluruh file dari satu directory tertentu. Untuk keperluan ini Anda harus mereferensi pada objek Microsoft Scripting Runtime atau scrun.dll.Option ExplicitPublic Function MoveAllFiles() Dim fso As...
READ MORE - VB6 Code - Memindahkan Seluruh File Dalam Satu Directory

VB6 Code - Mengcopy Seluruh File Dalam Satu Directory

Di bawah ini merupakan fungsi VB6 untuk meng-copy seluruh file dari satu directory tertentu. Untuk keperluan ini Anda harus mereferensi pada objek Microsoft Scripting Runtime atau scrun.dll.Option ExplicitPublic Function CopyAllFiles(Source As String,...
READ MORE - VB6 Code - Mengcopy Seluruh File Dalam Satu Directory

VB6 Code - Fungsi Untuk Menghancurkan File

Di bawah ini merupakan fungsi VB6 untuk menghancurkan file. Maksud dari fungsi ini, agar file yang sudah dihapus/dihancurkan, tidak dapat direcover dengan software-software recovery.Core function dari fungsi penghancur file ini hanyalah 3 line code,...
READ MORE - VB6 Code - Fungsi Untuk Menghancurkan File

Tuesday, March 16, 2010

VB6 Code - Menampilkan Explorer Dengan Directory Tertentu

Di bawah ini merupakan fungsi VB6 untuk menampilkan explorer dengan directory tertentu. Karena menggunakan metode Early Binding maka, Untuk keperluan ini Anda harus mereferensi objek "Microsoft Shell Controls And Automation" atau "Shell32.dll" yang biasa...
READ MORE - VB6 Code - Menampilkan Explorer Dengan Directory Tertentu

VB6 Code - Fungsi Untuk Membuka Directory Tertentu

Di bawah ini merupakan fungsi VB6 untuk membuka directory tertentu. Karena menggunakan metode Early Binding maka, Untuk keperluan ini Anda harus mereferensi objek "Microsoft Shell Controls And Automation" atau "Shell32.dll" yang biasa terletak pada SystemRoot\System32...
READ MORE - VB6 Code - Fungsi Untuk Membuka Directory Tertentu

Friday, March 12, 2010

VB6 Code - Fungsi Untuk Mengisi ListBox Dengan Seluruh File

Di bawah ini merupakan fungsi VB6 untuk mengisi Listbox dengan seluruh file, maksudnya (karena judul tersebut kurang lengkap) fungsi untuk mengisi ListBox dengan file-file dari sebuah directory yang telah ditentukan.Fungsi untuk mengisi ListBox dengan...
READ MORE - VB6 Code - Fungsi Untuk Mengisi ListBox Dengan Seluruh File

VB6 Code - Fungsi Untuk Mengetahui Keberadaan Sebuah Folder

Di bawah ini merupakan fungsi VB6 untuk mengetahui keberadaan folder.Fungsi untuk mengetahui keberadaan folder:Function IsFolderExist(FolderName As String) As Boolean IsFolderExist = (Dir$(FolderName, vbDirectory) <> "")End FunctionContoh penggunaan...
READ MORE - VB6 Code - Fungsi Untuk Mengetahui Keberadaan Sebuah Folder

VB6 Code - Mendapatkan Nama File dari Path Lengkap

Di bawah ini merupakan fungsi VB6 untuk mendapatkan nama file dari path lengkap.'Fungsi untuk mendapatkan file dari path lengkap:Public Function GetFileName(FileName As String) As String Dim str() As String str = Split(FileName, "\") GetFileName...
READ MORE - VB6 Code - Mendapatkan Nama File dari Path Lengkap

VB6 Code - Mendapatkan Ekstensi dari Path Lengkap

Di bawah merupakan fungsi VB6 untuk mendapatkan ekstensi dari path lengkap.'Fungsi untuk mendapatkan ekstensi dari path lengkap:Public Function GetExtension(FileName As String) Dim str() As String str = Split(FileName, ".") GetExtension = str(UBound(str))End...
READ MORE - VB6 Code - Mendapatkan Ekstensi dari Path Lengkap

VB6 Code - Fungsi Untuk Mendapatkan Directory System

Di bawah ini merupakan fungsi VB6 untuk mendapatkan directory system.'Fungsi untuk mendapatkan directory system:Function GetSystemPath() As String GetSystemPath = Environ("WinDir") & "\System32"End Function'Contoh penggunaan fungsi untuk mendapatkan...
READ MORE - VB6 Code - Fungsi Untuk Mendapatkan Directory System

VB6 Code - Fungsi Untuk Mendapatkan Directory Program Files

Di bawah ini merupakan fungsi VB6 untuk mendapatkan directory Program Files.'Fungsi untuk mendapatkan directory Program Files:Function GetProgramFilesPath() As String GetProgramFilesPath = Environ("ProgramFiles")End Function'Contoh Fungsi untuk mendapatkan...
READ MORE - VB6 Code - Fungsi Untuk Mendapatkan Directory Program Files