Open a folder direct from access - Maximised

Studenn

Registered User.
Local time
Today, 01:38
Joined
Dec 24, 2004
Messages
13
Thanks for all the help so far.

Although I have designed and use a number of databases this has all been done very successfully using very little code.

I have used the following to open a named folder from a command button on an access form. The window opens minimised, Have searched the forum and see that I need to specify a second argument in the shell statement. - I cant get it to work.

Can anyone help please. My code so far is:-

Private Sub Command165_Click()



Dim xPath, xFolder, xCmd As String

xPath = "C:\Documents and Settings\admin\My Documents\folder\"

xFolder = xPath & Me![ClientName]
' (MkDir xFolder ' create folder )
xCmd = "explorer.exe " & xFolder & "\" ' open folder
Shell (xCmd)
Quote:
End Sub
Edit/Delete Message
 

Users who are viewing this thread

Back
Top Bottom