تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
برنامج تجريبي
#1
السلام عليكم 
لوسمحتوا  عاوز اعرف كيف اعمل البرنامج لا يعمل الا علي جهاز واحد 
وجزاكم الله خير الجزاء
الرد
تم الشكر بواسطة:
#2
السّلام عليكم و رحمة الله و بركاته
متابع إن شاء الله..
تحياتي
الرد
تم الشكر بواسطة:
#3
توجد طريقة من خلال التأكد من سيريال البروسيسر أو المذربورد : 

كود :
Private Function SystemSerialNumber() As String
   ' Get the Windows Management Instrumentation object.
   Dim wmi As Object = GetObject("WinMgmts:")

   ' Get the "base boards" (mother boards).
   Dim serial_numbers As String = ""
   Dim mother_boards As Object = _
       wmi.InstancesOf("Win32_BaseBoard")
   For Each board As Object In mother_boards
       serial_numbers &= ", " & board.SerialNumber
   Next board
   If serial_numbers.Length > 0 Then serial_numbers = _
       serial_numbers.Substring(2)

   Return serial_numbers
End Function


Private Function CpuId() As String
   Dim computer As String = "."
   Dim wmi As Object = GetObject("winmgmts:" & _
       "{impersonationLevel=impersonate}!\\" & _
       computer & "\root\cimv2")
   Dim processors As Object = wmi.ExecQuery("Select * from " & _
       "Win32_Processor")

   Dim cpu_ids As String = ""
   For Each cpu As Object In processors
       cpu_ids = cpu_ids & ", " & cpu.ProcessorId
   Next cpu
   If cpu_ids.Length > 0 Then cpu_ids = _
       cpu_ids.Substring(2)

   Return cpu_ids
End Function

أتمنى إني أكون أفدتك ...

تحياتي ...
الرد
تم الشكر بواسطة: عبد العزيز البسكري
#4
اخي العزيز جزاك الله خير الجزاء
ولكن لا اعرف كيف استخدم الكود.هل اضعه في button ام ماذا
وجزاك الله خيرا
الرد
تم الشكر بواسطة:
#5
يتم وضعه في 

Form1_Load
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] شرح برنامج sql server منه 1 72 02-06-20, 06:16 PM
آخر رد: محمد كريّم
  [سؤال] مشكلة , برنامج عند فتحه يقفل وكان يعمل قبل كدا aqarfinder 2 63 29-05-20, 12:56 AM
آخر رد: ابراهيم ايبو
  [سؤال] عمل برنامج نقرات لبرنامج اخر Abdallah61 3 81 26-05-20, 11:02 PM
آخر رد: Abdallah61
  [VB.NET] تم عمل برنامج شات ولكن اسامه الهرماوي 0 49 26-05-20, 08:38 PM
آخر رد: اسامه الهرماوي
Lightbulb [VB.NET] برنامج آلة حاسبة Doctor GME 6 116 24-05-20, 03:17 AM
آخر رد: atefkhalf2004
  كيفية التعديل على برنامج hasanqo 1 79 21-05-20, 06:45 AM
آخر رد: معاند الحظ
  [VB.NET] برنامج تسجيل حضور وغيابات الطلبة عباس ناصر 1 123 17-05-20, 01:11 PM
آخر رد: alshandodi
Wink [سؤال] طريقة عمل برنامج تعديل علي التاريخ والوقت في الويندوز Ali Edal 2022 4 179 12-05-20, 03:05 AM
آخر رد: Ali Edal 2022
Lightbulb [VB.NET] مشكلة مع برنامج حجز مواعيد Doctor GME 5 179 03-05-20, 07:24 AM
آخر رد: Doctor GME
  برنامج دمج ملفات المشروع في ملف تنفيذي واحد ابو محمد محمد محمد 4 167 03-05-20, 04:23 AM
آخر رد: ابو محمد محمد محمد

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم