Comment lancer un programme avec un .vbs

Bonjour,

sur un programme en .vbs j'essaye d'executer un fichier en .bat j'ai beaucoup cherché mais à chaque fois j'ai une erreur

blabla=msgbox ("blabla1",4+32+256,"blabla1")
if LaunchMessage=vbYes then

blabla=msgbox ("blabla",1+48+256,"blabla")

if Warning=vbOkay then

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run """fichier.bat"""

end if

Pourriez-vous m'aider