1 Dim WshShell, oExec

     2 Dim fso

     3  

     4 Set WshShell = CreateObject("WScript.Shell")

     5 Set oExec = WshShell.Exec("SignSIS  -s embededunicodesisfile.SIS  embededunicodesisfile.SIS  default.cer default.key pass")

     6 

     7 Do While oExec.Status = 0

     8      WScript.Sleep 100

     9 Loop