04-09-17, 03:57 PM
السلام عليكم ورحمة الله و بركاته
كنت حين اود معرفة اسم ملف لتحميله اكتب اكوادا كثيرة ثم استخدم Regex لاستخلاص اسم الملف وشغل كثير ...في حين ان الحل بكود بسيط جدا !!!!!!!
اجراءات مهمة باكواد بسيطة
كنت حين اود معرفة اسم ملف لتحميله اكتب اكوادا كثيرة ثم استخدم 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اجراءات مهمة باكواد بسيطة
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير

