داله لمعرفة رقم الماذربورد - أكاديمية الصقر للتدريب

لوحة التميز الأسبوعي
العضو المتميز	المشرف المتميز	المراقب المتميز	المدير المتميز	الموضوع المتميز	القسم المتميز

khaled alborene	مجدى يونس	لا تميز خلال هذه الفترة	YasserKhalil	اكثر من 350 لعبة فلاش للأطفال مجمعه في برنامج واحد Y-GAMES	اكسيل اسئله واجابات

آخر المشاركات

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

الرئيسية

منتدى الاكسيس

اكسيس اسئله واجابات

داله لمعرفة رقم الماذربورد

الاخوه العزاء اعضاء المنتدى كل عام و انتم بخير هل يوجد داله فى اكسس لمعرفة رقم المازربورد الخاصه بالكمبيوتر ؟ افيدونا ..

: لا يمكنك الرد على هذا الموضوع لا يمكنك إضافة موضوع جديد

أدوات الموضوع

أدوات الموضوع

تحميل محتوى الموضوع

عرض نسخة صالحة للطباعة

أرسل هذا الموضوع إلى صديق

: داله لمعرفة رقم الماذربورد

03-06-2018 12:20 صباحا

ابو عبد الرحمن

عضو

تاريخ الإنضمام : 29-09-2017

رقم العضوية : 744

المشاركات : 1

الجنس :

يتابعهم : 0

يتابعونه : 0

قوة السمعة : 10

الاعجاب : 0

: الاخوه العزاء اعضاء المنتدى
كل عام و انتم بخير
هل يوجد داله فى اكسس لمعرفة رقم المازربورد الخاصه بالكمبيوتر ؟
افيدونا فى ذلك و جزاكم الله خيرا

أعجبني أعجبك هذاإلغ اعجابي 0

: 03-06-2018 10:13 صباحا

[1]

YasserKhalil

مراقب عام

تاريخ الإنضمام : 21-08-2017

رقم العضوية : 3

المشاركات : 6450

الجنس :

تاريخ الميلاد : 1-10-1978

الدعوات : 19

يتابعهم : 0

يتابعونه : 394

قوة السمعة : 17734

الاعجاب : 452

: داله لمعرفة رقم الماذربورد

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

Sub Test_MBSerialNumber_UDF()

    MsgBox MBSerialNumber

End Sub



Function MBSerialNumber(Optional strComputer As String = ".") As String

    Dim v           As Variant

    Dim vName       As Variant

    Dim vUUID       As Variant



    With GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

        For Each v In .ExecQuery("SELECT * FROM Win32_ComputerSystemProduct", , 48)

            vName = v.Name

            vUUID = v.UUID

        Next v

    End With



    MBSerialNumber = vName & ", " & vUUID

End Function

أعجبني

: لا يمكنك الرد على هذا الموضوع لا يمكنك إضافة موضوع جديد

المواضيع المتشابهه
عنوان الموضوع	الكاتب	الردود	الزوار	آخر رد
اضافة ازرار انتقال وازرار لمعرفة الخانات الخالية الجزء 15	مجدى يونس	4	54	مجدى يونس
عداد بالفورم لمعرفة اخر رقم مسجل بملف الاكسل	مجدى يونس	16	387	مجدى يونس
الدالة المعرفة DateDif30	Eslam Abdullah	36	1181	المبتدأ
الدالة المعرفة AlsaqrExitList	Eslam Abdullah	31	2558	شعبان عطيه
الدالة المعرفة ColorEA لجمع الخلايا الملونة	Eslam Abdullah	23	1599	المبتدأ

الكلمات الدلالية

داله ، لمعرفة ، الماذربورد ،

« مطلوب فاتورة ضريبة | قاعدة بيانات بسيطه يوجد بها مشكلة و ارجوا المساعده في اصلاحها »

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

سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.

الساعة الآن 02:21 مساء