منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : مشكلة فى كود بيحمل ملف من على النت
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
مشكلة فى كود رابط بيحمل ملف من على النت

المشكلة عايز لما يحمل الملف ينزلو فى ملفات البرنامج ملفات البرنامج



الووووووووووو
PHP كود :
       wc.DownloadFile(New System.Uri("http://dl.dropboxusercontent.com/s/j100zeaj8csst22/MyDB.accdb"), Application.StartupPath "\MyDB.accdb"
(09-09-16, 07:37 PM)سعود كتب : [ -> ]
PHP كود :
       wc.DownloadFile(New System.Uri("http://dl.dropboxusercontent.com/s/j100zeaj8csst22/MyDB.accdb"), Application.StartupPath "\MyDB.accdb"

شكراااااااااا شغال
بس الاحداث ماتشتغلSad كذا واذا اشتغلت مايحملSad
(09-09-16, 08:06 PM)سعود كتب : [ -> ]بس الاحداث ماتشتغلSad كذا واذا اشتغلت مايحملSad

اه صحيح كلامك بس انا غير الكلمة دى باكلمة دى وشتغل         wc.DownloadFileAsync

بس الرساله مش بتيجى بعد التحميل


        MsgBox("تم التحميل ")
هذا مثال تحميل ملف مع عرض شريط التقدم 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
(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

شكراااااااااااااااااا لك
بببووووووووووووركت اخي ممدوح
السلام عليكم هل من الممكن وضع الملف في مسار d مثلا
الصفحات : 1 2