webForumDet fria alternativet

Problem array i Visual Basic Net 2010?

0 svar · 400 visningar · startad av Dr-man

Dr-manMedlem sedan juli 2002732 inlägg
#1

Hur läser jag in värden från DirListView.Items till en array enligt koden nedanför?
Jag har försökt att göra det med variablen filearr, men får det ej att fungera.
Inga värden blir lagrade i arrayen, men inga felmeddelanden dyker inte heller upp.

check=0        

For Each Item In DirListView.Items
            CurrentFile = Item.ToString
            Dim NewPosition As Integer = CurrentFile.LastIndexOf("{")
            Dim NewFile As String = CurrentFile.Substring(NewPosition + 1)

            NewFile = NewFile.Remove(NewFile.Length - 1)
            NewFile2 = LabelOption4.Text + "\" + DirTreeView.SelectedNode.Text + "\" + NewFile
            NewFile3 = NewFile + " "
            filearr(check3) = NewFile
            check3 = check3 + 1
            'MsgBox(LabelOption3.Text + "/" + DirTreeView.SelectedNode.Text + "/")

            Dim request2 As System.Net.FtpWebRequest = DirectCast(System.Net.WebRequest.Create(LabelOption3.Text + "/" + DirTreeView.SelectedNode.Text + "/" + NewFile), System.Net.FtpWebRequest)
            request2.Credentials = New System.Net.NetworkCredential(LabelOption.Text, LabelOption2.Text)
            request2.Method = System.Net.WebRequestMethods.Ftp.UploadFile
            Dim file3() As Byte = System.IO.File.ReadAllBytes(NewFile2)
            Dim str As System.IO.Stream = request2.GetRequestStream
            str.Write(file3, 0, file3.Length)
            str.Close()
            str.Dispose()
            'MsgBox("Transfer")
        Next
134 ms totalt · 3 externa anrop · v20260731065814-full.3ab8d573
131 ms — hämta forumlista (db)
0 ms — hämta statistik (cache)
131 ms — hämta tråd, inlägg och bilagor (db)