Login | Register   
LinkedIn
Google+
Twitter
RSS Feed
Download our iPhone app
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX


Tip of the Day
Language: VB5,VB6
Expertise: Intermediate
Jun 9, 2001

OpenSinglePaneExplorer - Open a folder in a single pane Explorer window

' Open a single pane Explorer window
'   sRoot is the root folder to open
'   bUpwardAllowed specifies whether the user will be allowed to navigate 
' upward the root
'
' Example:
'   OpenSinglePaneExplorer "D:\Webmaster", False

Sub OpenSinglePaneExplorer(Optional ByVal sRoot As String, _
    Optional ByVal bUpwardAllowed As Boolean = True)
    Shell "explorer " & IIf(bUpwardAllowed, " /n", "") & " /root," & sRoot, _
        vbNormalFocus
End Sub
Marco Bellinaso
 
Comment and Contribute

 

 

 

 

 


(Maximum characters: 1200). You have 1200 characters left.

 

 

Sitemap
Thanks for your registration, follow us on our social networks to keep up-to-date