14 lines
226 B
Plaintext
14 lines
226 B
Plaintext
|
<html>
|
||
|
|
<head>
|
||
|
|
<script language="VBScript">
|
||
|
|
Sub foo
|
||
|
|
command = "notepad.exe"
|
||
|
|
Set objShell = CreateObject("Wscript.Shell")
|
||
|
|
objShell.Run command
|
||
|
|
End Sub
|
||
|
|
foo()
|
||
|
|
</script>
|
||
|
|
</head>
|
||
|
|
<body>
|
||
|
|
</body>
|
||
|
|
</html>
|