+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : معرفة نوع اصدار الويندوز 32 او 64 (/showthread.php?tid=27896)
الصفحات:
1
2
معرفة نوع اصدار الويندوز 32 او 64 - atefkhalf2004 - 13-12-18
السادة الافاضل
كيف يمكن من خلال الفيجوال اعرف رقم اصدار الويندوز
شكرا لكم
RE: معرفة نوع اصدار الويندوز 32 او 64 - عبد العزيز البسكري - 13-12-18
السّلام عليكم و رحمة الله و بركاته
جرّب هذا الكود .. أخي الكريم ..
كود :
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'الكود الأول
Dim Is64Bit As Boolean
Is64Bit = Not String.IsNullOrEmpty(Environment.GetEnvironmentVariable("PROCESSOR_ARCHITEW6432"))
If Is64Bit Then
TextBox1.Text = (My.Computer.Info.OSFullName + " 64-Bit")
Else
TextBox1.Text = (My.Computer.Info.OSFullName + " 32-Bit")
End If
'الكود الثاني
If System.Environment.Is64BitOperatingSystem = True Then
TextBox2.Text = ("OS System : 64 Bit Operating System")
Else
TextBox2.Text = ("OS System : 32 Bit Operating System")
End If
End Subتحياتي
RE: معرفة نوع اصدار الويندوز 32 او 64 - elgokr - 14-12-18
اضافة لما قدمه اخى الغالى عبد العزيز البسكري
وحتى تعم الفائدة
فقط كل ما تحتاج اليه اضافة الـ Function التالى
كود :
Function GetOsBitness() As String
Dim Bit As Integer
Dim ProcessorSet As Object
Dim CPU As Object
ProcessorSet = GetObject("Winmgmts:").ExecQuery("SELECT * FROM Win32_Processor")
For Each CPU In ProcessorSet
Bit = CStr(CPU.AddressWidth)
Next
Return Bit
End Functionويتم الاستخدام على هذا الشكل مثل
كود :
MsgBox(GetOsBitness() & " Bit")كود :
TextBox1.Text = GetOsBitness() & " Bit"تحياتى لك
وتمنياتى لك لاتوفيق
RE: معرفة نوع اصدار الويندوز 32 او 64 - atefkhalf2004 - 15-12-18
شكرا علي ردودكم جميعا
RE: معرفة نوع اصدار الويندوز 32 او 64 - elgokr - 18-12-18
الشكر لله والحمد لله
والحمد لله على كل حال
تحياتى لك
وتمنياتى لك التوفيق
RE: معرفة نوع اصدار الويندوز 32 او 64 - atefkhalf2004 - 18-12-18
تواحهني مشكلة وهي
انا عامل ملف اكسس 2003 4 مع فيجوال
عندما انقل المشروع علي جهاز به ويندوز 64 لا يعمل
اعدل واجعل الاكسس 2010 12 لا بد من ازالة الاوفس 2010 اللي علي الجهاز لانه 32
ما هي الطريقة المثلي والافضل لعمل ست اب للبرنامج لكي يعمل علي
جهاز 32 او 64 مع اي اوفيس
RE: معرفة نوع اصدار الويندوز 32 او 64 - elgokr - 18-12-18
لا عليك اخى الاضل للعمل على الاصدار 2003 مع ربط اصدار 4
فيتطلب عليك ان تجعل المشروع كاملاً يعمل على بيئة 32 Bit
ويتم ذلك من خلال الاعدادات التالية
Build >> configuration management
كما فى الصورة
من ثم
تغير جميع جمل Any CPU الى 86Bit
فى حالة عدم وجودها بالقائمة ستختار New لاتمام اضافتها
فقط كل ما عليك اختيار 86Bit وعند انهاء الامر ستجد ان المشروع يعمل معك على اجهزة 64Bit
بدون اى مشكلة او اخطاء
تحياتى لك
وتمنياتى لك التوفيق
RE: معرفة نوع اصدار الويندوز 32 او 64 - atefkhalf2004 - 19-12-18
حضرتك نفذت اللي قلت عليه
ظهرت اخطا
عملت clean
و
rebuild
وايضا الخطا موجود
اشطررت الي العودة مرة اخري الي any
اختفت الاخطاء
RE: معرفة نوع اصدار الويندوز 32 او 64 - atefkhalf2004 - 19-12-18
ما السبب
وكيف اتغلب علي المشكلة
RE: معرفة نوع اصدار الويندوز 32 او 64 - elgokr - 20-12-18
اوصل الى السطر رقم : 58883
وضع الكود الخاص بهذا السطر هنا
تحياتى لك
وتمنياتى لك التوفيق