أبوعبدالله2 قام بنشر مارس 21, 2004 مشاركة قام بنشر مارس 21, 2004 بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته إخواني الكرام عندي نموذج إسمه ( تسجيل) فيه حقل الرقم العام , نوع البيانات (رقم) وهو مفتاح أسساسي , وحقل النوع , نوع البيانات (نص) وحقول أخرى, وفيه زر أمر (الحاق) وكذلك عندي نموذج إسمه (عقود) فيه حقول من ضمنها حقل رقم العقد, نوع البيانات (رقم) وهو مفتاح أسساسي , وحقل النوع , نوع البيانات (نص) وحقول أخرى, 0 ما أريده هو : عند نقر زر الأمر يفتح نموذج (عقود) لتسجيل عقد جديد ويلحق به الرقم العام والنوع من السجل الحالي من نموذج تسجيل في حقلي رقم العقد والنوع من نموذج (عقود) أي عندما يفتح النموذج يرى المستخدم رقم العقد والنوع وسجلين ليكمل هو باقي البينات أرجو أن أكون استطعت شرح مطلبي وجزاكم الله خيرا رابط هذا التعليق شارك More sharing options...
امير عاطف قام بنشر مارس 21, 2004 مشاركة قام بنشر مارس 21, 2004 الأخ أبوعبدالله2: لنفترض ان النموذج المسمى تسجيل مصدر سجله هو جدول اسمه ]تسجيل[ والنموذج المسمى عقود مصدر سجله هو جدول اسمه ]عقود[ ضع عند حدث الفتح on open للنموذج المسمى عقود الكود التالي: DoCmd.GoToRecord , , acNewRec Docmd.runsql"INSERT INTO عقود ( [رقم العقد], [نوع البيانات] ) SELECT تسجيل.[الرقم العام], تسجيل.النوع FROM تسجيل;" Me.Refresh رابط هذا التعليق شارك More sharing options...
امير عاطف قام بنشر مارس 21, 2004 مشاركة قام بنشر مارس 21, 2004 عفواً لعدم تناسق اللغة العربيه بالكود رابط هذا التعليق شارك More sharing options...
أبوعبدالله2 قام بنشر مارس 22, 2004 الكاتب مشاركة قام بنشر مارس 22, 2004 جزاك الله خيرا استاذي أمير يبدو أن هذه الطريقة مدهشة للغاية ولكن ٌد أكون أنا لم أحسن تطبيقها فقد ظهر لي رسالة خطأ عن فتح النموذج تقول " لايمكنك الذهاب الى السجل المحدد رقم الخطأ(2105) ثانيا لو تكرمت تشرح لي منهج run SQL فسي الكائن docmd فأنت الذي جرأتنا بكرمك على الأسترسال بالطلبات المزعجة تلميذك الغبي ابو عبدالله رابط هذا التعليق شارك More sharing options...
امير عاطف قام بنشر مارس 23, 2004 مشاركة قام بنشر مارس 23, 2004 يقوم المنهج run SQL بالكائن Docmd بتشغيل جملة Sql من خلال كود الـــ VBA بالنسبه للكود السابق هناك فكره اخرى افضل منه ايضاً وهو عن طريق وضع الكود التالي عند حدث الفتح On Open للنموذج المسمى عقود: Private Sub Form_Open(Cancel As Integer) DoCmd.GoToRecord , , acNewRec Me.رقم_العقد = Forms!تسجيل![الرقم العام] Me.نوع_البيانات= Forms!تسجيل!النوع End Sub وترى تطبيق ذلك على مثال لترى بنفسك هنــــــــــــــــــــــــا رابط هذا التعليق شارك More sharing options...
أبوعبدالله2 قام بنشر مارس 24, 2004 الكاتب مشاركة قام بنشر مارس 24, 2004 أستاذي القدير أمير عاطف جزاك الله بالاحسان رفع درجاتك في عليين بالنسبة للمثال لم استطع تحميله لا أدري لماذا :@ أما بالنسبة لسؤالي عن ال S QL فهو كيف أجعل الالحاق يكون مشروطا بالسجل الحالي من النموذج الذي فيه زر الامر الحاق أي لنفرض أن السجل الحالي في نموذج تسجيل فيه الرقم العام =25 والنوع =(عقد دائم) عند نقر زر الامر الحاق يقوم البرنامج بالحاق القيمة 25 في حقل رقم العقد والقيمة ( عقد دائم) في حقل النوع في نموذج عقود ويفتحه على هذا السجل لاقوم انا بتعبئة باقي البيانات فلا اخفيك باني جربت عمل استعلام الحاقي ليلحق هذين الحقلين بجدول عقود وجعلته بارامترياً يطلب من المستخدم ادخال الرقم العام للسجل المراد الحاقه ولكنها غير مجدية لانه قد يدخل المستخدم رقماً غير رقم السجل الحالي وهذا مالا أريده أرجو ان لا اكون اكثرت عليك وجزاك الله خيرا للرفع :( رابط هذا التعليق شارك More sharing options...
امير عاطف قام بنشر مارس 24, 2004 مشاركة قام بنشر مارس 24, 2004 المثال بالمرفقات aboabdalla.zip رابط هذا التعليق شارك More sharing options...
أبوعبدالله2 قام بنشر مارس 25, 2004 الكاتب مشاركة قام بنشر مارس 25, 2004 جزاك الله خير استفدت أكثر مما سألت عنه والآن الأمور تمام التمام (y) تلميذك أبو عبدالله رابط هذا التعليق شارك More sharing options...
فتى الوادي قام بنشر مايو 1, 2005 مشاركة قام بنشر مايو 1, 2005 السلام عليكم ... أريد كود يقوم بالحاق البيانات الظاهره امامي في نموذج للجدول .. يعني يكون النموذج لا يعتمد على الجدول ..... بل النموذج عادي فيه حقول ... ثم عند الضغط على الزر يقوم بإاضافة البيانات إلى الجدول ... و لايتم الكتابة في الجدول إلا بعد الضغط على الزر رابط هذا التعليق شارك More sharing options...
الدكتور خضر الرجبي قام بنشر مايو 1, 2005 مشاركة قام بنشر مايو 1, 2005 (معدل) السلام عليكم أخي فتى الوادي ، بارك الله فيك ما تطلبه هو ترحيل قيم عناصر غير منضمة في نموذج إلى جدول والطريقة هي كما يلي : INSERT INTO target [(field1[, field2[, ...]])] SELECT (value1[, value2[, ...]) حيث target هو اسم الجدول الذي تضيف فيه البيانات. field1 ، field2 وهكذا أسماء الحقول التي ستنضم لها البيانات بالترتيب. value1، value2 وهكذا هي العناصر غير المنضمة من النموذج . ويوضع هذا الكود في حدث عند النقر في زر التنفيذ . مع الاحترام تم تعديل مايو 2, 2005 بواسطه خضر الرجبي رابط هذا التعليق شارك More sharing options...
فتى الوادي قام بنشر مايو 1, 2005 مشاركة قام بنشر مايو 1, 2005 يعطيك العافية أخوي ... هل تتكرم بمثال للفائدة ... رابط هذا التعليق شارك More sharing options...
الدكتور خضر الرجبي قام بنشر مايو 1, 2005 مشاركة قام بنشر مايو 1, 2005 السلام عليكم أخي فتى الوادي ، بارك الله فيك بكل سرور ، غدا صباحا بإذن الله لك المثال. مع الاحترام رابط هذا التعليق شارك More sharing options...
فتى الوادي قام بنشر مايو 1, 2005 مشاركة قام بنشر مايو 1, 2005 بيض الله وجهك ..... وغفر الله لك ولوالديك وأنا في الأنتظار ... رابط هذا التعليق شارك More sharing options...
فتى الوادي قام بنشر مايو 1, 2005 مشاركة قام بنشر مايو 1, 2005 السلام عليكم حاولت أعمل الكود يظهر لي هذه الرسالة رابط هذا التعليق شارك More sharing options...
الدكتور خضر الرجبي قام بنشر مايو 2, 2005 مشاركة قام بنشر مايو 2, 2005 السلام عليكم أخي فتى الوادي ، بارك الله فيك المثال الذي وعدتك به ، أملا أن ينال إعجابك. Valley_Younker.rar رابط هذا التعليق شارك More sharing options...
فتى الوادي قام بنشر مايو 3, 2005 مشاركة قام بنشر مايو 3, 2005 بارك الله فيك أخي خضر وغفر الله لك ولوالديك ... رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.