بسم الله الرحمن الرحيم
أريد كود لمعرفة نظام التشغيل الحالى
فمثلاً ويندذ اس بي
تظهر رسالة Microsoft Windows XP
كود معرفة اسم نظام التشغيل
مغلق
بهذا الكود البسيط بيرجعلك نوعيه نظام التشغيل
Me.Caption = Environ$("OS")الإنسان الذي يقول بأنه لا يمكن عمل شيء يجب ألا يعيق مطلقاً الإنسان الذي يقوم بعمل ذلك الشيء.
إن تخطئ فأنت إنسان ... أما أن تلوم جهازك الكمبيوتر على خطأك فهذا أكثر إنسانية.
شكراً يا بروف...
ممكن نجيبه ايضاً من الريجسترى
;) ;) :rolleyes:
أعمل لدنياك كأنك تعيش أبداً وأعمل لأخرتك كأنك تموت غداً
أحفظ لسانك تصان كرامتك
-----------------
من مواضيعى بالمنتدى
جديد الباب الاول من كتابى المدخل الى قواعد البيانات
جديد دروس قواعد البيانات
الان حرك الماوس بواسطة الكيبورد
برنامج VB6 Projects Viewer مساعد المبرمجين
بسم الله الرحمن الرحيم
ألف شكر ياخوان
ولو نعرف طريقة الريجستري ويريت بمثال بسيط مرفق
ياأخ شريف
زيادة الخير خريين
لا إله إلا أنت سبحانك إني كنت من الظالمين
هذا مسار نظام التشغيل الحالى فى الريجيسترى
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProductName
وسوف اقوم بعمل مثال وارفقه لك
مع خالص تحياتى...
;) ;) :rolleyes:
أعمل لدنياك كأنك تعيش أبداً وأعمل لأخرتك كأنك تموت غداً
أحفظ لسانك تصان كرامتك
-----------------
من مواضيعى بالمنتدى
جديد الباب الاول من كتابى المدخل الى قواعد البيانات
جديد دروس قواعد البيانات
الان حرك الماوس بواسطة الكيبورد
برنامج VB6 Projects Viewer مساعد المبرمجين
بسم الله الرحمن الرحيم
السلام عليكم و رحمة الله وبركاته
اضم صوتي لك اخي العزيز بالنسبة لاخونا الفاضل شريف جزاه الله عنا كل الخير..
و للفائدة فقد ذكرني سؤالك بمناقشة حول الموضوع في العنوان التالي :
اتمنى للجميع الاستفادة و السلام عليكم و رحمة الله وبركاته
مواضيع برمجية تقنية جديدة
----------------------------------------------------------------------------------------------------------------------------------------------
• إستغلال خدمة الـ RSS في برامجنا ومواقعنا ! (VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
• برنامج للبحث في الملفات ومحتواياتها (VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
• فئة للتراسل بين برنامجين في جهاز واحد ! (VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
مواضيع برمجية تقنية قديمة
----------------------------------------------------------------------------------------------------------------------------------------------
• إستغلال رسائل البالونات Balloons في الوينذوز أكس بي(VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
• مقالة : لماذا يجب ان نعتني بشفرات برامجنا !؟- (VB6.0)
----------------------------------------------------------------------------------------------------------------------------------------------
• لمطوري البرامج و مواقع الويب - برنامج تركيب ألوان - (VB6.0)
----------------------------------------------------------------------------------------------------------------------------------------------
• برنامج : بسيط للتحكم بالنظام, عن طريق الريجستري - (VB6.0)
----------------------------------------------------------------------------------------------------------------------------------------------
• برنامج : لتقييد و منع تشغيل البرامج الاخرى - (VB6.0)
----------------------------------------------------------------------------------------------------------------------------------------------
• النوافذ المنبثقة و طريقة لإستغلالها في برامجنا -(VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
• تقنية الإستدعاء الذاتي - (VB.NET , VB6.0)
----------------------------------------------------------------------------------------------------------------------------------------------
• مصفوفات الأدوات Control Arrays افكار وتلميحات ! - (VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
• أفكار و تلميحات[ المعنى الحقيقي للـ True و False ] - أمثلة (VB.NETVB6.0)
----------------------------------------------------------------------------------------------------------------------------------------------
• دوال الـ APIs و مايقابلها في الدوت نت ! - (VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
لاتدري مدى انبساطي عندما راية اسمك أخي رغيد في المشاركة
فانا اعرفك من قبل من مشاركاتك الجميلة
واتمنا ان نكون أصدقاء
مٌسَلْم
Mosalm
لا إله إلا أنت سبحانك إني كنت من الظالمين
بسم الله الرحمن الرحيم
السلام عليكم و رحمة الله و بركاته
بل اخوة اخي الحبيب مسلم بإذن الله تعالى
السلام عليكم و رحمة الله و بركاته
مواضيع برمجية تقنية جديدة
----------------------------------------------------------------------------------------------------------------------------------------------
• إستغلال خدمة الـ RSS في برامجنا ومواقعنا ! (VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
• برنامج للبحث في الملفات ومحتواياتها (VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
• فئة للتراسل بين برنامجين في جهاز واحد ! (VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
مواضيع برمجية تقنية قديمة
----------------------------------------------------------------------------------------------------------------------------------------------
• إستغلال رسائل البالونات Balloons في الوينذوز أكس بي(VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
• مقالة : لماذا يجب ان نعتني بشفرات برامجنا !؟- (VB6.0)
----------------------------------------------------------------------------------------------------------------------------------------------
• لمطوري البرامج و مواقع الويب - برنامج تركيب ألوان - (VB6.0)
----------------------------------------------------------------------------------------------------------------------------------------------
• برنامج : بسيط للتحكم بالنظام, عن طريق الريجستري - (VB6.0)
----------------------------------------------------------------------------------------------------------------------------------------------
• برنامج : لتقييد و منع تشغيل البرامج الاخرى - (VB6.0)
----------------------------------------------------------------------------------------------------------------------------------------------
• النوافذ المنبثقة و طريقة لإستغلالها في برامجنا -(VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
• تقنية الإستدعاء الذاتي - (VB.NET , VB6.0)
----------------------------------------------------------------------------------------------------------------------------------------------
• مصفوفات الأدوات Control Arrays افكار وتلميحات ! - (VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
• أفكار و تلميحات[ المعنى الحقيقي للـ True و False ] - أمثلة (VB.NETVB6.0)
----------------------------------------------------------------------------------------------------------------------------------------------
• دوال الـ APIs و مايقابلها في الدوت نت ! - (VB.NET)
----------------------------------------------------------------------------------------------------------------------------------------------
أعمل لدنياك كأنك تعيش أبداً وأعمل لأخرتك كأنك تموت غداً
أحفظ لسانك تصان كرامتك
-----------------
من مواضيعى بالمنتدى
جديد الباب الاول من كتابى المدخل الى قواعد البيانات
جديد دروس قواعد البيانات
الان حرك الماوس بواسطة الكيبورد
برنامج VB6 Projects Viewer مساعد المبرمجين
السلام عليكم
الكود الذي ذكره الاخ بروف
Me.Caption = Environ$("OS")
يعطي نتيجة خاطئة حيث يعطي النتيجة : Windows NT
بينما نظام التشغيل لدي Windows XP
السلام عليكم ورحمة الله وبركاته
جربوا طريقة الريجيسترى ان شاء الله لا يوجد بها اخطاء
مع العلم بان ويندوز xp اساسه ويندوز nt
مع خاص تحياتى
;) ;) :rolleyes:
أعمل لدنياك كأنك تعيش أبداً وأعمل لأخرتك كأنك تموت غداً
أحفظ لسانك تصان كرامتك
-----------------
من مواضيعى بالمنتدى
جديد الباب الاول من كتابى المدخل الى قواعد البيانات
جديد دروس قواعد البيانات
الان حرك الماوس بواسطة الكيبورد
برنامج VB6 Projects Viewer مساعد المبرمجين
هذا الموضوع مغلق.