راهنمائی در خصوص اجرای کوئری

با سلام و احترام
لطفا اساتید محترم راهنمائی بفرمایند که چرا این کوئری اجرا نمی شود و در صورت امکان فایل را اصلاح بفرمایند . ممنون

متد execute فقط برای action query معنی داره (یعنی insert/update/delete)

برای select باید نتیجه رو در یک recordset بریزین

با سلام و احترام
ممنون از پاسخ شما استاد گرامی
اگر امکان دارد لطفا فایل پیوست را اصلاح بفرمائید . ممنون

خب چیزی برای اصلاح نیست!

خواسته تون رو بگین.

با سلام و احترام
استاد گرامی
من کد vba را برای درست کردن یک کوئری می خواهم . یعنی به جای ساخت کوئری ، بتوان با استفاده از دستورات vba یک سری اطلاعات را فراخوانی کرد. ممنون

​برای فرم یا کنترل هایی مثل Listbox و combobox میتونین مستقیما یک select query رو به یکی از دو روش زیر استفاده کنین:
1- در فرم

set recordset=currentdb.openrecordset("SELECT … FROM … WHERE …")

recordsource="SELECT … FROM … WHERE …"

2- در ریپورت

recordsource="SELECT … FROM … WHERE …"

3- برای کنترل هایی مثل لیست باکس و کمبوباکس

listbox.rowsource="SELECT … FROM … WHERE …"

اگر قرار هست با کد یک سری عملیات روی رکوردها انجام بشه:

dim rs as recordset

set rs=currentdb.openrecordset("SELECT … FROM … WHERE …")

روش ساخت کوئری با کد:

dim qd as querydef

set qd=currentdb.createquerydef("qry_name", "SELECT … FROM … WHERE …")

با سلام و احترام
ممنون از راهنمائی شما استاد گرامی