09-09-16, 06:23 PM
الصفحات : 1 2
09-09-16, 07:34 PM
الووووووووووو
09-09-16, 07:37 PM
PHP كود :
wc.DownloadFile(New System.Uri("http://dl.dropboxusercontent.com/s/j100zeaj8csst22/MyDB.accdb"), Application.StartupPath & "\MyDB.accdb")
09-09-16, 07:52 PM
(09-09-16, 07:37 PM)سعود كتب : [ -> ]PHP كود :
wc.DownloadFile(New System.Uri("http://dl.dropboxusercontent.com/s/j100zeaj8csst22/MyDB.accdb"), Application.StartupPath & "\MyDB.accdb")
شكراااااااااا شغال
09-09-16, 08:06 PM
بس الاحداث ماتشتغل
كذا واذا اشتغلت مايحمل
كذا واذا اشتغلت مايحمل
09-09-16, 08:26 PM
(09-09-16, 08:06 PM)سعود كتب : [ -> ]بس الاحداث ماتشتغلكذا واذا اشتغلت مايحمل
اه صحيح كلامك بس انا غير الكلمة دى باكلمة دى وشتغل wc.DownloadFileAsync
بس الرساله مش بتيجى بعد التحميل
MsgBox("تم التحميل ")
09-09-16, 10:49 PM
هذا مثال تحميل ملف مع عرض شريط التقدم ProgressBar
كود :
Public Class Form1
Private WithEvents wc As New Net.WebClient
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
wc.DownloadFileAsync(New System.Uri("http://dl.dropboxusercontent.com/s/j100zeaj8csst22/MyDB.accdb"), Application.StartupPath & "\MyDB.accdb")
End Sub
Private Sub wc_DownloadProgressChanged(ByVal sender As Object, ByVal e As System.Net.DownloadProgressChangedEventArgs) Handles wc.DownloadProgressChanged
Me.ProgressBar1.Value = e.ProgressPercentage
End Sub
Private Sub wc_DownloadFileCompleted(ByVal sender As Object, ByVal e As System.ComponentModel.AsyncCompletedEventArgs) Handles wc.DownloadFileCompleted
MsgBox("تم التحميل ")
End Sub
End Class10-09-16, 12:56 AM
(09-09-16, 10:49 PM)ممدوح كتب : [ -> ]هذا مثال تحميل ملف مع عرض شريط التقدم ProgressBar
كود :
Public Class Form1
Private WithEvents wc As New Net.WebClient
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
wc.DownloadFileAsync(New System.Uri("http://dl.dropboxusercontent.com/s/j100zeaj8csst22/MyDB.accdb"), Application.StartupPath & "\MyDB.accdb")
End Sub
Private Sub wc_DownloadProgressChanged(ByVal sender As Object, ByVal e As System.Net.DownloadProgressChangedEventArgs) Handles wc.DownloadProgressChanged
Me.ProgressBar1.Value = e.ProgressPercentage
End Sub
Private Sub wc_DownloadFileCompleted(ByVal sender As Object, ByVal e As System.ComponentModel.AsyncCompletedEventArgs) Handles wc.DownloadFileCompleted
MsgBox("تم التحميل ")
End Sub
End Class
شكراااااااااااااااااا لك
08-12-16, 05:51 PM
بببووووووووووووركت اخي ممدوح
10-02-19, 01:32 PM
السلام عليكم هل من الممكن وضع الملف في مسار d مثلا
الصفحات : 1 2