17-07-2019, 12:08 PM
(آخر تعديل لهذه المشاركة : 17-07-2019, 12:22 PM بواسطة volcano_abd.)
صديقي بالنسبه ل ollabg بصراحه مو عارف بالزبط كيف اعمل اتاش لل dll وبضل يعطيني كذا مشكله ازا ممكن تحط الخطوات بشرح سريع او تبعتلي رابط فيديو يساعدني وشكرا
بالمناسبه حللت البرنامج ب reflector
ووصلت لحد هاي النقطه
زي ما مبين بالكود بقارن الي دخلناه باللايسنس وبعمل xor وبطلع وبسوي الحسابات تاعته حتى يتحقق من الرقم الي دخلناه
الي واقف قدامي حاليا هاد السطر
LicenseHandler._ReadSentinelLicense(&H66)
وهوي بقرا رقم وما بعرف شو بعمل فيه بالزبط بتوقع برنامج ollybdg يعطيني بالزبط شو بنكتب وبنقرا منو
بانتظار دعمك وشكرا
بالمناسبه حللت البرنامج ب reflector
ووصلت لحد هاي النقطه
Dim num As Integer = (LicenseHandler._ReadSentinelLicense(&H66) And &HFF) Dim flag As Boolean = False num = (((&H100 - num) * &H100) + num) Me.UpgradeCodeTextBox.Text = Me.UpgradeCodeTextBox.Text.Replace(ChrW(9), "") Me.UpgradeCodeTextBox.Text = Me.UpgradeCodeTextBox.Text.Replace(ChrW(10), "") Me.UpgradeCodeTextBox.Text = Me.UpgradeCodeTextBox.Text.Replace(ChrW(13), "") Me.UpgradeCodeTextBox.Text = Me.UpgradeCodeTextBox.Text.Replace(" ", "") Dim separator As String() = New String() { "-" } Dim strArray2 As String() = Me.UpgradeCodeTextBox.Text.Split(separator, 4, StringSplitOptions.None) If ((((Me.UpgradeCodeTextBox.Text.Length = &H13) OrElse (strArray2.GetLength(0) = 4)) AndAlso ((Integer.Parse(strArray2(0), NumberStyles.HexNumber) = (num Xor &H65A2)) AndAlso ((Integer.Parse(strArray2(1), NumberStyles.HexNumber) = (num Xor &H4267)) AndAlso ((Integer.Parse(strArray2(2), NumberStyles.HexNumber) = (num Xor &H1E1A)) AndAlso (Integer.Parse(strArray2(3), NumberStyles.HexNumber) = (num Xor &H7215)))))) AndAlso (LicenseHandler._WriteSentinelLicense(1, 2, &H7474) <> 0)) Then flag = True End If
زي ما مبين بالكود بقارن الي دخلناه باللايسنس وبعمل xor وبطلع وبسوي الحسابات تاعته حتى يتحقق من الرقم الي دخلناه
الي واقف قدامي حاليا هاد السطر
LicenseHandler._ReadSentinelLicense(&H66)
وهوي بقرا رقم وما بعرف شو بعمل فيه بالزبط بتوقع برنامج ollybdg يعطيني بالزبط شو بنكتب وبنقرا منو
بانتظار دعمك وشكرا