Возможно ли узнать разрядность системы на удаленном компьютере в сети? - Visual Basic .NET

Узнай цену своей работы

Формулировка задачи:

Есть код, который выводит название ОС в label удаленного компьютера в сети:
Листинг программы
  1. Dim MyReg As Microsoft.Win32.RegistryKey = Microsoft.Win32.RegistryKey.OpenRemoteBaseKey(Microsoft.Win32.RegistryHive.LocalMachine, "имя компьютера")
  2. Dim MyRegKey As Microsoft.Win32.RegistryKey
  3. Dim MyVal As String
  4. MyRegKey = MyReg.OpenSubKey("Software\Microsoft\Windows NT\currentVersion")
  5. MyVal = MyRegKey.GetValue("ProductName")
  6. MyRegKey.Close()
  7. Label1.Text = MyVal
возможно ли вывести еще и разрядность системы с удаленного компьютера в сети?

Решение задачи: «Возможно ли узнать разрядность системы на удаленном компьютере в сети?»

textual
Листинг программы
  1. Dim MyReg As Microsoft.Win32.RegistryKey = Microsoft.Win32.RegistryKey.OpenRemoteBaseKey(Microsoft.Win32.RegistryHive.LocalMachine, "WORK")
  2.  
  3.         Dim MyRegKey As Microsoft.Win32.RegistryKey
  4.         Dim MyVal As String
  5.  
  6.         MyRegKey = MyReg.OpenSubKey("Software\Microsoft\Windows NT\currentVersion")
  7.         MyVal = MyRegKey.GetValue("ProductName")
  8.  
  9.         Dim myregkey_razr As Microsoft.Win32.RegistryKey = MyReg.OpenSubKey("SYSTEM\CurrentControlSet\Control\Session Manager\Environment")
  10.         Dim myval_razr As String = myregkey_razr.GetValue("PROCESSOR_ARCHITECTURE")
  11.         If myval_razr = "AMD64" Then myval_razr = "X64"
  12.  
  13.         MyRegKey.Close()
  14.         myregkey_razr.Close()
  15.  
  16.         Label1.Text = MyVal
  17.         Label2.Text = myval_razr

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

5   голосов , оценка 4.4 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы