Pytanie : Eksportować zapytanie CSV kartoteka z Zapytanie Filtrowy/Dokąd Warunek

I mieć dojazdowy Zapytanie który I chcieć CSV kartoteka. , I chcieć the zapytanie najpierw przez kod więc the CSV kartoteka tylko mieć pewny rejestr w it.

I próbować the pewny kod i być sprawnie the otwarty Zapytanie ale the wydajność kartoteka mieć wszystkie OrderID's. Mój całkowity cel być sprawnie pewny rozkaz i wtedy CSV kartoteka wymieniać the OrderID (e.g 48670.csv w the wymieniać kod przykład).

Can zadawalać zadawalać pomagać z the sposób lub dokąd warunek na the zapytanie wymieniać "SybizOutputQry".

Thanks,

Andrew 
(1):
2:
3:
4:

DoCmd.OpenQuery ("SybizOutputQry")
    DoCmd.ApplyFilter, "[OrderID] =" & 48670
    
    DoCmd.TransferText acExportDelim, "SybizOutputQry", "C:\Export\test.csv", Fałszywy

Odpowiedź : Eksportować zapytanie CSV kartoteka z Zapytanie Filtrowy/Dokąd Warunek

ty móc ono the querydef the filtr

ciemnawy qd jako dao.querydef, db jako dao.database
ciemnawy oSql jako sznurek, nSql sznurek
ustawiać db=currentdb
ustawiać qd=db.querydefs ("SybizOutputQry")
oSql=qd.sql
nsql=replace (qd.sql, "; ", "")
nsql=nsql & "Dokąd [OrderID] = 48670"
qd.sql=nSql

DoCmd.TransferText acExportDelim, "SybizOutputQry", "C:\Export\test.csv", Fałszywy
 
'z powrotem the querydef
qd.sql=oSql
Inne rozwiązania  
 
programming4us programming4us