منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : كيفية معرفة رقم الهارديسك
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم
اريد كود لمعرفة رقم الهارديسك ولكم الشكر
السّلام عليكم و رحمة الله و بركاته
لعلّه يفي بالغرض إن شاء الله .. مع إضافة المكتبة بالكود أعلاه من خلال REFERENCE


كود :
Imports System.Management
Public Class Form1
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       Dim HDD_Serial As String
       Dim hdd As New ManagementObjectSearcher("select * from Win32_DiskDrive")
       For Each hd In hdd.Get
           HDD_Serial = hd("SerialNumber")
       Next
       TextBox1.Text = HDD_Serial
   End Sub
End Class
تحياتي
(23-02-18, 12:44 AM)عبد العزيز البسكري كتب : [ -> ]
السّلام عليكم و رحمة الله و بركاته
لعلّه يفي بالغرض إن شاء الله .. مع إضافة المكتبة بالكود أعلاه من خلال REFERENCE


كود :
Imports System.Management
Public Class Form1
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       Dim HDD_Serial As String
       Dim hdd As New ManagementObjectSearcher("select * from Win32_DiskDrive")
       For Each hd In hdd.Get
           HDD_Serial = hd("SerialNumber")
       Next
       TextBox1.Text = HDD_Serial
   End Sub
End Class
تحياتي

ManagementObjectSearcher
يعطيني خطأ في هذا السطر ارجو الافادة
جرّب أخي عمور

(25-09-20, 09:54 PM)عبد العزيز البسكري كتب : [ -> ]
جرّب أخي عمور


من باب العلم بالشيء استاذي ما اسم البرنامج الذي تقوم بعمل صور الشروحات به ؟
dateTimePicker1.Value.Date.ToString("dd/MM/yyyy")
السلام عليكم و رحمة الله و بركاته
أخي عمور بالنسبة لبرنامج التصوير هو ..
ASHAMPOO SNAP
بالنسبة للخطأ ..
أخي الغالي .. بالنسبة لي جربت في وضعية التشغيل و الكود يشتغل بطريقة جد عادية
تحياتي