08-07-2008, 10:39 PM
now i have RTE 52 in this
Code:
Function FileExist(ByVal FileName As String) As Boolean
If Dir(App.Path & "\" & FileName) = "" Then
FileExist = False
Else
FileExist = True
End If
End Function