Export to text

[ChoonBoy]

I am trying to get the code below to work but with no success. The objective
is to export to a text file using the sql statement instead of creating a
save query than do the transfer. Appreciate any help, thanks in advance.


Dim strsql as string

Strsql =â€SELECT qryCountItmUsers.[Item No], Count(qryCountItmUsers.Cust) AS
CountOfCust, qryCountItmUsers.[Sman Code] FROM qryCountItmUsers GROUP BY
qryCountItmUsers.[Item No], qryCountItmUsers.[Sman Code];â€


DoCmd.TransferText acExportDelim, "", " Strsql ", "c:\RMDB\TblOrders3a.txt",
False, ""

 

[Tom van Stiphout]

On Mon, 9 Feb 2009 05:24:01 -0800, ChoonBoy

Putting StrSql between double-quotes is certainly incorrect, but even
when fixed this is not going to work: Access requires the name of a
table or query.
What's wrong with dynamically assigning the SQL to a query, and then
using it for export? Lookup the Qry property for a Querydef object.

-Tom.
Microsoft Access MVP

 

[Ken Snell \(MVP\)]

see reply in other newsgroup where you posted this question.