Sorry, take the WScript. out of the code for VBA like the following...
Dim my_documents as string
Dim objShell as Object
Set objShell = CreateObject("WScript.Shell")
demofolder = objShell.SpecialFolders("MyDocuments")
msgbox my_documents
Duane.
--- In [email protected], "Duane Hennessy" <[EMAIL PROTECTED]> wrote:
>
>
> Tobi,
> Don't pull out of system information, use this script instead...
>
> Dim my_documents as string
> Dim objShell as Object
> Set objShell = WScript.CreateObject("WScript.Shell")
> demofolder = objShell.SpecialFolders("MyDocuments")
> msgbox my_documents
>
> Bueno!
>
>
> Duane Hennessy.
> Bandicoot Software
> Tropical Queensland, Australia
> (ABN: 33 682 969 957)
>
> Want Increased Productivity?
> http://www.bandicootsoftware.com.au
>
>
> --- In [email protected], "Hoffman, Tobi K \(DYS\)" [EMAIL PROTECTED] wrote:
> >
> > I have a form to allow users to save a report, and want the default path
> > to be their "My Documents" folder. How can I pull that out of system
> > information?
> >
> > Tobi Hoffman
> > Dept. of Youth Services
> > Boston, MA
> >
>
Please zip all files prior to uploading to Files section.
| Microsoft access developer | Microsoft access help | Microsoft access database |
| Microsoft access training | Microsoft access training course | Microsoft access programming |
YAHOO! GROUPS LINKS
- Visit your group "AccessDevelopers" on the web.
- To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
- Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
