عمر احمد000

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

بعد اذن حضراتكم في مشكله عندي الحين

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

في حاله فتح اي نموذج وادخال جميع البيانات تظهر هذه الرساله خطا في الفهرسه 

قاعدة البيانات1.rar

الساده الاعضاء 

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

 لدي استفسارات واتمني من الله تجاوبي عليهم 

اولا كيفيه تصدير بيانات في التقرير بنفس التنسيق الي 

1/ الاكسل

2/ الورد

3/ PDF

ثانيا في حاله الطباعه التقرير لااريد ان تظهر علامه البطاعه او علامه الرجوع كما موضوح في الصوره المرفقه

ثالثا كيفيه تحويل  البيانات في التقرير من عربي الي انجليزي والعكس 

واسف علي الاطاله

قاعدة البيانات1.rar

شكرا لحضرتك

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

شفان ريكاني  معلش اسف اني بتعبك معايا

بس لدي استفسارات واتمني من الله تجاوبي عليهم 

اولا كيفيه تصدير بيانات في التقرير بنفس التنسيق الي 

1/ الاكسل

2/ الورد

3/ PDF

ثانيا في حاله الطباعه التقرير لااريد ان تظهر علامه البطاعه او علامه الرجوع كما موضوح في الصوره المرفقه

ثالثا كيفيه تحويل  البيانات في التقرير من عربي الي انجليزي والعكس 

واسف علي الاطاله

قاعدة البيانات1.rar

اه تمام

ممكن بعد اذنك 

 حضراتك محتاج كود لتحويل اللغه من عربي الي انجليزي او العكس في برنامج  يتم تصميمه علي الاكسس في النماذج والتقارير 

تسلم ياغالي 

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

ونموذج دخول 

ونموذج حذف مستخدم من البرنامج

دخول المستخدمين.rar

الساده الاعضاء الموقرين

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

بعد اذن حضراتكم محتاج كود لتحويل اللغه من عربي الي انتجليزي او العكس في برنامج  يتم تصميمه علي الاكسس في النماذج والتقارير 

الساده الاعضاء  المحترمين

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

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

أخي الكريم حصلت معي نفس المشكله وتم حلها والحمد الله 

اولاقوم بفتح  البرنامج علي جهاز اخر واذا لم تظهر هذه الرساله فيكون من النسخه 

وتقوم حضرتك مغير نسخه الويندوز من انجليزي الي عربي 

كما موضح في الصوره 

الاستاذ/ ه ريهان 

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

اشكر حضرتك علي اهتمام في الرد

ده كود لفتح النموذج اول يوم في الشهر 

If day(Date) = 1 Then DoCmd.OpenForm "frm1", acNormal

انا اريد تغير هذا الكود بدل مايفتح اول الشهر يفتح يوم الاحد من كل اسبوع 

الاستاذ/ه رمهان 

عند فتح النموذج واثناء البرنامج وهوا شغال في نفس اليوم المراد فتحه

الساده الاعضاء المحترمين 

ارجوا من سعادتكم نموذجين لنسخ الاحتياطي

النموذج الاول يكون لنسخه 32 Bit 
 

والنموذج الثاني يكون 64 Bit

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

الساده الاعضاء المحترمين بعد اذن حضراتكم محتاج كود لفتح النموذج يوم الاحد من كل اسبوع 

شكرا لحضراتكم

4 ساعات مضت, ابا جودى said:

السلام عليكم ورحمة الله تعالى وبركاته
اولا انا اسف على التاخير
ثانيا انا رجل لو حضرتك اخدت بالك من الاسم ستجده  

ابا جودى

محمد عصام

ما علينا اتفضل يا قمر ادى طلب حضرتك نفس اللى انا قلته لكن انا قمت بتنقيح المثال قليلا وحطيت التاتش بتاعى ☺ 
للعلم انا اشتغلت على طلبك لمدة سنه

وطبعا لو اليوزر رجع تاريخ الجها او قدمه لن يتأثر البرنامج ولن يفتح قبل  2016 او بعد  2016

فى شاشة اتفاقية الترخيص

عند الضغط على الرز  (F6)  سوف تتم فتح نافذة لو تم تغيير التاريخ الى الى سنة   2016
سوف يعمل البرنامج بنجاح
 

وممكن كل سنه تغير القيمة دى لتجديد البرنامج

 

demo.rar

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

4 ساعات مضت, ابا جودى said:

السلام عليكم ورحمة الله تعالى وبركاته
اولا انا اسف على التاخير
ثانيا انا رجل لو حضرتك اخدت بالك من الاسم ستجده  

ابا جودى

محمد عصام

ما علينا اتفضل يا قمر ادى طلب حضرتك نفس اللى انا قلته لكن انا قمت بتنقيح المثال قليلا وحطيت التاتش بتاعى ☺ 
للعلم انا اشتغلت على طلبك لمدة سنه

وطبعا لو اليوزر رجع تاريخ الجها او قدمه لن يتأثر البرنامج ولن يفتح قبل  2016 او بعد  2016

فى شاشة اتفاقية الترخيص

عند الضغط على الرز  (F6)  سوف تتم فتح نافذة لو تم تغيير التاريخ الى الى سنة   2016
سوف يعمل البرنامج بنجاح
 

وممكن كل سنه تغير القيمة دى لتجديد البرنامج

 

demo.rar

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

معلش ياريت تقبل اسفي 

طيب في حضرتم انا كنت عملت فكره بس ماظبتت معي ممكن تشيك عليها وتظبتها 

اسم المستخدم admin

كلمه السر 123

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

