I have a selection of SQL queries I'd like to be able to email as a
collection so others can import them without my having to copy the
entire mdb file into their machines. Is there some way to export all
queries into a (preferably text) file?



- = -
Vasos Panagiotopoulos, Columbia'81+, Reagan, Mozart, Pindus, BioStrategist
http://www.facebook.com/vasjpan2
---{Nothing herein constitutes advice. Everything fully disclaimed.}---
[Homeland Security means private firearms not lazy obstructive guards]
[Urb sprawl confounds terror] [Remorse begets zeal] [Windows is for Bimbos]

vjp2.at (AT) at (DOT) BioStrategist.dot.dot.com wrote:
Looke at Open, Close, Print in help for creating/writing to a text file.

This will scan all the queries and display the name and the SQL.
Sub Q()
Dim qdf As QueryDef
For Each qdf In CurrentDb.QueryDefs
If Left(qdf.Name, 1) <> "~" Then MsgBox qdf.Name & vbNewLine &
qdf.SQL
Next
MsgBox "Done"
End Sub

Many thanks

In <qumdnWne1MBeLfbXnZ2dnUVZ_tSdnZ2d (AT) earthlink (DOT) com> by Salad <oil (AT) vinegar (DOT) com> on Sat, 25 Jul 2009 18:26:26 -0700 we perused:

*+-This will scan all the queries and display the name and the SQL.
*+-Sub Q()
*+- Dim qdf As QueryDef
*+- For Each qdf In CurrentDb.QueryDefs
*+- If Left(qdf.Name, 1) <> "~" Then MsgBox qdf.Name & vbNewLine &
*+-qdf.SQL
*+- Next
*+- MsgBox "Done"
*+-End Sub


- = -
Vasos Panagiotopoulos, Columbia'81+, Reagan, Mozart, Pindus, BioStrategist
http://www.facebook.com/vasjpan2
---{Nothing herein constitutes advice. Everything fully disclaimed.}---
[Homeland Security means private firearms not lazy obstructive guards]
[Urb sprawl confounds terror] [Remorse begets zeal] [Windows is for Bimbos]