17-10-12, 02:13 PM
كاتب الموضوع : Aleppo Force
هذا الكود للتأكد من وجود ملفكود :
Private Sub Form_Load()
Const ATTR_DIRECTORY = 16
If Dir$("c:\windows", ATTR_DIRECTORY) <> "" Then
MsgBox ("The directry exist")
Else
MsgBox ("The directry does not exist")
End If
End Sub