[العتيق]

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

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

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

حيث يتم تعبئة جدول مرتبط بهذا الفورم

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

وانا استخدم قاعدة بيانات اكسس

ارجو ان اكون قد وفقت بشرح طلبي

[5000]

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

If GetSetting(Application.ProductName, Me.Name, "Value", False) Then
Me.Close()
Else
SaveSetting(Application.ProductName, Me.Name, "Value", True)
'Threading.Thread.Sleep(2000)
'Me.Close()
End If

السطرين المعطلين يخص ابقاء الفورم لمدة (ثانيتين) ثم يغلق نفسه

[العتيق]

(11-03-19, 11:00 PM)5000 كتب : جرب هذا الكود ضعه حدث Load لفورم تسجيل الدخول

If GetSetting(Application.ProductName, Me.Name, "Value", False) Then
   Me.Close()
Else
   SaveSetting(Application.ProductName, Me.Name, "Value", True)
'Threading.Thread.Sleep(2000)
'Me.Close()
End If

السطرين المعطلين يخص ابقاء الفورم لمدة (ثانيتين) ثم يغلق نفسه

شكرا لك جاري التجربة

[5000]

الكود السابق خطأ تفضل التعديل غير xxx لاسم الفورم الذي تريد اظهاره مرة واحدة
 
If GetSetting(Application.ProductName, xxx.Name, "Value", 0) = 0 Then
    xxx.ShowDialog()
    SaveSetting(Application.ProductName , xxx.Name, "Value", 1)
End If

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

[العتيق]

بانتظار ردود الاعضاء 

لم تصلح هذه الطريقة معي 

شكرا لك

[mmali127]

السلام عليكم 

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

واذا لم يجد سجلات يقوم بفتح الفورم الاول 

نفس فكرة فورم لتسجيل سريل للبرنامج


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

تحياتى

[العتيق]

(12-03-19, 09:23 AM)mmali127 كتب : السلام عليكم 

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

واذا لم يجد سجلات يقوم بفتح الفورم الاول 

نفس فكرة فورم لتسجيل سريل للبرنامج


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

تحياتى

اتمنى منكم اعداد مثال على ذلك مع الشكر

[5000]

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

[العتيق]

(12-03-19, 03:23 PM)5000 كتب : نسيت أن أذكر في مشاركتي الأخير التي تحتوي على الكود المعدل بأن تضعه في بداية حدث تحميل Load لفورم تسجيل الدخول.

امل ان تتكرم و تضيف مثال

[elgokr]

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

بخصوص طلبك ظهور فورم لمرة واحدة فقط

وليكن كا فكرة انشاء المستخدم الاداري للتحكم بالبرنامج

كل افكرة ستكون كالتالى

لنقول لديك جدول باسم Users

بطبيعة الحال فارغ تماماً لا يحتوى على اى مستخدم للبرنامج

الان بعد اتمام عمل استعلام على هذا الجدول

وترحيل الاستعلام الـ DT 

ستقوم بعمل تحقق اذا كان DT يحتوى على اى نتائج ام فارغ

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

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

فهنا تظهر له شاشة تسجيل الدخول

ملخص الامر : انت سيكون لديك 3 شاشات

1- شاشة فارغة لا تظهر وبمجرد التحقق من الكود لظهور الشاشة المحددة يتم اغلاقها

2- شاشة تسجيل مستخدم ادارى

3- شاشة تسجيل الدخول

الشاشة الفارغة هى عبارة عن احتواء كود فى اللود

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

وبنهاية كود اللود كود الاغلاق طبعاً بعد تنفيذ الاستعلام و كود فتح الشاشة طبقاً لنتائج الاستعلام

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

تحياتى لك

وتمنياتى لك التوفيق