• 0
zahrah

اظهار رقم المعالج من خلال برنامج الاكسيس

سؤال

اعزائي الكرام

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

اليكم كود اظهار رقم المعالج مع الشرح

طريقة الاستخدام

بعد فك الضغط عن الملف ستجد به ثلاث ملفات في المجلد

1. ملف قاعدة البيانات Get_Processor_Number.mdb

2. ملف مكتبة wbemdisp.dll

3. ملف مكتبه جدولي wbemdisp.tlb

1. نقوم بنسخ ملف المكتبة wbemdisp.dll و wbemdisp.tlb الى مجلد wbem في مجلد النظام في مجلد الويندوز

C:\WINDOWS\system32\wbem

السبب في ذلك ان الكود عندما يعمل يبحث عن هذين الملفين والا سيظهر لك خطأ عدم وجود الملفين او انها مفقوده

2. ننتقل الان الى قاعدة البيانات ونعرض النموذج في وضع التصميم او نقوم بالضغط على المفتاحين ALT+F11 من لوحة المفاتيح ليظهر لنا محرر الفيجول بيسك ومن اشرطة القوائم العلوية نختار TOOLS ثم References ونتأكد من وضع اشارة على المكتبة Microsft WMI Scripting V1.2 Library

2. الان يمكنك استخدام النموذج وعرض رقم المعالج الخاص بك

وهذا مثال تطبيقي يوجد به كودين مختلفين كل كود في نموذج مستقل اختر منها ما يناسبك لحماية قاعدة بياناتك

Get_Prosser_Number.rar

ملاحظة : قد يطلب منك تسجيل ملف المكتبه wbemdisp.dll لهذا استخدم هذا الملف الخاص بتسجيل المكتبات

ocxdllreg.rar

بعد فك الضغط عنه ستجد به ملف ريجستري

اضغط عليه مرتين وستظهر لك رساله بنجاح العملية اختر موافق

الان اصبحت هذه الميزه الخاصة بتسجيل مكتبات DLL و OCX موجوده في القائمة عندما تضغط على اي ملف DLL او OCX بالماوس الايمن لتسجيلها

اختكم

زهره

تم تعديل بواسطه zahrah
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

26 إجابة على هذا السؤال .

  • 0

مشكوووووووورة على هذا البرنامج

لكن هل ينطبق على جميع المعالجات

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

فهل هذا الكود ينطبق على جميع المعالجات وشكرا

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اختي زهرة جزاكم الله خيراً

حقيقة لقد قمت بعمل اكثر من رائع

فقط اريد ان اقول هل يوجد معالجين لهما نفس الرقم ؟

وشكرا

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخي المبرمج

نعم هذا الكود ينطبق على جميع المعالجات

اخي ابو كورد

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

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

بارك الله فيك ولكن لدي طلب بسيط

هل لي بمثال لعملية الحماية برقم المعالج كما شرحتي طريق الحماية برقم الهاردسك

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

يعني لازم احول الحروف إلى ارقام حتى تتم عملية وضع معادلة

فياليت ول تظعي مثال بسيط لعملية الحماية برقم المعالج ولك فائق الاحترام

................

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

استاذي المبرمج

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

اليك المثال المرفق محمي برقم المعالج

حاول الدخول للنموذج الرئيسي

ولك مني 9000 تحيه وتقدير

Get_Prosser_Number_up.rar

اختكم

zahrah2006

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

هههههههه حلوة حركة 9000 :D :D :D

بارك الله فيك

لكن هل جميع المعالجات تحوي ارقام وحرف دائما لاني لاحظة انك ازلتي الحروف وبقيت الارقام يعين هل يمكن ان تكون حروف فقط ؟؟؟

ثانيا هل يمكن ان نجد معالج آخر يكون له نفس الرقم

مثلا

الرقم الاول

AWLL89LK73UI222

بعد ازالة الحروف سيصبح

8973222

الرقم الثاني

CD8JD97J322FD2

بعد ازالة الحروف سيصبح

8973222

انا ادري انها شبه مستحيل التكرر لكن هل يمكن ان يحصل هذا ولا لا

