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

نسخة كاملة : رفع صورة لاستضافة أون لاين .أغلب الأكواد لا تعمل لنفس السبب
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم 
أحاول رفع صورة من جهازى الى استضافة أون لاين
استخدمت الكود التالى :
كود :
       My.Computer.Network.UploadFile("77.jpg", "ftp://--- Domain Nmae --/77.jpg", "User", "Password", True, 48000)
 للأسف لم يصلح
فاستخدمت الكود التالى :
كود :
    Try
           Dim request As System.Net.FtpWebRequest = DirectCast(System.Net.WebRequest.Create("ftp://--- Domain Nmae --/77.jpg"), System.Net.FtpWebRequest)
           request.Credentials = New System.Net.NetworkCredential("User", "Password")
           request.Method = System.Net.WebRequestMethods.Ftp.UploadFile
           Dim file() As Byte = System.IO.File.ReadAllBytes("D:\77.jpg")
           Dim strz As System.IO.Stream = request.GetRequestStream()
           strz.Write(file, 0, file.Length)
           strz.Close()
           strz.Dispose()
           MsgBox("File uploaded !!")
       Catch ex As Exception
           MsgBox(ex.Message)
       End Try
 للأسف لم يصلح أيضا !!
 ... 
فى كل مرة يعطينى نفس رسالة الخطأ و هى :


أرجو الافادة و االمساعدة .. تقبلوا خالص التحية
كود :
My.Computer.Network.UploadFile("C:\folder\77.jpg", "ftp://files.********/77.jpg", "User", "Password", True, 48000)
تم بالفعل و بنجاح ..