0

VB.NET を使用してビデオ コピー アプリケーションを作成しています。必要なファイルをパスから USB に簡単にコピーできますが、電話などのポータブル デバイスで同じことを行うのに問題があります。

これまでのところ、この質問に記載されているコードと DLL を使用して電話を見つけて接続することができましたが、ファイルをデバイスにコピーするのに問題があります。

これに関連するサブの私のコードは次のとおりです。

Imports System.IO
Imports PortableDevices

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        MsgBox("Please make sure that your device is connected! Press ok to continue", MsgBoxStyle.OkOnly)

        For Each item In listID.Items
            table = Universal.convertType(item.ToString.Remove(6), 1)
            colInitials = Universal.getStringUntilChar(table, "_")
            'Code to get the file path stored in sql and store it as filePath
            Dim filePath As New DirectoryInfo(SQL.getRecordedValue(table, 
            colInitials & "Location", colInitials & "ID", item.ToString.Remove(0, 6)))
            Dim folderName As String = filePath.Name
            ' build collection for the devices
            Dim pds As New PortableDeviceCollection
            ' get dev list
            pds.Refresh()
            For Each device In pds
                ' connect before doing stuff
                device.Connect()

                ' find out what treasures are stored here
                Dim root = device.GetContents()
                ' the root is the startingm root folder

                'Dont know what to do here

                ' disconnect from this device
                device.Disconnect()

            Next
            pds.First.Disconnect()

        Next
    End Sub
4

1 に答える 1