You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
85 lines
4.3 KiB
85 lines
4.3 KiB
;1.0.3.0
|
|
|
|
EnableExplicit
|
|
|
|
Global PBEx_MTP
|
|
|
|
#PBEx_MTP_Type_File = 1
|
|
#PBEx_MTP_Type_Directory = 2
|
|
#PBEx_MTP_DeviceType_Generic = 0
|
|
#PBEx_MTP_DeviceType_Camera = 1
|
|
#PBEx_MTP_DeviceType_MediaPlayer = 2
|
|
#PBEx_MTP_DeviceType_Phone = 3
|
|
#PBEx_MTP_DeviceType_Video = 4
|
|
#PBEx_MTP_DeviceType_PersonalInformationManager = 5
|
|
#PBEx_MTP_DeviceType_AudioRecorder = 6
|
|
|
|
CompilerIf #PB_Compiler_Processor = #PB_Processor_x86
|
|
PBEx_MTP = OpenLibrary(#PB_Any, "PB.Ex_MTP_x86.dll")
|
|
CompilerElseIf #PB_Compiler_Processor = #PB_Processor_x64
|
|
PBEx_MTP = OpenLibrary(#PB_Any, "PB.Ex_MTP_x64.dll")
|
|
CompilerEndIf
|
|
|
|
If PBEx_MTP
|
|
Prototype ExamineMTP(ErrorOutput)
|
|
Global ExamineMTP.ExamineMTP = GetFunction(PBEx_MTP, "ExamineMTP")
|
|
Prototype NextMTPEntry(ErrorOutput)
|
|
Global NextMTPEntry.NextMTPEntry = GetFunction(PBEx_MTP, "NextMTPEntry")
|
|
Prototype FinishMTP(ErrorOutput)
|
|
Global FinishMTP.FinishMTP = GetFunction(PBEx_MTP, "FinishMTP")
|
|
Prototype MTPEntryName(Output, ErrorOutput)
|
|
Global MTPEntryName.MTPEntryName = GetFunction(PBEx_MTP, "MTPEntryName")
|
|
Prototype OpenMTP(ID, DeviceName.p-Unicode, ErrorOutput)
|
|
Global OpenMTP.OpenMTP = GetFunction(PBEx_MTP, "OpenMTP")
|
|
Prototype CloseMTP(ID, ErrorOutput)
|
|
Global CloseMTP.CloseMTP = GetFunction(PBEx_MTP, "CloseMTP")
|
|
Prototype IsMTP(ID, ErrorOutput)
|
|
Global IsMTP.IsMTP = GetFunction(PBEx_MTP, "IsMTP")
|
|
Prototype ExamineMTPDirectory(ID, ErrorOutput)
|
|
Global ExamineMTPDirectory.ExamineMTPDirectory = GetFunction(PBEx_MTP, "ExamineMTPDirectory")
|
|
Prototype FinishMTPDirectory(ID, ErrorOutput)
|
|
Global FinishMTPDirectory.FinishMTPDirectory = GetFunction(PBEx_MTP, "FinishMTPDirectory")
|
|
Prototype NextMTPDirectoryEntry(ID, ErrorOutput)
|
|
Global NextMTPDirectoryEntry.NextMTPDirectoryEntry = GetFunction(PBEx_MTP, "NextMTPDirectoryEntry")
|
|
Prototype MTPDirectoryEntryName(ID, Output, ErrorOutput)
|
|
Global MTPDirectoryEntryName.MTPDirectoryEntryName = GetFunction(PBEx_MTP, "MTPDirectoryEntryName")
|
|
Prototype SetMTPDirectory(ID, DirectoryPath.p-Unicode, ErrorOutput)
|
|
Global SetMTPDirectory.SetMTPDirectory = GetFunction(PBEx_MTP, "SetMTPDirectory")
|
|
Prototype GetMTPDirectory(ID, Output, ErrorOutput)
|
|
Global GetMTPDirectory.GetMTPDirectory = GetFunction(PBEx_MTP, "GetMTPDirectory")
|
|
Prototype MTPDirectoryEntryType(ID, ErrorOutput)
|
|
Global MTPDirectoryEntryType.MTPDirectoryEntryType = GetFunction(PBEx_MTP, "MTPDirectoryEntryType")
|
|
Prototype ReceiveMTPFile(ID, RemoteFileName.p-Unicode, FileName.p-Unicode, ErrorOutput)
|
|
Global ReceiveMTPFile.ReceiveMTPFile = GetFunction(PBEx_MTP, "ReceiveMTPFile")
|
|
Prototype MTPDirectoryEntrySize(ID, ErrorOutput)
|
|
Global MTPDirectoryEntrySize.MTPDirectoryEntrySize = GetFunction(PBEx_MTP, "MTPDirectoryEntrySize")
|
|
Prototype MTPDirectoryEntryDate(ID, ErrorOutput)
|
|
Global MTPDirectoryEntryDate.MTPDirectoryEntryDate = GetFunction(PBEx_MTP, "MTPDirectoryEntryDate")
|
|
Prototype GetMTPDescription(ID, Output, ErrorOutput)
|
|
Global GetMTPDescription.GetMTPDescription = GetFunction(PBEx_MTP, "GetMTPDescription")
|
|
Prototype GetMTPDeviceID(ID, Output, ErrorOutput)
|
|
Global GetMTPDeviceID.GetMTPDeviceID = GetFunction(PBEx_MTP, "GetMTPDeviceID")
|
|
Prototype GetMTPDeviceType(ID, ErrorOutput)
|
|
Global GetMTPDeviceType.GetMTPDeviceType = GetFunction(PBEx_MTP, "GetMTPDeviceType")
|
|
Prototype GetMTPFirmwareVersion(ID, Output, ErrorOutput)
|
|
Global GetMTPFirmwareVersion.GetMTPFirmwareVersion = GetFunction(PBEx_MTP, "GetMTPFirmwareVersion")
|
|
Prototype GetMTPFriendlyName(ID, Output, ErrorOutput)
|
|
Global GetMTPFriendlyName.GetMTPFriendlyName = GetFunction(PBEx_MTP, "GetMTPFriendlyName")
|
|
Prototype GetMTPManufacturer(ID, Output, ErrorOutput)
|
|
Global GetMTPManufacturer.GetMTPManufacturer = GetFunction(PBEx_MTP, "GetMTPManufacturer")
|
|
Prototype GetMTPModel(ID, Output, ErrorOutput)
|
|
Global GetMTPModel.GetMTPModel = GetFunction(PBEx_MTP, "GetMTPModel")
|
|
Prototype GetMTPPnPDeviceID(ID, Output, ErrorOutput)
|
|
Global GetMTPPnPDeviceID.GetMTPPnPDeviceID = GetFunction(PBEx_MTP, "GetMTPPnPDeviceID")
|
|
Prototype GetMTPSerialNumber(ID, Output, ErrorOutput)
|
|
Global GetMTPSerialNumber.GetMTPSerialNumber = GetFunction(PBEx_MTP, "GetMTPSerialNumber")
|
|
|
|
EndIf
|
|
; IDE Options = PureBasic 5.71 beta 1 LTS (Windows - x64)
|
|
; EnableXP
|
|
; EnableUser
|
|
; Executable = PB.Ex_MSSQL.exe
|
|
; CompileSourceDirectory
|
|
; EnableCompileCount = 450
|
|
; EnableBuildCount = 7
|
|
; EnableUnicode
|