الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف أنقل بيانات من مربع نص على نموذج لبعض السجلات

مغلق
بدأه علي في 15 مايو 2002 · 17 رد · 1,249 مشاهدة · في مراجعة المواضيع
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

كيف أنقل بيانات من مربع نص على نموذج لبعض السجلات

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

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

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

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

آمل أن أكون وفقت في الشرح

شكرا لكم

#3

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

ولكن يبدو اني لم اوفق في الشرح

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

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

شكرا لكم

#4

بسم الله الرحمن الرحيم

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

جرب

بالتوفيق

أخـــــــBengaــــوك

قال أبن القيم : أكثروا من الخير فينتشر .. و أقلوا من الشر فيندثر ..

#5

شكرا لك يا اخ benga

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

شكرا لك

#6

ملاحظات بسيطه قد تفيد

تستطيع تمرير بيانات الى الاستعلام عن طريق اضافة معاير

اي ان تجعل الاستعلام يأخذ القيمة مباشرة من نموذج كمثل:

[forms]![inquiry]![enddate]

او باضافة "القيمة" سوف تكون قيمة ثابته

#8

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

#9

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

في الماكرو set value

تقوم بالعمل تماما فهل يوجد مايشابها في الكود

#10

مثلما ذكرت أنت فى ردك السابق

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

Forms!FBillout![BID]=Forms!FBILLIN![BID]

أما اذا لم يكن فيمكن الاحتفاظ بالقيمة فى متغير Global

يتم تعريفة فى Module

#11

مشكور الاخ محمد

اعتقد انه لازم الاحتفاظ بالقيمة فى متغير global

#12

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

#13

الاخ محمد كيف يتم تعريف متغير global

يتم معروفا وبقيمه محددة طيل مدامت الاكسس مفتوح وكيف استطيع تغيرها في كل مره؟

شاكر لك وللجميع

#14

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

#15

من الطرق :

في وحدة نمطية عامة :

Function MyVal()

Static MyNewVal

If (SysCmd(acSysCmdGetObjectState, acForm, "form1") And acObjStateOpen) <> False Then

MyNewVal = [Forms]![form1]![txt1]

End If

MyVal = MyNewVal

End Function

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

=MyVal()

وهكذا بعد كل تحديث تتغير القيمة المحفوظة

وفي النماذج الأخرى يمكن أن نستخدم الدالة MyVal بعدة طرق منها أن تجعل القيمة الافتراضية لبعض الحقول :

=MyVal()

دون حاجة ليكون النموذج الأول مفتوحا

#16

فى أي موديول عام ( ليس فى موديول خاص بفورم)

global Mynumber as long

و بالتالي تستطيع تغيير قيمة Mynumber من أي مكان فى البرنامج

و يظل محتفظا بالقيمة الأخيرة التي تم تعيينها اليه

#17

اشكرك حارث

وبجربها إن شاء الله ورد عليك

#18

هل جربت ما ذكره أستاذنا / محمد طاهر

فهو أكثر من رائع ، ويتميز بالاختصار .

وهذا مثال :

http://www.pcpages.com/harith77/StoredVal2.zip

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…