This function will return the user's My Documents folder:
Public Function MyDocumentsFolder() As String
Dim wshShell As Object
Set wshShell = CreateObject("WScript.Shell")
MyDocumentsFolder = wshShell.SpecialFolders("MyDocuments")
End Function
>Hi,
>
[quoted text clipped - 12 lines]
>thanks heaps
>Lee-Anne
--
John Nurick [Microsoft Access MVP]
Please respond in the newgroup and not by email.
ozgirl - 22 Dec 2005 23:32 GMT
many thanks John..
>This function will return the user's My Documents folder:
>
[quoted text clipped - 14 lines]
>
>Please respond in the newgroup and not by email.