السلام عليكم ورحمة الله وبركاته
طريقة صنع Downloader بال VB.NET
طريقة سهلة تابع معي.....1-نصمم شكل البرنامج مع اضافة Save File Dialog
2-نضع اكواد اختيار مكان حفظ الملف
[rtl]SaveFileDialog1.Filter = "JPeg Image|*.jpg|.exe|*.exe|.rar|*.rar|.zip|*.zip|.mp3| *.mp3"
SaveFileDialog1.ShowDialog()
TextBox1.Text = SaveFileDialog1.FileName[/rtl]
3-نضع اكواد Download
[rtl]
Public WithEvents download As WebClient
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
download = New WebClient
download.DownloadFileAsync(New Uri(TextBox2.Text), TextBox1.Text)
End Sub[/rtl]
وجوب وضع بعض التعديلات4-اخر خطوة كود يجب وضعه في اي مكان بالفورم - الكود:
-
Private Sub download_DownloadProgressChanged(ByVal sender As Object, ByVal e As System.Net.DownloadProgressChangedEventArgs) Handles download.DownloadProgressChanged
ProgressBar1.Value = e.ProgressPercentage]
End Sub
الأحد 26 يناير 2014, 11:25 am
موضوع: طريقة صنع برنامج دونلودر بالفيجوال بيسك
