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

شرح لااضافة سجل من فورم بدون مصدر

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

موضوع منقول من المنتدي القديم

الكاتب: abutraiky

هل من شرح لااضافة سجل من فورم بدون مصدر بيانات...للضروره؟؟؟

اخواني الاعزاء

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

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

بصراحه ربي يوفقكم لكل خير وينور خطاكم لكل خير ...هذا اللي لكم علي

سؤااااااااااااال؟؟؟؟واحتاج الى اجابته

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

على النموذج وكذلك الازرار

ماعليش تحملوني

طبعا بحثت ووجدت مثال لذلك ىف الارشيف

--------------------------------------------------------------------------------

الكاتب: abutraiky بتاريخ: 8/25/2002 3:30:02 PM

--------------------------------------------------------------------------------

اجابة

ليتك توضح أكثر المطلوب ماهو الشيء الغامض الذي لم تفهمه

وأبشر باللي تبيه إن شاء الله

واهلا بك

--------------------------------------------------------------------------------

الكاتب: ابوحمود. بتاريخ: 8/26/2002 12:50:44 AM

--------------------------------------------------------------------------------

اشكرك اخوي ابوحمود

صممت نموذج لاضافة سجل جديد

الان كيف يمكن اضافة الاكواد والحقول والازرار

وشو الـ unbound اللي حصلته على الفورم في المثال

معليش تحملني ابو حمود

--------------------------------------------------------------------------------

الكاتب: abutraiky بتاريخ: 8/26/2002 1:30:31 AM

--------------------------------------------------------------------------------

توضيح

النماذج ومربعات النصوص لها حالتين :

1- مرتبطة أو منضم Bound أي أنها تأخذ بياناتها بالنسبة للنماذج من جدول أو استعلام وبالنسبة لمربعات النصوص وغيرها أنها تأخذ بياناتها من الحقول الموجودة في الجدول او الاستعلام السابق .

فإذا أزلنا مصدر السجل من خصائص النموذج فهنا نحصل على نموذج غير مرتبط Unbound .

2- غير مرتبطة أو غير منضم بأي مصدر للبيانات .

عند كتابة أو تعديل بيانات على النموذج المرتبط نجد أنها تحفظ في الجدول عند الانتقال لسجل جديد تلقائياً أو عند نقر زر حفظ أو غير ذلك من الطرق .

طبعا الآن في النموذج الغير مرتبط نحتاج إلى طريقة ما لنقل البيانات التي نرغب في حفظها في الجدول .

الأخ محمد وضع لنا طريقتين :

(الأولى) :

وهي طريقة سهلة استخدم فيها استعلام الحاق يأخذ البيانات من النموذج ويلحقها بالجدول وقد قام بنسخ عبارة SQL للإستعلام ووضعها في حدث عند نقر زر الأمر في الوحدة النمطية .

افتح استعلام جديد وسيظهر لك مربع حوار اختر عرض التصميم ثم موافق ثم سيظهر لك مربع حوار آخر لاختيار جدول او استعلام اضغط إلغاء الأمر ثم في أعلى اليسار ستجد كلمة SQL اضغط عليها أو في قائمة عرض اختر عرض SQL ، الآن انسخ هذا السطر والصقه في الصفحة البيضاء وامسح الكلمة الموجودة SELECT; :

INSERT INTO Table1 ( Name, Salary, Birthday ) select [Forms]![UnboundForm]![Name] as exp1, [Forms]![UnboundForm]![Salary] as exp2, [Forms]![UnboundForm]![Birthday] as exp3;

والآن من قائمة عرض اختر عرض التصميم .

ستظهر لك شبكة الاستعلام

في اول حقل ستجد السطر :

 
exp1: [Forms]![UnboundForm]![Name]

exp1 هذه اسم الحقل التي يضعها اكسس عندما تترك تسمية الحقل (غير مهمة) .

الباقي :

Forms]![UnboundForm]![Name]

هذه عبارة اسناد تعني أننا نريد أن تظهر يا استعلام البيانات الموجودة على النموذج المسمى UnboundForm في مربع النص المسمى Name .

