اذهب الي المحتوي
أوفيسنا

طريقة اخفاء اكسس


الردود الموصى بها

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

اعزائي الافاضل برجاء مساعدتي في حل المشكلة البسيطة باذن الله عليكم 
عند اخفاء اكسس نضع كود في موديول جديد 

وهذا الكود حسب وع الاكسس 32 او 64 بت 

فهل هناك كود يستخدم بشكل تلقائي على النوعين 
بمعني اخر انا لو قفلت البرنامج على انه 32 بت وزميلي بالعمل لدية 64 بت يعطيني خطأ او العكس 
هل هناك طريقة للاخفاء على النظامين 

 

انا استخدم الدالة التالية 

32 بت 

  Private Declare Function apiShowWindow Lib "user32" _
        Alias "ShowWindow" (ByVal hwnd As Long, _
              ByVal nCmdShow As Long) As Long
              

64 بت 

  Private Declare PtrSafe Function apiShowWindow Lib "user32" _
        Alias "ShowWindow" (ByVal hwnd As Long, _
              ByVal nCmdShow As Long) As Long

 

الاختلاف فقط في اضافة PtrSafe للكود فهل هناك طريقة اخرى واسف على الاطالة 

رابط هذا التعليق
شارك

تفضل أخي الكريم @السنجري ، مرفق يحتوي مديولين لنفس الوظيفة ، متوافقين مع الإصدار للنواتين 32 و 64 .

في أحدهما كود لإخفاء آكسيس و كود لإعادة إظهار آكسيس مرة أخرى .

 

Hide & Show.accdb

رابط هذا التعليق
شارك

  • 2 weeks later...

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

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



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information