[peterm]

Option explicit

Dim WshShell, RetCode, objShellApp

Set WshShell = CreateObject("WScript.Shell")
Set objShellApp = CreateObject("Shell.Application")


objShellApp.Open("D:\Internet")
objShellApp.Open("D:\Internet\Doc Soft JavaScript vbScript WSH etc")


WshShell.Run "iexplore",1


WshShell.Run """C:\Program Files\Opera\opera.exe""",2


WshShell.Run "AcroRd32 " & _
"D:\__Temp Doc Soft\__Doc_0005\WSH\VBScript.pdf",2

WshShell.Run "AcroRd32 " & _
"D:\__Temp Doc Soft\WSH\Windows Scripting Host Programmer's Reference.pdf",2



WshShell.Run "hh D:\__Temp Doc Soft\WHS_Automation.chm",2
WshShell.Run "hh D:\__Temp Doc Soft\WSH\vbscrip5.chm",2
WshShell.Run "hh D:\__Temp Doc Soft\WSH\JScript5rus.chm",2

WshShell.Run """D:\__Temp Doc Soft\WSH\Scripts_for_Win_admins_Torres.djvu""",2

objShellApp.Open("D:\Projects\Scripts WSH Jscript Vbscript")

WshShell.Run "wordpad ""D:\__Temp Doc Soft\WSH\Kurs VBScript.rtf""",2