Articles & Source Code

Donation Info

BeGo Resources

Download Products

Sites Info

List Of Category

New Category, Add-Ins/Plugins, Database & Reporting, Snippet Function, Network & Internet, Compilation Code, Security Focus, Tutorial & Articles, Tool & Utilities, Top Category

Search Source

SKIN II VB

NO*IA CDMA SMS SENDER

Simple Image Browser

Smada Lock Folder

Tiny Typing Tutor 0.1a

---

Memeriksa keberadaan sebuah file

Digunakan untuk mengecek keberadaan sebuah file pada komputer anda dengan fungsi DIR$

Code: Select all

Function FileExists(strPath As String) As Boolean
Dim lngRetVal As Long
On Error Resume Next
lngRetVal = Len(Dir$(strPath, vbReadOnly Or _
vbSystem Or _
vbHidden Or _
vbArchive Or _
vbNormal))

If Err Or lngRetVal = 0 Then
FileExists = False
Else
FileExists = True
End If
End Function

Private Sub Form_Load()
MsgBox FileExists("C:\boot.ini")
End Sub

Comment: 0 | Read: 2787 | Date: 10/07/2005 | Publisher: @jhie lunatic-x

Back | To Top

---

Menembus Proteksi DLL Hell . Ganti Password Windows . Listview Kolom Berwarna . Mematikan Monitor Dengan Fungsi SendMessage . Date Time Reference . Smada Lock Folder . pwdump6 . Magnify Form . Menubar Right Alignment . Super On Top . Membuat Komponen Sendiri - Kontrol Window . Mengurangi Kelemahan SQL (Sql Injection) . Teknik Mudah DOS Pada Website (newbie!) . Mendapatkan Info File EXE . Menampilkan Ballon Tips . NFS Underground 2 . Custom InputBox II . Mendapatkan Password MyOB Accounting . Simpan Pengaturan Dengan Binary File . Menubar Right Alignment .