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

تثبيت قيمة حقل لحين تغييره


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

السلام عليكم

اريد ان اثبت قيمة حقل داخل النموذج الى ان يتم تغييره

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

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

منذ ساعه, نسيم الروح الروح said:

السلام عليكم

اريد ان اثبت قيمة حقل داخل النموذج الى ان يتم تغييره

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

صديقي جرب هذا الحل

اذا عندك ادخل البيانات (نعم) قم تحويلها الى (لا )

 

اتوقع رح تحل الموضوع
مرفق صورة 

01اوفسنا.png

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

 

46 دقائق مضت, عبد اللطيف سلّوم ابو أشرف said:

صديقي جرب هذا الحل

اذا عندك ادخل البيانات (نعم) قم تحويلها الى (لا )

 

اتوقع رح تحل الموضوع
مرفق صورة 

01اوفسنا.png

شكراً لك صديقي ولكن هي اساساً لا ولم اقم بتحويلها الى نعم

هل يوجد طريقة اخرى؟

لك جزيل الشكر

 

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

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

بارك الله فيك اخي العزيز عبد اللطيف و اكثر من امثالك .. بعد اذنك وددت المساهمة في الحل 

 

اخي العزيز السائل

 

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

Public a As Variant

حيث a هو اسم المتغير و نوعه هنا Variant يقبل اي نوع من البيانات و يكنك تغيير حسب ما تريد ادخاله من بيانات بالنموذج

و ليكن اسم مربع النص على النموذج اسمه txt1

فعند اغلاق النموذج نقوم باسناد قيمة مربع النص ( القيمة التي ادخلناها بمربع النص ) الى المتغير كالتالي :

On Error Resume Next
a = Me.txt1

ثم  في حدث عند التحميل او حدث الفتح للنموذج نجعل مربع النص ياخذ القيمة الموجودة بالمتغير كالتالي :

Me.txt1 = a


 

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

 

المثال المرفق به ما طلبت ان شاء الله .. القيمة المثبتة بحقل الاسم هي ( يوسف )

 

بالتوفيق

Test.rar

تم تعديل بواسطه يوسف أحمد
  • Like 1
رابط هذا التعليق
شارك

18 ساعات مضت, يوسف أحمد said:

بارك الله فيك اخي العزيز عبد اللطيف و اكثر من امثالك .. بعد اذنك وددت المساهمة في الحل 

 

اخي العزيز السائل

 

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


Public a As Variant

حيث a هو اسم المتغير و نوعه هنا Variant يقبل اي نوع من البيانات و يكنك تغيير حسب ما تريد ادخاله من بيانات بالنموذج

و ليكن اسم مربع النص على النموذج اسمه txt1

فعند اغلاق النموذج نقوم باسناد قيمة مربع النص ( القيمة التي ادخلناها بمربع النص ) الى المتغير كالتالي :


On Error Resume Next
a = Me.txt1

ثم  في حدث عند التحميل او حدث الفتح للنموذج نجعل مربع النص ياخذ القيمة الموجودة بالمتغير كالتالي :


Me.txt1 = a


 

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

 

المثال المرفق به ما طلبت ان شاء الله .. القيمة المثبتة بحقل الاسم هي ( يوسف )

 

بالتوفيق

Test.rar

اخي الكريم شكراً لك

عند الخروج من الفورم والعودة اليه ثانيةً تتثبت قيمة الحقل ولكن عند الخروج من البرامج وفتحه ثانيةً لم يتم حفظ قيمة الحقل داخل النموذج

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

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

لا شكر على واجب اخي العزيز

 

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

 

انظر المرفق

 

بالتوفيق

test.rar

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

6 ساعات مضت, يوسف أحمد said:

لا شكر على واجب اخي العزيز

 

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

 

انظر المرفق

 

بالتوفيق

test.rar

شكراً لك اخي على مساهمتك النبيلة في حل مشكلتي .. ولكن في قاعدة البيانات رز الخروج اسفل مربع النص (كما في المثال المرفق) فعند وضع قيمة معينة في الحقل واغلاق النموذج مع قاعدة البيانات لا تتثبت القيمة عند اعادة فتحها ثانية

test.rar

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

لا شكر  على واجب اخي العزيز 

 

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

 

تفضل المرفق بعد التعديل

 

بالتوفيق

test.rar

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

في 10/30/2017 at 02:08, يوسف أحمد said:

لا شكر  على واجب اخي العزيز 

 

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

 

تفضل المرفق بعد التعديل

 

بالتوفيق

test.rar

هذا هو المطلوب وشكراً جزيلاً لك اخي الكريم 

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

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information