تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] كود لمعرفة الحاسوب متصل بالشبكة أم لا
#11
شوف اخي الكريم باذن الله ساعمل مثال بسيط عن تحميل عدد معين من صفحات المنتدى وساستخدم باذن الله Backgoundworker و Progressbar و Lable
طبعا استخدام او تمرير قيم لاي اداة في مسار آخر ممنوع في تقنية الـThreading (اتحدث بتعبيري الخاص) والحل بناء اجراءات خاصة بالمثال.
إنتظر...

حتى لا اتاخر عليك هذا مثال بسيط للفكرة:
PHP كود :
'إجراء اسناد قيمة لاداة الليبل الاولى
    Private Sub lbl1(ByVal l As String)
        If lbltitle.InvokeRequired Then
            lbltitle.Invoke(New Action(Of String)(AddressOf lbl1), l)
        Else
            lbltitle.Text = l
        End If
    End Sub


    '
إجراء اسناد قيمة لاداة الليبل الثانية
    Private Sub lbl2
(ByVal l As String)
 
       If lblprog.InvokeRequired Then
            lblprog
.Invoke(New Action(Of String)(AddressOf lbl2), l)
 
       Else
            lblprog
.Text l
        End 
If
 
   End Sub



    
'إجراء اسناد قيمة لاداة Progressbar 
    Private Sub prp(ByVal l As Integer)
        If ProgressBar1.InvokeRequired Then
            ProgressBar1.Invoke(New Action(Of Integer)(AddressOf prp), l)
        Else
            ProgressBar1.Value = l
        End If
    End Sub

    '
اجراء تفعيل زالزر الاول
    Private Sub btn1
(ByVal l As Boolean)
 
       If Button1.InvokeRequired Then
            Button1
.Invoke(New Action(Of Boolean)(AddressOf btn1), l)
 
       Else
            Button1
.Enabled l
        End 
If
 
   End Sub

    
'اجراء تفعيل زالزر الثاني
    Private Sub btn2(ByVal l As Boolean)
        If Button2.InvokeRequired Then
            Button2.Invoke(New Action(Of Boolean)(AddressOf btn1), l)
        Else
            Button2.Enabled = l
        End If
    End Sub 

المهم الفكرة وليس التطبيق لان التطبيق يختلف انظر لكيفية مناداة الاجراءات
PHP كود :
           Dim url As String "http://vb4arb.com/vb/thread-" ".html"
 
           lbl1(url)
 
           lbl2(" __ " ProgressBar1.Maximum
لاحظ lbl1,lbl2
هذي ببساطة كل الفكرة

المرفق مثال بسيط جدا قم بتفحص الكود بشكل دقيق فكله يعتمد التعامل مع Thread


الملفات المرفقة
.zip   Testing_Bgw.zip (الحجم : 192.37 ك ب / التحميلات : 27)
الرد }}}
تم الشكر بواسطة: elgokr , sniperjawadino , ابو روضة
#12
سأجتهد في فهم الكود
شكرا كثيرا أخي سعود على مجهودك
الرد }}}
تم الشكر بواسطة: سعود , elgokr , elgokr
#13
(04-06-19, 07:45 PM)سعود كتب : المهم الفكرة وليس التطبيق لان التطبيق يختلف انظر لكيفية مناداة الاجراءات

هذي ببساطة كل الفكرة

المرفق مثال بسيط جدا قم بتفحص الكود بشكل دقيق فكله يعتمد التعامل مع Thread



طريقة جميلة لتحميل الصفحات أخى سعود جداً.
الرد }}}
تم الشكر بواسطة: سعود , elgokr
#14
(06-06-19, 09:53 PM)sniperjawadino كتب : سأجتهد في فهم الكود
شكرا كثيرا أخي سعود على مجهودك

العفو اخي الكريم
اذا ستجدها سهلة جدا وتوجد عدة حيل او طرق لها لكن افضل هذه على غيرها.

(07-06-19, 01:06 AM)ابو روضة كتب :
(04-06-19, 07:45 PM)سعود كتب : المهم الفكرة وليس التطبيق لان التطبيق يختلف انظر لكيفية مناداة الاجراءات

هذي ببساطة كل الفكرة

المرفق مثال بسيط جدا قم بتفحص الكود بشكل دقيق فكله يعتمد التعامل مع Thread



طريقة جميلة لتحميل الصفحات أخى سعود جداً.

لكن ليست الافضل لان بهذه الطريقة ستظل الصفحات مرتبطة بالموقع  الاصلي افضل شيء استخدام تحميل النصوص او الـ source والتعامل مع كل النودز والارتباطات وغيرها
بحيث نحمل ما يمكن تحميله وتعديل الارتباط ليكون محليا.
الرد }}}
تم الشكر بواسطة: ابو روضة , elgokr , elgokr
#15
(07-06-19, 01:15 AM)سعود كتب : لكن ليست الافضل لان بهذه الطريقة ستظل الصفحات مرتبطة بالموقع  الاصلي افضل شيء استخدام تحميل النصوص او الـ source والتعامل مع كل النودز والارتباطات وغيرها
بحيث نحمل ما يمكن تحميله وتعديل الارتباط ليكون محليا.

فعلا أخى وانا ايضا تعملت الطريقة الثانية هذه من موضوع  HtmlAgilityPa وتعلمت منه الكثر والكثير بفضل الله ثم أنت...
لو تكرمت ممكن تلقى نظره هنا

مشكلة فى جلب كامل الصفحة
الرد }}}
تم الشكر بواسطة: elgokr


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مشكلة تعليق البرنامج في حال عدم وجود ماسح ضوئي متصل بالكمبيوتر صالح عبدالله 1 212 09-01-24, 10:51 PM
آخر رد: صالح عبدالله
  [VB.NET] برنامجي يتصل بالشبكة flawer69 0 241 07-09-23, 07:41 PM
آخر رد: flawer69
  [سؤال] هل يوجد كود لمعرفة المدخلات في textbox هل هي نص ام رقم mh66 2 640 27-05-22, 09:11 AM
آخر رد: أبو خالد الشكري
  المساعدة في بناء جملة استعلام لمعرفة رصيد الموظف في تاريخ معين strongriseman 7 1,450 09-05-22, 02:00 AM
آخر رد: ابو انس
  معنى بعض هذه الفنكشن في السيكوال سيرفر لمعرفة عمل كل منها ابراهيم ايبو 8 1,540 13-02-22, 12:18 AM
آخر رد: asmarsou
Exclamation [VB.NET] اتصال مع Sql Server من جهاز متصل بالـ Lan Doctor GME 1 1,057 15-04-21, 06:11 PM
آخر رد: Doctor GME
  [VB.NET] مشكلة في البرنامج عند انهاء تثبيت في الحاسوب rochdi191 4 1,662 11-06-20, 08:08 PM
آخر رد: rochdi191
  [VB.NET] كيف يتم حفظ صورة في datagridiew غير متصل بقاعدة البيانات rochdi191 5 1,627 14-05-20, 08:30 PM
آخر رد: rochdi191
  ظهور التارخ بشكل متصل Moneam 6 2,080 28-03-20, 02:32 PM
آخر رد: WaeLx
  افضل طريقة لمعرفة افضل المنتجات مبيعا mostafa nada 6 2,102 16-03-20, 03:29 AM
آخر رد: mostafa nada

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


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