اما باقي المستخدمين ميقدروش يعملوا بتحديث للتاريخ البرنامج بس البرنامج معاهم يفتح علي طول 

اسف علي الاطاله

test.rar

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

جمعه مبركه علي الجميع الاعضاء

استاذ عبدالله تجدون في المرفق ملف "test " موجود نموذج دخول المستخدمين ونموذج تفعيل البرنامج عاوز من حضرتك طريقه في حاله تفعيل التاريخ من نموذج شاشه تفعيل البرنامج يتم عمل تحديث للتاريخ في نموذج دخول المستخدمين 

ملاحظه : بس انا عاوز احدد مستخدم واحد بس هوا الي يفعل البرنامج وبعد التفعيل يتم تحديث البرنامج لجميع المستخدمين 

وشكرا

test.rar

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

استاذنا عبدالله لو في حاله استخدمنا هذا الكود واعتبرنا اخر البرنامج 2016 في حاله بقي قدوم العام الجديد 2017 كدا البرنامج مش هيفتح في هذه الحاله عاوز البرنامج يتم اعاده تفعيله لمده سنه اي بعد انتهائ 2017 يتم قفل البرنامج وهكذا

ثانيا انا كنت طلبت منك كود فتح النموذج يوم الاحد من كل اسبوع

اولا اشكرك علي اهتمامك وردك استاذنا عبدالله 

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

ثانيا هل في طريقه فتح نموذج يوم الاحد كل اسبوع 

الان, ابا جودى said:

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

اعمل مربعين نص فى نموذج وليكن اسمه   frm_splash فتح القاعدة وليكن   txt_crunt_year           والثانى باسم      txt_confirm_year

txt_crunt_year    اجعل القيمة الافتراضية له التاريخ date()  ومن التنسق اجعله يستخلص العام   "yyyy"
قم بانشاء جدول وليكن باسم   tbl_txt_confirm_year     وفى بداية كل عام ممكن حضرتك تغير قيمة السنة بايدك فيه باى طريقة وخزن فيه قيمة السنة الحالية  مثلا  2016
مربع النص txt_confirm_year مصدر بياناتة

=DLookUp("[txt_confirm_year ]","tbl_txt_confirm_year ")

 

وفى حدث عند التحميل

if[txt_crunt_year]=[txt_confirm_year ]then

docmd.close acForm, "frm_splash "
docmd.openForm"اسم النموذج اللى انت عاوز تفتحه"

else

msgbox "انتهت فترة صلاحية استخدام البرنامج برجاء مراجعة المبرمج ... لكم خالص الشكر"

end if

 

 

 

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

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

الان, عبد الله قدور said:

If Year(Date) <> 2016 Then
MsgBox "áÞÏ ÇäÊåÊ ÕáÇÍíÉ ÇáÈÑäÇãÌ"
DoCmd.Quit
End If

هذا كود للتأكد ان التاريخ ضمن سنة 2016 حصرا 

استاذ عبدالله طيب فين حين لو عملنا تحديث مع بدايه 2017 كدا الكود مش هيشتغل في 2017 علشان حنا معرفين الكود 2016 وكدا البرنامج هيكون مفتوح علي طول

في 9/12/2016 at 09:57, عبد الله قدور said:

السلام عليكم

اهلا بك أخي عمر احمد بيننا

هناك عدة طرق لعمل نسخة تجريبية 

1- نسخة تعتمد على التاريخ بحيث تقوم بوضع كود عند تحميل النموذج الرئيسي مثلا كود يقوم بمقارنة تاريخ اليوم مع تاريخ نهاية المدة التجريبية فإذا كان نفس اليوم او اكبر منه تظهر رسالة تحذير ثم اغلاق 

2- نسخة تعتمد على عدد السجلات المسجلة في جدول ما في القاعدة بحيث اذا تجاوز عدد السجلات 100 سجل مثلا يقوم البرنامج بمنع اضافة سجلات جديدة الى كل الجداول الموجودة , طبعا هذه الطريقة يجب ان تكون مصاحبة لحماية برقم الهارد او دارة الحماية أو رقم اللوحة الام أو ...أو ...

3- نسخة تعتد على اخفاء ميزات معينة من البرنامج لا يمكن استخدامها حتى يتم تفعيل النسخة بشكل كامل , طبعا هذه الطريقة ايضا يجب ان تكون مصاحبة لحماية برقم الهارد أو دارة حماية أو ..أو ..

اليك مرفق بسيط جدا للطريقتين الاولى والثانية 

 

 

db2.rar

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

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

بعد أذن حضراتكم  ممكن  نموذج تفعيل البرنامج برقم سيريل اي بعد انتهاء فتره البرنامج مقارنه بكود التاريخ يظهر نموذج يطلب فيه رقم نسخه البرنامج وفي حاله وضع النسخه يفتح البرنامج وهكذا كل سنه او كل فتره 

وشكرا ليك

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

شكرا لحضرتك علي الرد علي استفساري 

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

اتمني يكون استفساري واضح لحضرتك 

وشكرا ليك

الساده الأعضاء المحترمين 

كل عام وانتم بخير اعاده الله علينا علي الامه الاسلاميه باليمن والبركات.

ارجوا من حضراتكم افادتي في كيفيه عمل فتره تجربيه للبرنامج سواء بكود او بتاريخ 

وشكرا لحضراتكم 

الساده الاعضاء المحترمين

ارجوا من حضراتكم كود لفتح نموذج معين اول كل شهر بمعني عند فتح الشاشه الرئيسيه للبرنامج اول يوم في الشهر يظهر النموذج المراد فتحه اول كل شهر .

وشكرا لحضراتكم