View Single Post
  #6 (permalink)  
Old 01-09-2008, 05:06 AM
Erel's Avatar
Erel Erel is offline
Administrator
 
Join Date: Apr 2007
Posts: 15,689
Awards Showcase
Basic4ppc Founder 
Total Awards: 1
Default

This code copies a file from the device to the desktop (to the current path):
Code:
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
Reply With Quote