Using rapi from desktop to copy file from device to desktop

[sunnyboyj]

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

[Erel]

Did you connect the device before running the program? (you should)
Try to increase the time limit.

What is your ActiveSync version?

[sunnyboyj]

I have made it wait 10 secs; same problem.
The PPC is connected before starting the program.
I am using activesync 4.5
Strange...

[Erel]

You could try to uninstall and reinstall Activesync.
Another option is to use a different approach and send the file using Network library (based on Activesync connection).

[sunnyboyj]

I tried it but does not work. Then I cut my program in pieces:
I get the message 'connected'
I get the message 'file found' (so it can get the file when i start the program from desktop)
Then I get the error message, I think my syntax is just not correct:
Error is: Not a valid boolean (translated from Dutch error message).
I think I make an error copying from device (\My Documents\LGXVRDMU.CSV)
to my desktop: C:\downloads\

Form1.Show
rapi.New1
rapi.Connect
Sub Button2_Click
Msgbox ("Connected")

If rapi.DeviceFileExists("\My Documents\LGXVRDMU.CSV") = true Then
Msgbox("File Found")
rapi.CopyFileFromDevice2("\My Documents\LGXVRDMU.CSV","C:\downloads")
End If

End Sub

[Erel]

This code copies a file from the device to the desktop (to the current path):

Sub Globals
End Sub

Sub App_Start
    Form1.Show
    rapi.New1
    rapi.Connect
End Sub

Sub Rapi_Connected
    Msgbox("connected")
    If rapi.DeviceFileExists("\My Documents\a.exe") = true Then
        Msgbox("file exists")
        rapi.CopyFileFromDevice1("\My Documents\a.exe",AppPath)
    End If
End Sub

[PSRC]

and I want make the same but from on aplication on the device.

I execute the programe on the device and Iwant copy 1 file from the device to de c:\ directory???

[Erel]

It is not possible with the RAPI library.
You can use the Network library to send the file.

[PSRC]

Originally Posted by Erel

It is not possible with the RAPI library.
You can use the Network library to send the file.

Ok.
for exemple I have a secret file and on clik botton1 (using network) lib the file is copied from de device to the pc.
exemp:

FileCopy("pass.ert","c:\pass.ert") - but using the network

O I make this??????

sory mi inglish

[Erel]

See the FileTransfer example: http://www.basic4ppc.com/Downloads.html