Frage : Eine Frage in eine CSV Akte mit einem Fragen-Filter exportieren/wo Bedingung

Ich habe eine Zugang Frage, die ich zu einer CSV Akte ausgeben möchte. Jedoch möchte ich die Frage über Code zuerst filtern, also hat die CSV Akte nur bestimmte Aufzeichnung in it.

I versuchte den below Code und in der Lage war, die geöffnete Frage zu filtern, aber die Ausgabedatei hat alles OrderIDs. Mein Gesamtziel ist, in der Lage zu sein, bestimmte Aufträge vorzuwählen und sie zu einer CSV Akte dann auszugeben, die das OrderID genannt wird (z.B. 48670.csv im below Codebeispiel).

Can, das jemand gefallen, helfen mir mit der Weise, zu filtern oder zu setzen, wo Bedingung auf der Frage „SybizOutputQry“ nannte.

Thanks,

Andrew
1:
2:
3:
4:
DoCmd.OpenQuery („SybizOutputQry“)
    DoCmd.ApplyFilter, „[OrderID] =“ u. 48670
    
    DoCmd.TransferText acExportDelim, „SybizOutputQry“, „C:\Export\test.csv“, falsch

Antwort : Eine Frage in eine CSV Akte mit einem Fragen-Filter exportieren/wo Bedingung

Sie können es tun, indem Sie das querydef ändern, um den Filter mit einzuschließen

schwacher qd als dao.querydef, DB als dao.database
schwaches oSql als Schnur, nSql als Schnur
db=currentdb einstellen
qd=db.querydefs („SybizOutputQry“) einstellen
oSql=qd.sql
nsql=replace (qd.sql, „; “, "")
nsql=nsql u. „, wo [OrderID] = 48670“
qd.sql=nSql

DoCmd.TransferText acExportDelim, „SybizOutputQry“, „C:\Export\test.csv“, falsch
 
'das querydef zurück wieder herstellen
qd.sql=oSql

Weitere Lösungen  
 
programming4us programming4us