تقييم الموضوع :
  • 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

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعدة في موقع panels على الفورم ؟؟؟ abdullhadi999 1 25 منذ 1 ساعه مضت
آخر رد: princelovelorn
  [VB.NET] استفسار :- هل صحيح كتابه الكود بهذه الطريقه dubai.eig 8 167 14-02-19, 06:52 PM
آخر رد: ابراهيم ايبو
  [Acces2007] كيف يمكن استخدام اداة WebBrowser4 داخل الاكسز بدون حفظ الروابط المستخدمة على الجهاز come2playati 0 34 05-02-19, 09:04 PM
آخر رد: come2playati
  مطلوب عرض تفاصيل بيانات داخل Texbox عن طريق ListView ... احتاج كود استعلام mohamedgadain61 9 263 30-01-19, 06:42 AM
آخر رد: حريف برمجة
  مطلوب معاينة المثال والمساعدة في تعديل الكود وفقكم الله فراس الغزي 8 230 29-01-19, 10:43 PM
آخر رد: فراس الغزي
  طلب تعديل كود استعلام new_programer 2 93 25-01-19, 11:44 PM
آخر رد: حريف برمجة
  تعديل مثال العملاء الغير مسددين القسط new_programer 7 292 25-01-19, 08:40 PM
آخر رد: new_programer
  هل يمكن اقتناص رابط الفيديو bidaya 12 416 23-01-19, 03:21 PM
آخر رد: elgokr
  [SQL] مطلوب تعديل كود الاستعلام من جدولين غير مرتبطين فراس الغزي 10 328 18-01-19, 11:05 PM
آخر رد: asemshahen5
  [VB.NET] محتاج التعديل على الكود dubai.eig 1 164 17-01-19, 09:50 AM
آخر رد: dubai.eig

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


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