< Back
Document Subject: Open Windows Explorer to Directory
Hint Short Cut: Add this to your code & documentation to help you find this page.
http://#ShowDirectory or http://A555F9/nn.nsf/ByAlias/ShowDirectory

Here is a code snippet to allow the user to view a directory on a windows machine.




 

Dim uiw As New notesuiworkspace
Dim uidoc As notesuidocument
Set uidoc = uiw.currentdocument
If uidoc.fieldgettext("Directory")="" Then
 Msgbox "Please set up a Directory first."
 End
End If
Dim taskId As Integer
Print "Loading Windows explorer ... to " & uidoc.fieldgettext("Directory")
taskId% = Shell("EXPLORER.EXE " & uidoc.fieldgettext("Directory") , 1)