• 0
sameh awad

اظهار رسالة تنبيه الشبكة مفصولة تأكد من توصيل كابل الشبكة

سؤال

السلام عليكم 

نعانى فى بعض الاحيان من قطع الشبكة بالشركة مما  يؤدى الى اتصال المستخدمين بالمبرمج

لذا حاولنا حل المشكلة بادراج كود 

If Forms!MAIN_EntryForm!xy = "#Error" Then

MsgBox "الشبكة مفصولة ..........تأكد من توصيل الكابل "

Else

If Forms!MAIN_EntryForm!xy > 0 Then
MsgBox "برجاء اجراء التحديث  "
'And Forms!MAIN_EntryForm!the_user <> "sameh.awad"
End If
End If

لكن للأسف يعطى رسالة خطأ

Run time Error 

type mismatch

بحثت لا يقل عن 4 ساعات بالامس دون جدوى

فبرجاء المشاركة بالحل اما بتعديل الكود او أى حل بديل

label (2).rar

تم تعديل بواسطه sameh awad
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

0 إجابة على هذا السؤال .

لاتوجد إجابات على هذا السؤال حتى الآن .

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .