ISDBDevice::CopyFile: Difference between revisions

From MediaMonkey Wiki
Jump to navigation Jump to search
(Created page with "{{MethodDeclaration|SDBDevice|ISDBDevice|Sub CopyFile(DeviceHandle As Long, Source As String, Destination as String)}} ===Parameters=== {{MethodParameters |DeviceHandle |Long...")
 
No edit summary
 
Line 11: Line 11:


Copies file to device.
Copies file to device.
{{Introduced|4.1.1}}


===Example===
===Example===

Latest revision as of 12:56, 31 March 2014

CoClass SDBDevice, Interface ISDBDevice

Sub CopyFile(DeviceHandle As Long, Source As String, Destination as String)


Parameters

Name Type Description
DeviceHandle Long Handle of the device
Source String Source file path on PC
Destination String Destination file path on the device


Method description

Copies file to device.

Introduced in MediaMonkey version 4.1.1.


Example

Option Explicit
 
Dim UI  : Set UI = SDB.UI
 
Sub OnStartUp()
    Dim mnuTest
    Set mnuTest = SDB.UI.AddMenuItem(SDB.UI.Menu_Edit, 0, 0)
    mnuTest.Caption = SDB.Localize("Copy file to iPhone")
    mnuTest.OnClickFunc = "SDBOnClick"
    mnuTest.UseScript = Script.ScriptPath
    Script.RegisterEvent SDB, "OnDeviceFileCopied", "SDBDeviceFileCopied"    
End Sub
   
Dim DeviceHandle : DeviceHandle = -1   
   
Sub SDBOnClick(Item)     
  Dim Devices : Set Devices = SDB.Device.ActiveDeviceList("VID_05AC&PID_129E")
  Dim i : i = 0 
  For i = 0 To Devices.Count-1
	   If Devices.DeviceHandle(i) <> -1 Then
		   DeviceHandle = Devices.DeviceHandle(i)
	   End If
  Next
  
  SDB.Device.CopyFile DeviceHandle, "C:\Temp\MyFile.wmv", "/Temp/MyFile.wmv"
End Sub

Sub SDBDeviceFileCopied( DeviceHandle, Src, Dest, Success)
    if Success then
      MsgBox("File copied successfuly from "&Src&" to "&Dest)
    else
      MsgBox("File failed to copy from "&Src&" to "&Dest)
    end if    
End Sub