'************************************************************************
'* Démarrer une application après un délai                              *
'* DOCmémo - www.docmemo.com                                            *
'************************************************************************
'* Personnalisation :                                                   *
'* - prog : le ficier exécutable du programme                           *
'* - fichier : le fichier à ouvrir par le programme (pas indispensable) *
'* - délai : le délai en secondes                                       *
'************************************************************************
Set WshShell = WScript.CreateObject("WScript.Shell")
prog="C:\Program Files\Internet Explorer\iexplore.exe"
fichier="http://www.google.fr"
delai=1 'en secondes
WScript.Sleep delai*1000
WshShell.Run Chr(34) & prog & Chr(34) & " " & fichier
Set WshShell = Nothing