تحتها ستجد كلمة NAME ومعنى ذلك أن البيانات السابقة سوف نلحقها بحقل الاسم الموجود في الجدول المراد إلحاق البيانات به .

وباقي الأسطر مثل ماسبق .

أما القاعدة الثانية :

فالعبارة :

Dim mydb As database, mytable As RecordsetSet mydb = CurrentDbSet mytable = mydb.OpenRecordset("table1", DB_OPEN_TABLE)mytable.AddNew      mytable!Name = [Forms]![UnboundForm]![Name]      mytable!Salary = [Forms]![UnboundForm]![Salary]      mytable!Birthday = [Forms]![UnboundForm]![Birthday]mytable.Updatemytable.CloseSet mydb = Nothing

السطر الأول : اعلان عن متغيرات

الثاني : اسناد متغير قاعدة البيانات إلى القاعدة الحالية .

الثالث : فتح ريكوردست للجدول table1 في الذاكرة

الرابع : فتح سجل جديد في الذاكرة

الخامس والسادس والسابع : اسناد القيم الموجودة في النموذج إلى الحقول الموجودة في الجدول ، لاحظ أن السجلات المفتوحة قد اصبح اسمها mytable أما الحقول فلم تتغير اسمائها .

الثامن : تحديث السجلات .

التاسع : اغلاق السجلات

العاشر : إنهاء الاسناد إلى المتغير .

جرب مرة ومرات واي عقبة تواجهك أو صعوبات فاكتب وإن شاء الله تحل وأفضل من نقل الحل فهمه .

ولك تحياتي

--------------------------------------------------------------------------------

الكاتب: ابوحمود. بتاريخ: 8/26/2002 4:31:45 AM

--------------------------------------------------------------------------------

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

اشكرك اخي الفاضل محمد طاهر

والشكر موصول لاخوي ابوحمود

على الشرح الواضح والمفيد ربي يوفقكم لكل خير ونور خطاويكم

ياعل قصر ما يجي له ظلالي*******ينهد من عالي مبانيه للساس

--------------------------------------------------------------------------------

الكاتب: abutraiky

#2

الفزعه ياهل الفزعه

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

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

الكاتب: سلماني بتاريخ: 8/25/2002 6:34:17 AM

--------------------------------------------------------------------------------

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

أخي الكريم/ السليماني

المثال المرفق مثال لبرنامج تسجيل الصادر.

http://www.geocities.com/ibnmuscat/AutoNumber.zip

وضعت في حدث قبل الإدخال Before insert لنموذج "الصادر" كود يقوم بإعادة الترقيم تلقائياً إلى رقم 1 في بداية كل سنة ميلاديه في حقل "رقم الصادر" وهو حقل (رقمي).

أرجو أن يكون حسب المطلوب.

والله الموفق.

--------------------------------------------------------------------------------

مع خالص تحياتي ابن مسقط assq@gawab.com

الكاتب: ابن مسقط بتاريخ: 8/25/2002 9:43:05 AM

--------------------------------------------------------------------------------

الله يخليك اخوي ابو مسلط

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

--------------------------------------------------------------------------------

العلم كالمال ان لم يتصدق منه ماتبارك

الكاتب: سلماني بتاريخ: 8/25/2002 5:40:07 PM

--------------------------------------------------------------------------------

الله يخليك اخوي ابو مسلط

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

--------------------------------------------------------------------------------

العلم كالمال ان لم يتصدق منه ماتبارك

الكاتب: سلماني بتاريخ: 8/25/2002 5:40:11 PM

--------------------------------------------------------------------------------

إجابة

حول القاعدة للتاريخ الهجري بواسطة أدوات => بدء التشغيل في الأكسس 2000 أو أدوات =>خيارات =>اعدادات دولية في الأكسس اكس بي

ولك تحياتي

--------------------------------------------------------------------------------

الكاتب: ابوحمود. بتاريخ: 8/26/2002 2:49:29 AM

--------------------------------------------------------------------------------

شكر وتقدير

أخي/ أبو حمود

شكرا على الإجابه وبارك الله فيك.

--------------------------------------------------------------------------------

مع خالص تحياتي ابن مسقط assq@gawab.com

الكاتب: ابن مسقط

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

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