INSERT INTO

[Hermes1966]

سلام خدمت اساتید محترم،

من یک دستور SQL را بصورت زیر در محیط VBA اکسس کپی کردم:


";CurrentDb.Execute "INSERT INTO tblStep1 SELECT QTable.* FROM QTable WHERE (((QTable.Light)= 4))


این دستو رکاملا درست کار میکنه و هیچ مشکلی نداره اما وقتی می‌خوام مقدار (یعنی عدد 4) رو از یک تکس باکس بخونه خطا میده و هر کاری می‌کنم نمی‌خونه.
ممنون میشم اگر مشکل خط زیر رو بفرمایید که چی هست:

";CurrentDb.Execute "INSERT INTO tblStep1 SELECT QTable.* FROM QTable WHERE (((QTable.Light)= Text2))

با تشکر

[mazoolagh]

سلام و روز خوش

نباید هم کار کنه!

توضیح خوبی در تاپیک زیر هست:

جستجوی ردیف (https://barnamenevis.org/showthread.php?576514-%D8%AC%D8%B3%D8%AA%D8%AC%D9%88-%DB%8C-%D8%B1%D8%AF%DB%8C%D9%81)

[Hermes1966]

mazoolagh (https://barnamenevis.org/member.php?9893-mazoolagh) عزیز ممنون از پاسخگویی شما. اما من با مراجعه به تاپیکی که ذکر کردید متوجه مشکل نشدم. خط کد خودم رو با توجه به مطالب تاپیک تغییر دادم اما کماکان خطا داره. ممنون میشم واضح‌تر
راهنمایی بفرمایید.

[Hermes1966]

ممنونم مشکل به صورت زیر حل شد:
";" & CurrentDb.Execute "INSERT INTO tblStep1 SELECT QTable.* FROM QTable WHERE QTable.Light= " & Me.Text28
با سپاس