Как в vbscript открыть папку?

Не могу найти как в vbscript открыть папку, чтобы потом оттуда копировать файлы руками.

спасибо

'Êîïèðóåì ôàéë
   Set FSO = CreateObject("Scripting.FileSystemObject")

   'If FSO.FileExists(DstFileName) Then
       Set MyShell = CreateObject("WScript.Shell")
       result = MyShell.Run("%SystemRoot%\explorer.exe """ & DstFolderName & """") ' ""-"" " & DstFolderName, 0, True)
       'On Error Resume Next
       result = MyShell.Run(DstFolderName, 0, False)
   'End If