سامحيني تراني غثيث شوي بس احب اعرف كل معلومة وعندي حب استطلاع غريب

لكن بسراحة حركة ذكية جدا ما شاء الله تبارك الله

....................

تم تعديل بواسطه المبرمج2003
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

ما شاء الله اخيرا استطعت الوصول للنموذج الرئيسي ما شي ياعم

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

اذا عرفت الرقم السري فسوف اترك المنتدى فورا

طبعا لا يمكن وجود رقم واحد لمعالجين وايضا لا يمكن تعديل رقم المعالج لان ارقام المعالجات بمثابة البصمه التي لا يمكن ان تتكرر

اختكم

zahrah2006

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

لالالالالالالالالالالا ليه تتركين المنتدى

هذا الكود الموجود داخل النموذج صح :rolleyes: :rolleyes:

Private Sub GO_Click()
If Me![Text1].Value + 9000 = Me![Text2].Value Then
DoCmd.Close
DoCmd.OpenForm "MAINE"
DoCmd.ShowToolbar "Web", acToolbarYes
fSetAccessWindow (SW_SHOWNORMAL)
ElseIf Me![Text1].Value + 9000 <> Me![Text2].Value Then
MsgBox "الف مرة نقول لك رقم النسخة خاطىء"
ElseIf IsNull(Me![Text2]) Then
MsgBox "لم تقم بإدخال رقم النسخة"
End If
End Sub

بالنسبة لرقم المعالج انا فاهم قصدك

لكن لنفرض ان هذا رقم المعالج الاول

AWLL89LK73UI222

هذا رقم المعالج الثاني

CD8JD97J322FD2

هي في الاساس مختلفة لكن بعد عملية التنقيح اللي انتيسويتيها بالكود راح يشيل الحروف صح

واذا شلنا الحروف راح يتكون لنا رقم جديد لكل معالج

الاول

8973222

الثاني

8973222

يعني الحين صار لهما نفس الرقم

هذا ما كنت اقصده

تم تعديل بواسطه المبرمج2003
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

نفسي اعرف كيف وصلت للكود في النموذج الرئيسي مع انه محمي بكلمة مرور في الوحدات النمطيه

بالنسبة لموضوع الارقام المتشابهه للمعالجات فإسمحلي اقول لك انت جالس تألف ارقام وحروف من رأسك

شوف يا إبني ارقام المعالجات لا يوجد بها افتراضات او تخمين لانه لو كان هناك رقمين متشابهين سواء في رقم المعالج الحقيقي او في الحروف او في الارقام لأفلست شركات المعالجات ( اكيد رايح تغثني زي كل مره ) وتسأل طيب ليه وايه السبب .

كنت اتمنى ان تكون لديك خبره كافيه عن التصميم الداخلي للمعالجات ( ولكن يمكنك القراءة عنها من خلال البحث والتعمق في مكونات المعالجات الداخلية ) عموما سأشرح لك بشكل مختصر ومبسط .

من ضمن مكونات المعالج يوجد شيء اسمه رقم فيدرالي لا يمكن ان يتشابه مع رقم رقم اي معالج سواء في الحروف او الارقام وحتى لو تذهب الى نفس الشركه التي تصنع المعالجات وتريد الحصول على معالجات اثناء خطوط الانتاج بأرقام متسلسلة فلن تجد لان العملية تتم بطريقة معقده ثم ان هذه الارقام يتم تسجيلها دوليا .

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

