hello all.
This is my some codes:
¡¡
Public Const MAX_PATH = 260
Public Type FILETIME
dwLowDateTime As Long
dwHighDateTime As Long
End Type
Public Type WIN32_FIND_DATA
dwFileAttributes As Long
ftCreationTime As FILETIME
ftLastAccessTime As FILETIME
ftLastWriteTime As FILETIME
nFileSizeHigh As Long
nFileSizeLow As Long
cFileName As String * MAX_PATH
End Type
Public Declare Function CeFindFirstFile Lib "rapi.dll" (ByVal hFile As
String, Info As WIN32_FIND_DATA) As Long
¡¡
¡¡
Private Sub Command1_Click()
If RapiConnect Then
Dim fileInfo As WIN32_FIND_DATA
Dim lResult As long
lResult = CeFindFirstFile("\tes1.xml", fileInfo)
¡¡
¡¡
RapiDisconnect
End If
End Sub
Why "lResult" alway return -1 (Error Code:18 )? "test1.xml" is exist in my
PPC's root directory.