لو تكرمتوا في عندي مشكلة في كود النسخ...ما ادري وين الخطأ

الخطأ بعبارة الـ SQL هذه

strSql = "INSERT INTO [classtable_2010] ( id, common, scientific, package, quantity,origin, class,variety,note ) " & _
                    "SELECT " & lngID & " As NewID, ProductID, Quantity, UnitPrice, Discount " & _
                    "FROM [classtable_2010] WHERE id = " & Me.id & ";"

حيث لا يجب ان يتبع تعليمة INSERT عبارة SELECT

صباح الخير اخي yaser_ac

شاكر لك على الرد...ولكن كيف يكون التعديل ...هل ازيل كلمة select??....لقد قمت بحذفها فظهر لي خطا ايضا

ممكن التكرم مشكورا والتعديل على المرفق.

مع خالص شكري

ما زلت في انتظار المساعد

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

للرفع

مع حاجتي الملحة لهذا الكود....

ممكن اعرف ما هي المهمة من النسخ .. ماذا سنتسخ والى اين اللصق.؟

اخي العزيز

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

على سبيل المثال اذا كان رقم السجل الحالي 6

اريد عند ضغط هذا الزر ان ينسخ السجل الرئيسي مع السجل الفرعي ليعطي سجل جديد رقم 7

وهكذا

مع الشكر والتقدير

الاخ السائل

المشكلة عندك فى جملة الاستعلام ان عدد الحقول على الجانبين غير متساوى

                strSql = "INSERT INTO [classtable_2010] ( id, common, scientific, package, quantity,origin, class,variety,note ) " & _
                    "SELECT " & lngID & " As NewID, ProductID, Quantity, UnitPrice, Discount " & _
                    "FROM [classtable_2010] WHERE id = " & Me.id & ";"

ففى الجملة انت تريد الاضافة الى 9 حقول بالجدول و لكنك حددت 5 قيم فقط لاضافتها

لكى تنجح العملية يجب ان يكون العدد متساوى ( عدد الحقول المنسوخة = عدد الحقول المنسوخ اليها )

ايضا يجب ان تكون بنفس الترتيب

اليك التعديل على الجملة

            strSql = "INSERT INTO classtable2010 ( id, common, scientific, package, quantity, origin, class, variety, [note] ) " & _
                 "SELECT " & lngID & " AS NewID, common, scientific, package, quantity, origin, class, variety, note " & _
                  "FROM classtable2010 WHERE (((id)=" & Me.id & "));"

بارك الله فيك استاذي ابو يوسف

نعم لقد فهمت المشكلة وتم التصحيح

وبارك الله فيك

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