محمد سلامة قام بنشر أبريل 28, 2017 قام بنشر أبريل 28, 2017 السلام عليكم اريد نسخ عدد من مربعات النص مثلا 5 او 6 مربع نص من السجل الحالي.. ولصقهم في السجل التالي مباشرة بضغطة زر جربت استعلام الحاق ولكن لم افلح @رمهان استاذ رمهان تم فتح موضوع جديد كما اشرت سابقا
jjafferr قام بنشر أبريل 28, 2017 قام بنشر أبريل 28, 2017 وعليكم السلام طريقتين يجون على بالي: 1. نسخ السجل بالكامل ، عمل سجل جديد ، لصق بيانات السجل ، ثم حذف/تصفية الحقول التي لا تريدها: DoCmd.RunCommand acCmdSelectRecord DoCmd.RunCommand acCmdCopy DoCmd.GoToRecord , , acNewRec DoCmd.RunCommand acCmdPaste me.Field5=0 me.Field6="" 2. تنسخ قيمة كل حقل في متغير في الكود ، عمل سجل جديد ، لصق هذه المتغيرات الى حقولها: a1=me.field1 a5=me.field5 a6=me.filed6 DoCmd.GoToRecord , , acNewRec me.field1=a1 me.field5=a5 me.filed6=a6 جعفر 3
محمد سلامة قام بنشر أبريل 28, 2017 الكاتب قام بنشر أبريل 28, 2017 في 28/4/2017 at 07:57, jjafferr said: وعليكم السلام طريقتين يجون على بالي: 1. نسخ السجل بالكامل ، عمل سجل جديد ، لصق بيانات السجل ، ثم حذف/تصفية الحقول التي لا تريدها: DoCmd.RunCommand acCmdSelectRecord DoCmd.RunCommand acCmdCopy DoCmd.GoToRecord , , acNewRec DoCmd.RunCommand acCmdPaste me.Field5=0 me.Field6="" 2. تنسخ قيمة كل حقل في متغير في الكود ، عمل سجل جديد ، لصق هذه المتغيرات الى حقولها: a1=me.field1 a5=me.field5 a6=me.filed6 DoCmd.GoToRecord , , acNewRec me.field1=a1 me.field5=a5 me.filed6=a6 جعفر Expand شكرا استاذ جعفر انا بالفعل كنت جربت الطريقة التانية ولكنه لا تعجبني والطريقة الاولي جميلة وسوف استخدامها شكرا استاذ جعفر تم المطلوب
رمهان قام بنشر أبريل 28, 2017 قام بنشر أبريل 28, 2017 (معدل) اعتذر عن التاخر والاستاذ جعفر فيه البركة وكفى ووفى وحبيت لو مرفق بسيط نشوف طرق ثانيه تحياتي تم تعديل أبريل 28, 2017 بواسطه رمهان 1
محمد سلامة قام بنشر أبريل 28, 2017 الكاتب قام بنشر أبريل 28, 2017 في 28/4/2017 at 18:27, رمهان said: اعتذر عن التاخر والاستاذ جعفر فيه البركة وكفى ووفى وحبيت لو مرفق بسيط نشوف طرق ثانيه تحياتي Expand شكرا لك استاذ رمهان بل انا الذي اعتذر علي الازعاج والاستاذ جعفر دائما سباق بالخير جزاكم الله خيرا وكل عام وانتم بخير @jjafferr @رمهان
jjafferr قام بنشر أبريل 28, 2017 قام بنشر أبريل 28, 2017 في 28/4/2017 at 18:27, رمهان said: والاستاذ جعفر فيه البركة وكفى ووفى Expand هلا والله بالاستاذ رمهان في 28/4/2017 at 21:07, محمد سلامة said: شكرا لك استاذ رمهان بل انا الذي اعتذر علي الازعاج والاستاذ جعفر دائما سباق بالخير جزاكم الله خيرا وكل عام وانتم بخير @jjafferr @رمهان Expand حياك الله أخوي محمد جعفر 1
عيسى الحوراني قام بنشر مايو 4, 2017 قام بنشر مايو 4, 2017 (معدل) في 28/4/2017 at 07:57, jjafferr said: وعليكم السلام طريقتين يجون على بالي: 1. نسخ السجل بالكامل ، عمل سجل جديد ، لصق بيانات السجل ، ثم حذف/تصفية الحقول التي لا تريدها: DoCmd.RunCommand acCmdSelectRecord DoCmd.RunCommand acCmdCopy DoCmd.GoToRecord , , acNewRec DoCmd.RunCommand acCmdPaste me.Field5=0 me.Field6="" 2. تنسخ قيمة كل حقل في متغير في الكود ، عمل سجل جديد ، لصق هذه المتغيرات الى حقولها: a1=me.field1 a5=me.field5 a6=me.filed6 DoCmd.GoToRecord , , acNewRec me.field1=a1 me.field5=a5 me.filed6=a6 جعفر Expand الف شكر استاذ جعفر كود رائع طبقت الكود الثاني على قاعدة بياناتي واعطى نتيجى رائعة تم تعديل مايو 4, 2017 بواسطه عيسى الحوراني
عيسى الحوراني قام بنشر مايو 4, 2017 قام بنشر مايو 4, 2017 (معدل) في 4/5/2017 at 15:59, jjafferr said: Expand ارجو منك استاذ جعفر الاطلاع على موضوعي وابداء رأيك تم تعديل مايو 4, 2017 بواسطه عيسى الحوراني
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.