du kan göra det, genom att förändra querydefen för att inkludera filtrera
dunkel qd som dao.querydef, db som dao.database
dunkel oSql som stränger, nSql som stränger
fastställd db=currentdb
uppsättning qd=db.querydefs (”SybizOutputQry”)
oSql=qd.sql
nsql=replace (qd.sql, ”; ” "")
nsql=nsql & ”var [OrderID] = 48670”,
qd.sql=nSql
DoCmd.TransferText-acExportDelim, ”SybizOutputQry”, ”C:\Export\test.csv” som är falsk
'till återställandebaksida querydefen
qd.sql=oSql