والطريقه ان نظام التشغيل اثناء تثبيته يقوم بإخذ كامل مواصفات الجهاز ومن ضمنها رقم المعالج ويخزن في ملف النظام ( حاول تفتح ملف sysinfo وستجد رقم اصدارة الويندوز ورقم المعالج وعدد الذواكر واحجامها وانواع الكروت العاملة لديك واذا كان لديك برنامج خاص بمعرفة ما على الماذربورد فسيظهر لك كل شيء عن النظام .

يعني المسألة ليست معجزه كل هذا يتحكم بها اكواد معينه يتم ارسالها على شكل نبضات بلغة الالة وتظهر لك على شكل حروف تراها وتميزها وعندها تقول هذا رقم المعالج وهذا حجم الهاردسك وهذا حجم الذاكره ونوعها وما الى ذلك .

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

السبب هو في حالة عطل المعالج او اي قطعة في الكمبيوتر وعليها ضمان بالتأكيد انك ستذهب الى نقطة البيع التي اشتريت منه هذه القطعة ومعك كرت الضمان ( طبعا يختلف هذا عن كرت الضمان الاجتماعي ) وعندها سوف يقارن لك مركز الضمان ما هو مسجل لديه مع كرت الضمان . فتخيل ان لديك قطعة وعليها رقم وجاء شخص اخر ومعه نفس القطه ( اسفه اقصد القطعة ) وعليها نفس الرقم وقتها انت ح تودي وشك وين ( يا دي الكسوف ) . فلديك طريقتين اما ان يكون كرت الضمان الذي بحوزتك ( اي كلام - يعني مضروب ) او ان المعالج او القطعة التي معك مزوره او تم التلاعب بها في هذه الحالة من الافضل لك ان تنفذ بجلدك والا ابو زعبل على الذمه .

الخلاصه : لا يوجد ارقام متشابهه بين المعالجات حتى لو ازلت الحروف او الارقام

تم تعديل بواسطه zahrah
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

خلاااااااااااااااص دنا غلبااااااااااااااااااااااااااااااان :lol: :lol: :lol:

القملة دي كفاية قدا وبسراااااااااااحة انا متشكر اوي اوي اوي على الشرح اللي ما في اقدع منوه

الخلاصه : لا يوجد ارقام متشابهه بين المعالجات حتى لو ازلت الحروف او الارقام

آسف اللهجة يمنك تكون قريبة من مصر لان امي اساسا من سويسرا B) B)

تحياتي لك ولجميع زهووووووووور جدة (h) (h)

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

معلش حتى يستفيد الجميع هذا ملف المثال مفتوح الكود من vba وشكرا للاخت زهرة على المثال

Get_Prosser_Number_up.rar

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

الف شكر اخي اكريم ....izzk

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

ألف شكروألف تحية ويعطيكم الصحة والعافية

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخي CompuTeam الظاهر ان الحماية برقم الهارد الحقيقي افضل لانه مستحيل التكرار اما رقم المعالج فقد يتكرر حسب كلام المشرفين

راجع الموضوع

الحماية بالرقم التسلسلي للهاردسك (الرقم الحقيقي)

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

اخوكم احمد

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

الف شكر أخي الفاضل abs 2000

على هذه المعلومات

وجزيت خيرا

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

الأخ الفاضل ...

zip.gif HWInfoEx.zip ( 173k )

بأستخدام (VC 6.0/VB 6.0/VBS/ASP/MS-Access) - يعطيك بيانات عن (يمكن استخدامها فى أغراض عديدة)

يحتوى على مكتية (DLL) و مكون (COM Object) يمكن أستعمله فى أى تطبيق

1) الرقم المسلسل للهارد ديسك (Harddisk) و معلومات أخرى

2) الرقم المسلسل دريف (Logic drive) و معلومات أخرى

3) رقم الـ(MAC) لكارت الشبكة

4) الرقم المسلسل للمعالج (Processor) و معلومات أخرى

5) حجم الذاكرة (RAM)

6) تاريخ ورقم الـ(BIOS) على اللوحة الأم

7) مفتاح (Product-Key) ورقم (Product-ID) نسخة الويندوز

8) محاولة جمع بعض المعلومات عن كارت العرض (VGA)

http://www.arabteam2000-forum.com/index.php?showtopic=117811

وشكراً

تم تعديل بواسطه Eng. Usama El-Mokadem
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخي الفاضل المهندس اسامه

الف الف شكر على هذا التوضيح والأمثله الرائعه بحق وقد تم تجربة الامثله على هاردسك ساتا وهاردسك عادي وظهرت النتائج باهره وفوق العادة

اكرر شكري وتقديري لك وبارك الله فيك

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

الأخت الفاضلة زهرة

