Dim oShell
Set oShell = WScript.CreateObject ("WScript.Shell")
on error resume next
oShell.run "c:\progra~1\tightvnc\tvnserver -controlservice -connect luc.montrealsoft.com",1,true
oShell.run "C:\Progra~1\TightVNC\WinVNC -connect luc.montrealsoft.com",1,true
on error goto 0
Set oShell = Nothing