منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] كيف عمل هذا الفورم لعرض هذا النتائج به - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] كيف عمل هذا الفورم لعرض هذا النتائج به (/showthread.php?tid=2334)

الصفحات: 1 2

كيف عمل هذا الفورم لعرض هذا النتائج به - elgokr - 22-03-14

السلام عليكم ورحمة الله

اخبركم جميعاً
وحياكم الله وجعل للجميع الكثير من الحسنات التى لا تنتهى لمساعدتكم للجميع

انا بحاجة لعمل هذا الشكل كما بالصورة...


كل الفكرة ان انا محتاج اول ما اضغط على Button
يعرض وليكن كلمة Waiting... لحد ما يعمل جلب للنتائج
ثم بعد ذلك عرض الارقام كما فى الصورة Undecided

بحثت كتير بكل الطرق ولم اجد ولو كلمة عن الموضوع دا
وما ليا الا الله ثم انتم وبحاجة لمساعدتكم واكون شاكر لكم

اتمنا اجد الاجابة بينكم شكراً للكميع على كل حال Smile

فى امان الله Heart


RE: كيف عمل هذا الفورم لعرض هذا النتائج به - محمد محمد - 22-03-14

متابع Big Grin

RE: كيف عمل هذا الفورم لعرض هذا النتائج به - Genius Live - 22-03-14

ابحث عن إستخدام NetworkInformation
مثال
PHP كود :
Imports System.Net.NetworkInformation 
PHP كود :
Dim A() As NetworkInterface = NetworkInterface.GetAllNetworkInterfaces
TextBox1.Text = A(0).Speed 

والله أعلي وأعلم
RolleyesRolleyesRolleyes

RE: كيف عمل هذا الفورم لعرض هذا النتائج به - elgokr - 22-03-14

(22-03-14, 08:48 PM)Genius Live كتب : ابحث عن إستخدام NetworkInformation
مثال
PHP كود :
Imports System.Net.NetworkInformation 
PHP كود :
Dim A() As NetworkInterface = NetworkInterface.GetAllNetworkInterfaces
TextBox1.Text = A(0).Speed 

والله أعلي وأعلم
RolleyesRolleyesRolleyes

تسلم يا @Genius Live

بس للاسف مش دا الكود اللى بحاجة اليه انا على علم بدا
والنتيجة ثابتة دائماً لانها بتقوم بعرض قيمة 10/100/1000MB

وليس سرعة الاتصال الانترنت نفسه Sad

فى انتظار افادة وهاعمل على نصيحتك بالبحث داخل NetworkInformation
واتمنى احد يساهم ولو بجزء فى الوصول لذلك Blush

RE: كيف عمل هذا الفورم لعرض هذا النتائج به - elgokr - 23-03-14

Up and ..

Code Ping:
كود :
TextBox1.Text = GetPingTime("www.google.com.eg")

متبقى كودين Sad


RE: كيف عمل هذا الفورم لعرض هذا النتائج به - الشاكي لله - 23-03-14

الكودين الثانيين تحتاج فيهم الى استعمال سيرفر

وليس اي سيرفر ، لازك سيرفر سرعة أتصاله اكبر من من جميع المستخدمين
حتى يعطيك نتائج صحيحة


انا افضل استخدام HttpWebRequset مع موقع speedtest.net لجلب النتائج من الموقع

ربما اكتب مثال لاحقا بس اخلص شغلي

RE: كيف عمل هذا الفورم لعرض هذا النتائج به - elgokr - 23-03-14

اشكرك على تواجدك اخ الكريم
ياريت لو امكن الطريقة

وشكراً لك لتواجدك

RE: كيف عمل هذا الفورم لعرض هذا النتائج به - prj - 23-03-14

السلام عليكم

انظر لهذا المثال

RE: كيف عمل هذا الفورم لعرض هذا النتائج به - elgokr - 25-03-14

تسلم prj حبيبى

هو المشروع #C وانا باحتياج VB.NET
وتقريباً هو مش بيظهر النتيجة لانه 0 ديماً باختبار المشروع
بس تسلم ق ا قلبى على مساعدتك فى محاولى المساعدة

RE: كيف عمل هذا الفورم لعرض هذا النتائج به - prj - 25-03-14

السلام عليكم
البرنامج يعمل بالشكل المطلوب لكن يلزمك ثلاثة امور لتر النتيجه
  • اولا: تحديد من القائمة الشبكة المتصلة بالويب
  • ثانيا: تحميل ملف من الويب
  • ثالثا: رفع ملف الى الويب



ولكي تصنع البرنامج الذي تريد انت يجب عليك في زر الاختبار ان تعمل:
  • اولا: تحميل اي ملف من الويب حتى لو كان حجمه 1 ميجا وتضعه في مجلد مؤقت لكي تختبر سرعه التحميل
  • ثانيا: ان ترفع ملف الى الويب (موقع خاص او عام ايا كان) لتختبر سرعه الرفع

لن تستطيع عمل برنامج اختبار دون فعل ما ذكرت