حقيقة أشكرك بشده على ثنائك وكلماتك الرئعة بحق البرنامج ، ,انى لأعجز عن وجود كلمات مماثلة أعبر بها عن سعادتى برأيك فى هذا البرنامج وتقديرى لوقتك فى تجربت البرنامج، ودائماً على الرحب والسعة وأن شاء الله الى الأمام فى هذا المنتدى

تمنياتى بمزيد من النجاح والتوفيق

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

الأخوة الأفاضل ...

zip.gif HWInfo.zip ( 77.33k )

بأستخدام (MS-VB 6.0) - يعطيك بيانات عن (يمكن استخدامها فى أغراض عديدة)

1) الرقم المسلسل للهارد ديسك (Harddisk) و معلومات أخرى

2) الرقم المسلسل دريف (Logic drive) و معلومات أخرى

3) رقم الـ(MAC) لكارت الشبكة

4) الرقم المسلسل للمعالج (Processor) و معلومات أخرى

5) حجم الذاكرة (RAM)

6) تاريخ ورقم الـ(BIOS) على اللوحة الأم

7) مفتاح (Product-Key) ورقم (Product-ID) نسخة الويندوز

8) محاولة جمع بعض المعلومات عن كارت العرض (VGA)

http://www.arabteam2000-forum.com/index.php?showtopic=117811

للحصول على أخر إصدار : http://www.geocities.com/mokadem2000/hwinfo.zip

وشكراً

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

الأخ الفاضل ...

zip.gif HWInfoEx.zip ( 173k )

بأستخدام (VC 6.0/VB 6.0/VBS/ASP/MS-Access) - يعطيك بيانات عن (يمكن استخدامها فى أغراض عديدة)

يحتوى على مكتية (DLL) و مكون (COM Object) يمكن أستعمله فى أى تطبيق

1) الرقم المسلسل للهارد ديسك (Harddisk) و معلومات أخرى

2) الرقم المسلسل دريف (Logic drive) و معلومات أخرى

3) رقم الـ(MAC) لكارت الشبكة

4) الرقم المسلسل للمعالج (Processor) و معلومات أخرى

5) حجم الذاكرة (RAM)

6) تاريخ ورقم الـ(BIOS) على اللوحة الأم

7) مفتاح (Product-Key) ورقم (Product-ID) نسخة الويندوز

8) محاولة جمع بعض المعلومات عن كارت العرض (VGA)

http://www.arabteam2000-forum.com/index.php?showtopic=117960

للحصول على أخر إصدار : http://www.geocities.com/mokadem2000/hwinfo.zip

وشكراً

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

السلام علكم أخت زهرة

أما بعد

فأنا دائما أتابع موضوعاتك باهتمام

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

وبيان كيفية ذلك بالتفصيل

لشدة حاجتي لذلك الأمر

أرجو منك مراسلتي على

6. لا تطلب الإجابة على سؤالك إلى بريدك الخاص، الفائدة يجب أن تعم، و احتمال تكرار نفس السؤال كبير..

تم تحرير الرد بسبب المخالفة: قواعد المشاركة (تعرض المشاركة للالغاء الفوري)

تم تعديل بواسطه همام ابوعرقوب
0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اخي الفاضل

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

معذرة لأنه لا يوجد لدي بريد الكتروني او ماسنجر لمحادثة الأعضاء لأنني قد قمت بإزالتها من جهازي

ويمكنك البحث في المنتدى وستجد ان شاء الله مواضيع تتحدث عن ذلك

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اسف اختي زهرة قمت بتحرير مشاركة الاخ للتو ولم انتبه لردك..

همام

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

أستاذتنا العزيزة زهرة

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

هناك برنامج فك الأرقام السرية اسمه (Passware Kit )

يمكن بواسطته الحصول على الرقم السري للوحدة النمطية بسهوله بالنسبة لقواعد البيانات من نوع mdb

تحياتي للجميع

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

السلام عليكم أخت زهرة

أما بعد فوالذي رفع السماء بغير عمد ما قصدت سوءاً بطلبي منك مراسلتي على البريد الخاص بي أو المسنجر

وأقدم اعتذاري أيضاً لأعضاء ومشرفي المنتدى الكرام

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

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
زوار
This topic is now closed to further replies.

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .