تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] طلب تعديل علي رابط موقع داخل الكود
#1
السلام عليكم ورحمة الله وبركاته

كنت عايز اطبق فكره بس وقفت علي شئ

برجاء تعديل الكود

كود :
Try
           progressValueLabel.ResetText()
           remainingValueLabel.ResetText()
           downloadProgressBar.Value = downloadProgressBar.Minimum

           ScreamUpdate = New List(Of update)({New update With {.DataSize = 0, .Time = Date.Now}})

           downloader.DownloadFileAsync(New Uri("http://egyman.net:1978/get.php?username=700700&password=700700&type=m3u&output=ts"), Application.StartupPath & "\Extreme.m3u", True) ' You can use link Example: http://www.mysite.com/File.exe  (Link Direct...)
       Catch ex As Exception
           MessageBox.Show(ex.ToString(), "Download Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
       End Try

محتاج الرابط دا 

كود :
http://egyman.net:1978/get.php?username=700700&password=700700&type=m3u&output=ts


ياخد بياناته من عدة textbox

اولا
egyman.net
ياخد قيمته من 
TextBox1.Text
ثانيا
700700 الاولي الخاصه باليوزر نيم
تاخد قيمتها من
TextBox2.Text
ثالثا
1978
ياخد قيمته من
TextBox3.Text
رابعا
700700 الاخيره الخاصة بالباسورد
تاخد قيمتها من 
TextBox4.Text

طبعا الكود دا من بوتون 1 في الحدث كليك
برجاء الافادة
وشكرا
الرد
تم الشكر بواسطة:
#2
كود :
Try
   progressValueLabel.ResetText()
   remainingValueLabel.ResetText()
   downloadProgressBar.Value = downloadProgressBar.Minimum

   ScreamUpdate = New List(Of update)({New update With {.DataSize = 0, .Time = Date.Now}})

   Dim url As String = "http://" & TextBox1.Text & ":" & TextBox3.Text & "/get.php?username=" & TextBox2.Text & "&password=" & TextBox4.Text & "&type=m3u&output=ts"
   Dim filename As String = Application.StartupPath & "\Extreme.m3u"
   downloader.DownloadFileAsync(New Uri(url), filename, True) ' You can use link Example: http://www.mysite.com/File.exe  (Link Direct...)

Catch ex As Exception
   MessageBox.Show(ex.ToString(), "Download Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
الرد
تم الشكر بواسطة: elgokr , elgokr , ScreamVoice
#3
(04-11-18, 09:16 AM)rmnr كتب :
كود :
Try
   progressValueLabel.ResetText()
   remainingValueLabel.ResetText()
   downloadProgressBar.Value = downloadProgressBar.Minimum

   ScreamUpdate = New List(Of update)({New update With {.DataSize = 0, .Time = Date.Now}})

   Dim url As String = "http://" & TextBox1.Text & ":" & TextBox3.Text & "/get.php?username=" & TextBox2.Text & "&password=" & TextBox4.Text & "&type=m3u&output=ts"
   Dim filename As String = Application.StartupPath & "\Extreme.m3u"
   downloader.DownloadFileAsync(New Uri(url), filename, True) ' You can use link Example: http://www.mysite.com/File.exe  (Link Direct...)

Catch ex As Exception
   MessageBox.Show(ex.ToString(), "Download Error", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try


تسلم ايدك يا كبير 

الفكره كانت في دماغي بالشكل دا بس معرفتش انفذها 

ههههههههه

البرنامج فكرته عبارة عن 

اختبار لاكواد اكستريم IPTV

بحثت كتيير اوي علي النت علي برنامج يقوم باختبار الاكواد علي الكمبيوتر بس للاسف ملقتش ولا برنامج

فكرت اعمل برنامج يقوم بعمل تيست للكود وتحميل ملف ال IPTV

رابط البرنامج للتجربه 

http://gulfup.co/xn9af2suyb8s

مطلوب الراي في البرنامج
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  الدخول الو موقع mediafire bidaya 1 62 25-05-19, 03:26 AM
آخر رد: bidaya
  [VB.NET] حدث تعديل الخلية محمد اسماعيل 5 85 19-05-19, 03:57 AM
آخر رد: elgokr
  [سؤال] سلام سؤال تحويل رابط حاتمي 5 107 16-05-19, 02:29 PM
آخر رد: elgokr
  ماهو الكود الصحيح و العملي لهذا kador 12 370 12-05-19, 05:07 PM
آخر رد: elgokr
  [VB.NET] تعديل اكتر من صف بقاعدة البيانات محمد اسماعيل 7 209 11-05-19, 09:21 PM
آخر رد: elgokr
  [VB.NET] تعديل على كود Split DK-x 3 112 11-05-19, 04:44 PM
آخر رد: elgokr
  [سؤال] كيف يمكنني الحصول علي رابط داخل كود جافا من خلال الويب براوزر dametucorazon 0 41 11-05-19, 06:10 AM
آخر رد: dametucorazon
Photo مطلوب كود لتقسيم نص لعدة نصوص من داخل ملف نصي Top King 8 204 07-05-19, 06:15 PM
آخر رد: asemshahen5
  [VB.NET] محتاج تعديل على الكود dubai.eig 2 87 07-05-19, 06:02 PM
آخر رد: dubai.eig
  [VB.NET] تحويل الكود من اكسس لsql اسامه الهرماوي 6 153 03-05-19, 01:29 AM
آخر رد: saoud2

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم