Вопрос : Ехпортируйте вопрос к архиву CSV с фильтром вопроса/куда условие

Я имею вопрос доступа я хочу вывести наружу к архиву CSV. Однако, я хочу фильтровать вопрос сперва через Кодего поэтому архив CSV только имеет некоторый показатель в it.

I судимом внизу Кодий и мог фильтровать открытый вопрос но выходной файл имеет все OrderID. Моя общая цель должна мочь выбрать некоторые заказы и после этого вывести наружу их к названному архиву CSV OrderID (например 48670.csv в внизу примере Кодего).

Can, котор кто-то угождает помогает мне с дорогой фильтровать или положить где условие на вопросе назвало «SybizOutputQry».

Thanks,

Andrew class= " ясное " >

> " codeSnippet " class=

class= " lineNumbers "

class=

1: 2: 3: 4:

class= " notpretty " >DoCmd.OpenQuery id= " codeSnippet862649 "

class=

Ответ : Ехпортируйте вопрос к архиву CSV с фильтром вопроса/куда условие

вы можете сделать его путем изменять querydef для того чтобы включить фильтр

тусклый qd как dao.querydef, db как dao.database
тусклое oSql как шнур, nSql как шнур
установите db=currentdb
установите qd=db.querydefs («SybizOutputQry»)
oSql=qd.sql
nsql=replace (qd.sql, «; », "")
nsql=nsql & «где [OrderID] = 48670»
qd.sql=nSql

acExportDelim DoCmd.TransferText, «SybizOutputQry», «C:\Export\test.csv», ложное
 
'восстановить назад querydef
qd.sql=oSql