السلام عليكم ورحمة الله وبركاته ............................. وعام علم وأنتم لله أقرب وللعبادة أنشط
أرجو تعديل الكود التالي
DoCmd.RunSQL "INSERT INTO lg_student ( name, alshobah, all1, name1, alsaf, alfasel, name2, name3, name4 )" & _
" SELECT [name1] & ' ' & [name2] & ' ' & [name3] & ' ' & [name4] AS name, st_student.alshobah, st_student.all1, st_student.name1, st_student.alsaf, [alfasel]+100 AS ÇáÝÕá, st_student.name2, st_student.name3, st_student.name4 " & _
"FROM st_student" & _
"Where (((st_student.alshobah) = 1) And ((st_student.all1) = 1000) And ((st_student.alsaf) <> 1 And (st_student.alsaf) <> 2 And (st_student.alsaf) <> 3)" & _
"ORDER BY [name1] & ' ' & [name2] & ' ' & [name3] & ' ' & [name4]; "
ولكم التحية