It should be so simple, but it's not working.
I have made a simple program (almost the example):
I want to copy the file LGXVRDmu.CSV from my device (in \My Documents) to my desktop computer. I am using activesync and it's connected OK.
Two problems:
1. my programs says 'cannot connect to device.'
2. if i delete this check (rapi.isconneted=true) I get a new error that he can not write.
Sub Button2_Click
rapi.New1
rapi.Connect
t = Now '3 seconds timeout.
Do Until rapi.IsConnected = true
DoEvents
If (Now - t)/cTicksPerSecond > 3 Then
Msgbox("Cannot connect to device.")
AppClose
End If
Loop
If rapi.DeviceFileExists("\My Documents\LGXVRDmu.CSV") = true Then
rapi.CopyFileFromDevice1("\My Documents\LGXVRDmu.CSV",AppPath)
End If
End Sub
I have made a simple program (almost the example):
I want to copy the file LGXVRDmu.CSV from my device (in \My Documents) to my desktop computer. I am using activesync and it's connected OK.
Two problems:
1. my programs says 'cannot connect to device.'
2. if i delete this check (rapi.isconneted=true) I get a new error that he can not write.
Sub Button2_Click
rapi.New1
rapi.Connect
t = Now '3 seconds timeout.
Do Until rapi.IsConnected = true
DoEvents
If (Now - t)/cTicksPerSecond > 3 Then
Msgbox("Cannot connect to device.")
AppClose
End If
Loop
If rapi.DeviceFileExists("\My Documents\LGXVRDmu.CSV") = true Then
rapi.CopyFileFromDevice1("\My Documents\LGXVRDmu.CSV",AppPath)
End If
End Sub