اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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

قام بنشر (معدل)

=============================================( صور + مرفق + فيديو )

Update: :biggrin2:🌹

بعد اذن استاذ @Moosak ❤️🌹

عدلة على مرفقك :eek2:😇

بضيف له بعد التحديث حقل ادراج نص مع حقل قناع على الرسالة 

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

 

====================( بتحديث 

يكون نص والعنوان DlookUp 

من جدول تاخذ الرقم وتسبدله بنص والعنوان 

 لامكانية تغير نص الرسالة والغات الثانية كتغير  لغة او التصحيح وتعديل  

 

 

1-  تخصيص الرسائل من الازرار الى الخلفية وحجم الرسالة 

- نوع الخط 

-حجم الخط 

-تحجيم الازرار

- تحديد نمط الازار 

- تغير الالوان 

- تعين خلفية وايقونة وصوت 

2- تغير اتجاه الرسالة من اليمين الى اليسار والعكس :blink:

-تغير محاذات القراءه يمين ويسار وتوسيط

3- تغير حواف اطار النص 

4- حفظ باسم مع تغير الباكيج

........

====================================( تحديث )

1- اضافة زر وتحجيمة لتحديث احداثية الزر

2-اضافة الغاء الصوت 

3-  عداد الوقت للالغاء وغلق الرسالة او مرات عدد ظهور الرسالة حسب الطلب

 بعض التحسينات وتصحيح واستكمال 

بعده دمج باكيج الواجهة الرئيسية مع الرسائل الى ثيم :wink2:

tablet = Name packge 1 ,  Name packge 1 = ( Name packge 1 install 

تابع الفيديو للتوضيح اسفل الموضوع + تحميل المرفق

=============================================( مرفق + فيديو )

تحميل مرفق مع باكيج للتجربة

 

https://www.mediafire.com/file/qysrlx6x8g81nos/V1+Full_Control_Buld_MSGBOX_with+Stly+ON+MS+ACCESS.rar/file

تم تعديل بواسطه hanan_ms
  • Thanks 1
قام بنشر

=============================================( صور + مرفق + فيديو )

Update: :biggrin2:🌹

بعد اذن استاذي @ابو جودي ❤️🌹🌹

استعمل جدول الرسائل مع ادوات الميديا من مرفقك :eek2: 😇

بعد اذن استاذ @Moosak ❤️🌹

عدلة شي بسيط بداله :eek2:😇

 

1-  اضافة قائمة لادارج الرسائل فقط عدل على هذا كود بكتابة رقم فقط

Dim NMSG_1 As String
NMSG_1 = "101"
    MyMsgBox (NMSG_1), (NMSG_1), (NMSG_1), msg_Information, Btn_OK_Only, Arabic_Center

- رقم مسلسل من عند الاضافة رسالة جديدة  

- تعديل على الرسالة بتصحيح والحذف!

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

 

2-  اضافة قائمة الاخطاء وتغير كود والدالة عند الخطأ من الرقم الى جهاز و المستخدم ..الخ

Dim GiveMeError                  As Recordset

On Error GoTo GiveMe

Me.Error = "/"

 Exit Sub
GiveMe:
'  MsgBox "Error Number : " & Err.Number & vbNewLine & "Error Description : " & Err.Description

  Dim strMsg                As String: strMsg = "Error Description : " & vbCrLf & Err.Description
  Dim Title                 As String: Title = "Error Massage !"
  Dim SubTitle              As String: SubTitle = "Error Number: " & Err.Number
  Dim Number_MX_Error       As String '============( XLong
  
'========================( Sand Error To Tablet
        Set GiveMeError = CurrentDb.OpenRecordset("Error_All_MSGBOX")
        GiveMeError.AddNew
        GiveMeError![Err_Number] = Err.Number
        GiveMeError![Error_Description] = Err.Description
        GiveMeError![User] = "Not Now _CommingSoon "
        GiveMeError![PC] = Environ("username")
        GiveMeError![Today] = Date
        GiveMeError![ToTime] = Time()
        GiveMeError![Name_Form] = Me.Form.name
        GiveMeError![Click_Button] = "GiveMe_Click()" & " -Name_Button: " & "تفعيل رسالة الخطأ عند الخطأ OnError" 'Me.Error.Caption
        GiveMeError.Update
DoEvents

'Number_MX_Error = DMax("[ID]", "[Error_All_MSGBOX]")
    MyMsgBox strMsg, Title, SubTitle, msg_Critical, Btn_OK_Only, English_Left, False

   ' Resume GiveMe
 Exit Sub

3- تصحيح مسار عند التشغيل 

4- اضافة الغاء الصوت او تفعيل 

================================( تحديث

1- تعامل مع الدالة مثال اسم الجهاز

2- تغير ابعاد الزر نافذه تحدد اما ارتفاع او عرض ثم الحفظ 

3- تغير ابعاد الواجهة 

4 5 ....... 

تابع الفيديو للتوضيح اسفل الموضوع + تحميل المرفق

=============================================( مرفق + فيديو )

 

تحميل المرفق 

https://www.mediafire.com/file/14jm050l7a9q5jx/Link+Tablt+On+MsgBoX+V1-2+Full_Control_Buld_MSGBOX_with+Stly+ON+MS+ACCESS.rar/file

  • Thanks 1
قام بنشر

=============================================( صور + مرفق + فيديو )

Update: :biggrin2:🌹

بعد اذن استاذي @ابو جودي ❤️🌹🌹

اشرايك من نفس كود الرسالة هي صناديق ادخال بأنواعها مع التقويم وارقام الهاتف والمبالغ :eek2:😇

بعد اذن استاذ @Moosak ❤️🌹

عدلة شي بسيط بداله :eek2:😇

اضافة انواع جديده للرسالة وصلة 14 

 msg_Original = 0
    msg_Information = 1
    msg_Critical = 2
    msg_Exclamation = 3
    msg_Question = 4
    msg_Idea = 5
    msg_OK = 6
    msg_Alarm_bell = 7
    msg_InputMask_Date = 8
    msg_InputMask_Time = 9
    msg_InputMask_Number = 10
    msg_InputMask_Text = 11
    msg_InputMask_Mony = 12
    msg_Pick_Date = 13
    msg_InputMask_password = 14

 

1- استخدام الرسالة بالارقام عند دخول قائمة تسجيل ارقام الرسائل 

- تفيد كمرجع للتعديل وتغير الغات فقط غير ارتباط الجدول :wink2:

- كود عند عدم وجود الرقم الرسالة 

- ملاحظة يكتب الكود بنوعين اما 1 بداخل الكود مثل كتابة كود الرسالة اكسس والنوع الثاني 2 يكتب رقم مرجع الرسالة 

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

66.PNG.1611a94151cdd8bb16dbc92991a57bfb.PNG

- وكود الخطأ بتحديث يتغير باسم دالة واحده لكل زر  او حدث للنماذج والتقارير

67.PNG.3465026942d2c71aca1c4c98b83206ef.PNG

2- تجربة كل الانواع نابع الفيديو

3- تعديل واجهة الاعداداة 

 

================================== تحديث 

1- نسيت اكتب كود فتح حجز ايام وترصيد الاجازات موجود

3- ضبط حد للتحجيم لا يمكن تقليل الحجم النافذة اقل من حجم الاصلي بالارتفاع والعرض

4- اصلاح بعض والتحسين

5  6 ........

تابع الفيديو للتوضيح اسفل الموضوع + تحميل المرفق

=============================================( مرفق + فيديو )

تحميل المرفق

https://www.mediafire.com/file/o90b64wdsnv7al2/Vx+Msgbox+With+Into+Msgbox+Full+Control+IN+Msgbox+One+On+Ms_Access.rar/file

انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

سجل دخولك الان
×
×
  • اضف...

Important Information