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

نسخة كاملة : كم البرمجة مريحة لو نعرفها
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمة الله و بركاته
كنت  حين اود معرفة اسم ملف لتحميله اكتب اكوادا كثيرة ثم استخدم Regex لاستخلاص اسم الملف وشغل كثير ...في حين ان الحل بكود بسيط جدا !!!!!!!
كود :
Private Function getfilename(ByVal url As String) As String
       Dim wc2 As New WebClient
       wc2.OpenRead(url)
       Dim cd As String = wc2.ResponseHeaders("Content-Disposition").ToString
       Return New ContentDisposition(cd).FileName
   End Function

اجراءات مهمة باكواد بسيطةSmile