طريقة اغلاق الاكسس واخفائة من شريط المهام وعرض النموذج فقط

[بندر بن محمد]

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

 

ارجو من اهل الخبره افادتي بطريقة اغلاق الاكسس من سطح المكتب وشريط المهام واظهار النماذج فقط بحيث يتعامل المستخدم مع النماذج فقط بدون امكانية التعديل على قاعدة البيانات

طبقت هذا الدرس ولكن لا يختفي الاكسس من شريط المهام اسفل الشاشه

 

[محمد أبوعبدالله]

وعليكم السلام ورجمة الله وبركاته

تفضل اخي الكريم كود ابسط

في موديول جديد ضع الكود التالي

Option Compare Database
Public Declare Function ShowWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Public Sub HideAccess()
    Call ShowWindow(Access.hWndAccessApp, 0)
End Sub
Public Sub ShowAccess()
    Call ShowWindow(Access.hWndAccessApp, 5)
End Sub

وللاخفاء استخدم الكود التالي

Call HideAccess

وللاظهار استخدم الكود التالي

Call ShowAccess

 

db101.rar

تحياتي

[adnanbarznji]

السلام عليكم 

الاخوة الكرام هل احد عنده باك اب جاهز اكون شاكر له

[اشرف]

السلام عليكم

مشاركة مع خبيرنا الرائع محمد أبوعبدالله

اليك اخي adnanbarznji     ( كان من الاقضل فتح موضوع جديد )

و لكن تغضل

عمل نسخة احتياطية علي نفس نمودج محمد أبوعبدالله 

النسخة الاحتياطية ستكون في نفس مكان القاعدة الاساسية وبنفس اسمها ومضاف اليه تاريخ اليوم

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

اتمني ان يكون طلبك قد تم استكماله

 

db101.mdb

تم تعديل أغسطس 22, 2020 بواسطه اشرف

[بندر بن محمد]

انا طبقت الشرح واضفت الاكواد  ولكن في حال النقر على اي زر في النموذج لا ينتقل الى النموذج الثاني 

ما اعرف ايش المشكلة

[ناقل]

 

40 دقائق مضت, بندر بن محمد said:

انا طبقت الشرح واضفت الاكواد  ولكن في حال النقر على اي زر في النموذج لا ينتقل الى النموذج الثاني 

ما اعرف ايش المشكلة

اجعل النماذج منبثق نعم ... ومشروط نعم

[بندر بن محمد]

اشكرك