Looping through every oject for Application.Sav eAsText

[lauren quantrell]

Wondering if anyone has already written a snippet that will loop
through every form, report, module in an ADP application and do
application.Sav eAsText on each item.

[Douglas J. Steele]

Arvin Meyer has a snippet at http://www.datastrat.com/Code/DocDatabase.txt

I can't guarantee it'll work on an ADP, though, as I've never tried it.

--
Doug Steele, Microsoft Access MVP
http://I.Am/DougSteele
(no e-mails, please!)

"lauren quantrell" <la************ *@hotmail.com> wrote in message
news:11******** *************@g 14g2000cwa.goog legroups.com...

Wondering if anyone has already written a snippet that will loop
through every form, report, module in an ADP application and do
application.Sav eAsText on each item.

[lylefair]

Yes.

[XMVP]

"lylefair" <ly******@yahoo .ca> wrote in message
news:11******** **************@ f14g2000cwb.goo glegroups.com.. .

Yes.

A much better answer than Arvin's Web site--and no plagiarism!

[lauren quantrell]

That link doesn't seem to work.
lq

[RoyVidar]

lauren quantrell wrote in message
<11************ **********@g43g 2000cwa.googleg roups.com> :

That link doesn't seem to work.
lq

The contents of the link didn't work, or the link?

For the content, I'm not sure it'll work in an ADP. I don't think
CurrentDB is
a member of the Application object of an ADP. You could perhaps loop
the
following collections of the currentproject object instead

AllForms, AllReports, AllMacros, AllModules

Air code

for each vObj in currentproject. allforms
application.sav eastext acform, vObj.name, "D:\Documen t\" &
vObj.name & ".txt"
next vObj

I believe views/SPs are stored on the server, so you probably won't be
able to
get at them

--
Roy-Vidar

[lylefair]

There is some code in
http://www.ffdba.com/downloads/downloads.zip
that !!!!may!!!!
do what you describe,
(together with other things).

[lauren quantrell]

Thanks for the code. I'll try it. The link that was posted is down.