[Source] Autodetect [Function For USB Explorer]

Promotion Feb 28, 2013

  1. Promotion

    Promotion Banned
    0/47

    Joined:
    Feb 18, 2013
    Messages:
    231
    Likes Received:
    142
    Trophy Points:
    0
    Console:
    Xbox
    i have been playing around with this all night and got it to autodetect the usb but i couldnt figure out how to have it show the directories, I am releasing in hope maybe someone on here could figure it out.​


    Code:
       Public Shared Function autodetect() As String
            If (System.IO.Directory.Exists("/media")) Then
                Dim array1 As String() = System.IO.Directory.GetDirectories("/media")
                Dim num1 As Integer = 0
                Do While Not (((num1 > (array1.Length() - 1))))
                    If (System.IO.Directory.Exists(array1(num1) & "/Xbox360")) Then
                        Return array1(num1) & "/Xbox360"
                    End If
                    num1 = (num1 + 1)
                Loop
            End If
            Dim array2 As String() = New String(25) {}
            array2(0) = "A"
            array2(1) = "B"
            array2(2) = "C"
            array2(3) = "D"
            array2(4) = "E"
            array2(5) = "F"
            array2(6) = "G"
            array2(7) = "H"
            array2(8) = "I"
            array2(9) = "J"
            array2(10) = "K"
            array2(11) = "L"
            array2(12) = "M"
            array2(13) = "N"
            array2(14) = "O"
            array2(15) = "P"
            array2(16) = "Q"
            array2(17) = "R"
            array2(18) = "S"
            array2(19) = "T"
            array2(20) = "U"
            array2(21) = "V"
            array2(22) = "W"
            array2(23) = "X"
            array2(24) = "Y"
            array2(25) = "Z"
            Dim num2 As Integer = 0
            Do While Not (((num2 > (array2.Length() - 1))))
                If (System.IO.File.Exists(array2(num2) & ":/Xbox360/Data0000")) Then
                    Return array2(num2) & ":/Xbox360/"
                End If
                num2 = (num2 + 1)
            Loop
            Return "no"
        End Function
     
    • Like Like x 1
  2. TXTuts

    TXTuts Newbie
    0/47

    Joined:
    Jan 24, 2013
    Messages:
    11
    Likes Received:
    3
    Trophy Points:
    0
    Console:
    Xbox
    in Order for it to show directories you need to make a listview or a treeview and add this to the tree or listview code:


    autodetect()
    For Each i As String In Directory.GetFiles("Drive Letter here:/")
    ListView1.Items.Add(Path.GetFileName(i))
    Next
     

Share This Page

Close