Merhabalar şimdi şöyle kıl bır problem var
Kodun tamamı budur.Şimdi sorum şu
Dosyalar indirilmeye başlandığında linkin var olduğu index ile isimlendirilip indiriliyor.Yani 0,1,2,3,4,5 vs vs
Ama ben listbox daki o yazının sonundaki 10 kelimeyi alarak isimlendirilmesini istiyorum
Kod doğru gözüküyor ama inatla 0,1,2,3,4 koyuyor.Varmıdır fikri olan
HTML:
Do Until Label15.Text = ListBox2.Items.Count
Try
Dim s As String = ListBox2.Items(Label15.Text).ToString.Substring(ListBox2.SelectedItem.Length - 15)
Label12.Text = s
Catch
End Try
My.Computer.Network.DownloadFile _
(ListBox2.Items(Label15.Text), _
TextBox1.Text & "\" & Label12.Text & ".jpg")
Label15.Text = Label15.Text + 1
Try
ListBox2.SelectedItem(Label15.Text) = True
Catch ex As Exception
End Try
Loop
MsgBox("Tüm dosyalar başarıyla indirildi.", MsgBoxStyle.Information, "")Kodun tamamı budur.Şimdi sorum şu
Dosyalar indirilmeye başlandığında linkin var olduğu index ile isimlendirilip indiriliyor.Yani 0,1,2,3,4,5 vs vs
Ama ben listbox daki o yazının sonundaki 10 kelimeyi alarak isimlendirilmesini istiyorum
Kod doğru gözüküyor ama inatla 0,1,2,3,4 koyuyor.Varmıdır fikri olan
