‏windows 8

New member



اليوم بأدن الله معى درس برمجي سنتعرف فيه على التالي بأدن الله :
كيفية التعامل معى الروجيستري في الـVb.net
كيفية القرائة من الروجيستري واستخراج محتوى القيم المخزنة
كيفية استغلال ماتعلمناه وتطبيقه في برنامج جميل ومهم.
برمجة برنامج يقوم بأحضار كل محتويات برنامج No-Ip

iTS30053.png


هده صورة لواجهة البرنامجالمتحصل عليه أثناء انتهاء الدرس :



iTS30053.png
الأن نأتي الى الشرح ونتابع الشرح كتابي + صور نتابع :

أولا لنضع على الفورم الكائنات او الأدوات التالية ونرتبها مثل الصورة :

iTS30053.png

4 Label
4 صور صغيرة للتزيين


1 ListBox
iTS30053.png

الان نغير أسماء الأدوات كما في الصورة ولك حرية التعديل .
iTS30053.png

الان نأتي الى الأكواد
نضغط على Label الخروج ونكتب :


()Close

ويعني غلق البرنامج
iTS30053.png

والأن نذهب الى Lable عن المبرمج نضغط مرتين ونكتب :

("هنا أكتب ما تشاء عن نفسك او لغة البرمجة المستعملة ما تشاء")Msgbox

وهادا الأمر خاص بأضهار رسالة للمستخدم محتواها ما تكتبه انت

مثلا أنا كتبت :


("MsgBox("Made Programing By M!I3A_H4CK3R & Visual Basic Express Edition

والأن نأتي الى Label التي تحمل أسم تفريغ ونكتب في السورس كود الخاص بها :

()ListBox1.Items.Clear

وهادا الأمر يقوم بتفريغ او حدف كل محتوى ListBox


والأن نأتي الى زر النسخ ونكتب :

(My.Computer.Clipboard.SetText(ListBox1.Text

وهادا الامر خاص بنسخ كل محتوى الكائن ListBox


والأن الى الزر الرئيسي في البرنامج وهوا الخاص بالتعامل معى الروجيستري :
أولا يجب أن نصعد الى أعلى صفحة السورس ونستدعي هده المكتبة الجاهزة للتعامل معى الروجيستري :

Imports Microsoft.Win32

من دونها لن تستطيع التعامل معى الروجيستري بهده الطريقة وسيخرج لك رسالة خطأ


تم نتابع


مبرمج الهاكر

_Dim reg As RegistryKey = Registry.LocalMachine.OpenSubKey
("SOFTWARE\Vitalwerks\DUC", True)
ListBox1.Items.Add("")
ListBox1.Items.Add("------------------ اسم الحساب ------------------")
ListBox1.Items.Add("")
ListBox1.Items.Add(reg.GetValue("Hosts"))
ListBox1.Items.Add("")
ListBox1.Items.Add("----------------- Email الحساب -----------------")
ListBox1.Items.Add("")
ListBox1.Items.Add(reg.GetValue("Username"))
ListBox1.Items.Add("")
ListBox1.Items.Add("------------------ الباسورد -------------------")
ListBox1.Items.Add("")
ListBox1.Items.Add(reg.GetValue("Password"))
ListBox1.Items.Add("")
ListBox1.Items.Add("------------- لفك تشفير الباسوورد --------------")
ListBox1.Items.Add("")
ListBox1.Items.Add("http://rumkin.com/tools/compression/base64.php")
ListBox1.Items.Add("")
ListBox1.Items.Add("-----------------------------------------------"​
iTS30053.png


والأن نقوم بحفض المشروع كاملا وذلك بالضغط على Save All
الأن أضغط على الزر F5 من الكيبورد اي لوحة المفاتيح لتجربة البرنامج
ومبروك تم بنجاح وهاذا الناتج .
iTS30053.png





iTS30053.png


الأن معى الشرح الكود الأخير والدي يتعامل معى الروجيستري :

Dim reg As RegistryKey = Registry.LocalMachine.OpenSubKey
("SOFTWARE\Vitalwerks\DUC", True


عرفنا متغير جديد من نوع روجيستري وأعطيناه اسم Reg والمسار الذي نريد ان نعمل فيه.
iTS30053.png

هنا السطر الثاني والثالث نفس العمل :


ListBox1.Items.Add("")

وها امر مقصود بيه أضف الكتابة التي بين علامتي التنصيص الى الأدات ListBox

iTS30053.png

السطرالرابع وهوا كيفية القرائة من الروجيستري :

ListBox1.Items.Add(reg.GetValue("Hosts"))

هنا قمنا بأمر المتغير الذي عرفناه مسبقا وهوا Reg بقرائة محتوى القيمة Hosts الموجودة في الروجيستري
وطباعة محتواها في الأدات ListBox
باقي الأكواد هيا نفسها التي شرحتها الأن ولا تحتاج الى أعادة
فقط غيرنا كل مرة اسم القيمة الموجودة في الروجيستري وهيا التي تحمل ما نحتاجه مثلا :
Hosts = أسم حساب No-Ip
Password = هيا التي تحمل الباسوور او كلمة السر .
+
كلمة السر تجدها مشفرة بخورزمية Base64
ولكسرها بسرعة وضعت لكم رابط Index بسيط لفك تشفيرها :

http://rumkin.com/tools/compression/base64.php
iTS30053.png

iTS30053.png

الى هنا نصل الى نهاية الموضوع أرجو ان افيد ولو بالقليل
لا تحرمونا من كلمة شكر تنير الموضوع
في أمان الله ودمتم في حفض الله .
iTS30053.png
 

التعديل الأخير بواسطة المشرف:

المواضيع المشابهة


رد: كيفية التعامل معى الروجيستري في الـVb.net, برمجة برنامج يقوم بأحضار كل محتويات برنامج No-Ip, كيف

الله يعطيك الف عافية
 


رد: كيفية التعامل معى الروجيستري في الـVb.net, برمجة برنامج يقوم بأحضار كل محتويات برنامج No-Ip, كيف

شرح ممتاز بارك الله فيك
تقييم
 


رد: كيفية التعامل معى الروجيستري في الـVb.net, برمجة برنامج يقوم بأحضار كل محتويات برنامج No-Ip, كيف

يعطيك العافية
 


رد: كيفية التعامل معى الروجيستري في الـVb.net, برمجة برنامج يقوم بأحضار كل محتويات برنامج No-Ip, كيف

الله يعطيك الف عافيه ...

جميل جدا ...

تقبل مروري ي بطل ...
 


رد: كيفية التعامل معى الروجيستري في الـVb.net, برمجة برنامج يقوم بأحضار كل محتويات برنامج No-Ip, كيف

#




- تسلم الايــادى يا جميل فى انتـظار المزيد من التميز -
- تحياتى لك دائما بالتوفيق -
 

عودة
أعلى