فکر کنم میخواستین با استفاده از * در like بنحوی پارامتر optional رو شبیه سازی کنین.
در هر صورت لازم نیست طراحی کوئری رو پیچیده کنین.
شما کوئری رو بصورت پارامتریک استاندارد تعریف کنین:
like [code_meli]
like [code_dore]
حالا هر جا نیاز داشتین پارامترها رو به کوئری پاس کنین:
SUB REPORT_OPEN
DIM QD AS QUERYDEF
SET QD=CURRENTDB.QUERYDEFS("QueryName")
DIM FRM AS FORM
IF Student_Form THEN
SET FRM=FORMS("STU_FORM")
ELSE
SET FRM=FORMS("PRINT_FORM")
ENDIF
QD.PARAMETERS("code_meli")=FRM![CODE_MELI]
QD.PARAMETERS("code_dore")=FRM![CODE_DORE]
ME.RECORDSOURCE=CURRENTDB.QUERYDEFS("QueryName").O PENRECORDSET.NAME
END SUB
پاسخ با نقل قول
نوشته شده توسط mazoolagh
