كود للأستعلام الألحاقى

[جمال فايز]

أخواني الكرام

السلام عليكم ورحمة الله وبركاته

كيف يمكننا وضع كود للأستعلام الألحاقى بالقاعدة الخاصة بالاكسس .

[محمد طاهر عرفه]

قم يتصميم استعلام الاحاق بالطريقة العادية

http://www.officena.net/ib/index.php?showtopic=605

افتح الاستعلام فى وضع ال sql

انسخ الكود

ضعه فى سطر واحد بين "" مع حذف ما قد يضاف من "" آليا

اسبق ذلك بالامر Docmd.runsql

مثال

INSERT INTO DIALER ( Name, MOBILE )
SELECT DIALER.Name, DIALER.MOBILE
FROM DIALER
WHERE (((DIALER.Name)="mmmmm") AND ((DIALER.MOBILE)="0101010"));

يتحول الي

DoCmd.RunSQL "INSERT INTO DIALER ( Name, MOBILE )SELECT DIALER.Name, DIALER.MOBILE FROM DIALER WHERE (((DIALER.Name)='mmmmm') AND ((DIALER.MOBILE)='0101010'));"

أو

DoCmd.RunSQL "INSERT INTO DIALER ( Name, MOBILE )SELECT DIALER.Name, DIALER.MOBILE FROM DIALER" & _
"WHERE (((DIALER.Name)='mmmmm') AND ((DIALER.MOBILE)='0101010'));"

لاحظ

أن ال "," لما أصبحت داخل ال "," الخارجية تستبدل ب ' , '

و للكتابة فى سطر جديد ننهي الجملة ب "

و نتبعها ب & ثم _

موضوع مرتبط

ما هي أقصر الطرق لكتابة جمل ال SQL داخل الكود

إدراج جمل SQL داخل ال VBA

http://www.officena.net/ib/index.php?showtopic=50

و

http://www.officena.net/ib/index.php?showtopic=954