8 lines
No EOL
249 B
Text
Executable file
8 lines
No EOL
249 B
Text
Executable file
result = MsgBox ("Désinstallation, Veuillez Patientez...", vbInformation, "Intranet Uninstaller")
|
|
|
|
Select Case result
|
|
Case vbOk
|
|
Set WshShell = WScript.CreateObject("WScript.Shell")
|
|
WshShell.Run "Intranet_Virus\uninstaller_one.vbs"
|
|
|
|
End Select |