alzahrani2014 قام بنشر أكتوبر 19, 2015 مشاركة قام بنشر أكتوبر 19, 2015 السلام عليكم ورحمة الله المطلوب كيف اقوم بعملية تكرار لاخر سجل في النموذج لاني احتاج الى تكرار السجل عدة مرات وصعب جدا اكتب السجل كامل وبكل حقوله كل مرة تقبلوا فائق التحية 144.rar رابط هذا التعليق شارك More sharing options...
رمهان قام بنشر أكتوبر 19, 2015 مشاركة قام بنشر أكتوبر 19, 2015 عزيزي هل سيتم تكرار الثلاث حقول فقط الظاهرة في النموذج ! ام كل الحقول الباقية والتي بالجدول المصدر ك p_t,m1,m2,3 الخ ! وهل تريدها كنقرة زر مكتوب عليه تكرار ومارايك ان يكون التكرار حسب السجل الحالي ! فلو تريد الاخير ضع المؤشر في السجل الاخير ومارايك ان يكون هناك ادخال لعدد التكرار قبل التنفيذ! ومارايك ان تشرح برنامجك لان مسالة التكرار اشوفها مبدئيا بها نوع من الخطأ والظلم لقواعد البيانات فقد نصل للحل الافضل ! تحياتي رابط هذا التعليق شارك More sharing options...
alzahrani2014 قام بنشر أكتوبر 19, 2015 الكاتب مشاركة قام بنشر أكتوبر 19, 2015 (معدل) يسعدك ربي استاذ رمهان اليك شرح الفكرة من التكرار 1/ يهمني الحقول الثلاث فقط ... 2/ العادة يتم تكرار حقل الاسم والقسم معا احيانا الى اكثر من 30 اسبوع مثلا محمد علي ......... الساحه .......... الاسبوع الاول محمد علي .......... الساحه ......... الاسبوع الثاني محمد علي ............ الساحه .......... الاسبوع الثالث وهكذا ويكون تعديل الاسبوع فقط اسهل من كتابة كامل السجل ( اسم وقسم واسبوع ) وهل تريدها كنقرة زر مكتوب عليه تكرار ومارايك ان يكون التكرار حسب السجل الحالي ! فلو تريد الاخير ضع المؤشر في السجل الاخير لو كانت نقرة بزر قد تكون اجمل .............. وعموما اي طريقة منها ... اترك لك الخيار تحياتي الك تم تعديل أكتوبر 19, 2015 بواسطه alzahrani2014 رابط هذا التعليق شارك More sharing options...
رمهان قام بنشر أكتوبر 19, 2015 مشاركة قام بنشر أكتوبر 19, 2015 ويكون تعديل الاسبوع فقط اسهل من كتابة كامل السجل ( اسم وقسم واسبوع ) ماذا لو تم زيادة اسبوع في كل سجل جديد وطبعا بداً من الاسبوع باخر سجل ! وطبعا عند الاسبوع 8 يعود للاسبوع الاول وهكذا حتى 30 سجل ! والا انا فاهم غلط ؟ تحياتي رابط هذا التعليق شارك More sharing options...
alzahrani2014 قام بنشر أكتوبر 20, 2015 الكاتب مشاركة قام بنشر أكتوبر 20, 2015 سلامة فهمك استاذ رمهان فكرة البرنامج عندنا فترة عمل طولها تقريبا 30 اسبوع قد تزيد وقد تنقص ..... ولدينا تقريبا 100 موظف يعني سيكون لدينا تقريبا 3000 سجل ...... كل موظف مرتبط ب ال30 اسبوع ... كتابة 3000 سجل مضنية جدا .... فلو نظرت الى النموذج نحن نحتاج تكرار الاسم والقسم والاسبوع ... حقل الاسبوع سهل اني اغيرة من 1 الى 30 .... اي اسهل من ان نكتب اسم الموظف والقسم والاسبوع.... فقط نحتاج زر ( مثلا ) او اي طريقة اخرى ... يقوم بتكرار اخر سجل في النموذج شاكرا لك اهتمامك ( محتاج جدا لهذه العملية لانها ستسهل علينا عملية الادخال ) تحياتي الك رابط هذا التعليق شارك More sharing options...
رمهان قام بنشر أكتوبر 20, 2015 مشاركة قام بنشر أكتوبر 20, 2015 تفضل وبلصق هذا الكود خلف زر امر على النموذج ولعله ماتريد DoCmd.GoToRecord , , acLast DoCmd.RunCommand acCmdSelectRecord DoCmd.RunCommand acCmdCopy For i = 1 To 30 DoCmd.GoToRecord , , acNewRec DoCmd.RunCommand acCmdSelectRecord DoCmd.RunCommand acCmdPaste Next i بالتوفيق 1 رابط هذا التعليق شارك More sharing options...
alzahrani2014 قام بنشر أكتوبر 21, 2015 الكاتب مشاركة قام بنشر أكتوبر 21, 2015 (معدل) سلمت الايادي استاذ رمهان رائع جدا جدا ..... جزاك الله كل خير وجعل ذلك في ميزان حسناتك تحياتي الك .... الف الف شكر تم تعديل أكتوبر 21, 2015 بواسطه alzahrani2014 رابط هذا التعليق شارك More sharing options...
رمهان قام بنشر أكتوبر 21, 2015 مشاركة قام بنشر أكتوبر 21, 2015 حياك الله اخوي الزهراني وتعمدت تنفيذه بهذه الاوامر لانها كلها اوامر جاهزة وسهلة ! اذهب لاخر سجل > حدد السجل > انسخ > (اذهب لسجل جديد > حدد السجل > الصق ) وتلاحظ مابين الاقواس هو مانحتاج تكراره 30 مرة فوضعناه داخل جملة دوران! بالتوفيق رابط هذا التعليق شارك More sharing options...
alzahrani2014 قام بنشر أكتوبر 21, 2015 الكاتب مشاركة قام بنشر أكتوبر 21, 2015 شكرا لك حبيبي لدي اضافة اذا ممكن كحركة جمالية وهي قبل تنفيذ الامر اريد ان تظهر نافذة تحذيرية او تأكيدية بالموافقة من عدمها .... كيف يتم ذلك تحياتي لك رابط هذا التعليق شارك More sharing options...
رمهان قام بنشر أكتوبر 21, 2015 مشاركة قام بنشر أكتوبر 21, 2015 اضف هذا السطر في اول الكود السابق If MsgBox("استمرار ؟", vbYesNo) = vbNo Then: Exit Sub بالتوفيق 1 رابط هذا التعليق شارك More sharing options...
alzahrani2014 قام بنشر أكتوبر 21, 2015 الكاتب مشاركة قام بنشر أكتوبر 21, 2015 كلمة شكرا قليلة في حقك اسعدك الله في الدارين الف مليون تريليون شكر رابط هذا التعليق شارك More sharing options...
alzahrani2014 قام بنشر أكتوبر 22, 2015 الكاتب مشاركة قام بنشر أكتوبر 22, 2015 استاذي الفاضل جائتني فكرة .... يظهر ان الافكار تأتي تباعا كيف بالامكان ان نجعل عدد التكرار اختياري .... بمعنى ان تظهر نافذة قبل التنفيذ تسأل كم مرة تريد تكرار السجل ؟ اسف على كثرة الاسئلة تحياتي لك ايها المبدع رابط هذا التعليق شارك More sharing options...
رمهان قام بنشر أكتوبر 22, 2015 مشاركة قام بنشر أكتوبر 22, 2015 غير الرقم 30 الى: inputbox("ادخل عدد التكرار") بالتوفيق 1 رابط هذا التعليق شارك More sharing options...
alzahrani2014 قام بنشر أكتوبر 22, 2015 الكاتب مشاركة قام بنشر أكتوبر 22, 2015 الف الف شكر Many Thanks رابط هذا التعليق شارك More sharing options...
alzahrani2014 قام بنشر أكتوبر 22, 2015 الكاتب مشاركة قام بنشر أكتوبر 22, 2015 ,ولكن ظهرت مشكلة عند الغاء العملية اي لم اكتب اري رقم واخترت الغاء تظهر سالة فيجوال بيسك type missmatch وش الحل ؟ رابط هذا التعليق شارك More sharing options...
رمهان قام بنشر أكتوبر 22, 2015 مشاركة قام بنشر أكتوبر 22, 2015 اضف في اول الكود : On Error GoTo 10 وفي اخر الكود 10: بالتوفيق رابط هذا التعليق شارك More sharing options...
alzahrani2014 قام بنشر أكتوبر 23, 2015 الكاتب مشاركة قام بنشر أكتوبر 23, 2015 رائع جدا جدا بس ياليت تشرح ما معنى 10 و 10: للمعرفة شكرا لك رابط هذا التعليق شارك More sharing options...
رمهان قام بنشر أكتوبر 23, 2015 مشاركة قام بنشر أكتوبر 23, 2015 في لغات البرمجمة يتم تنفيذ الاسطر واحدا تلو الاخر مالم يكن هناك تحكم في التسلسل بعبارات تحكم او بالامر goto ثم عنوان السطر ! تتم كتابة عنوان السطر باي تعبير نصي مقبول ثم نقطتين هكذا : وفي الكود السابق اسميت السطر المراد الانتقال له ب 10 ثم نقطتين حسب القاعدة ليصبح اسم السطر او عنوانه :10 وتلاحظ انه استخدم الجملة on error ولها اشكال عدة ومعناتها لو حصل خطأ ويعقبها تعبيرات عدة ومنها اذهب الى goto ثم عنوان السطر المراد الانتقال له وتلاحظ انه لايوجد سطر ينفذ عند العنوان 10 لانني اريد الذهاب الى نهاية الكود ومعناته عدم تنفيذ اي سطر فالملخص لو حصل خطأ اذهب الى نهاية الكود قافزاً جميع الاوامر (الاسطر البرمجية ) والخطأ يحصل عند اختيار الغاء من مربع الادخال ! بالتوفيق رابط هذا التعليق شارك 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.