Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / Как адаптировать код wmi под код visual studio 2010 / 17 сообщений из 17, страница 1 из 1
24.06.2015, 01:01
    #38991185
minioracle
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как адаптировать код wmi под код visual studio 2010
Доброе время суток всем.
Подскажите пожалуйста для новичка, что бы можно было разобраться, как адаптировать код wmi под код visual studio 2010
Есть напримере код
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
strComputer = "." 
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root

\CIMV2") 
Set colItems = objWMIService.ExecQuery( _
    "SELECT * FROM Win32_BaseBoard",,48) 
For Each objItem in colItems 
    Wscript.Echo "-----------------------------------"
    Wscript.Echo "Win32_BaseBoard instance"
    Wscript.Echo "-----------------------------------"
    Wscript.Echo "Product: " & objItem.Product
Next



Как его адаптировать для .net что бы можно было полученные данные objItem.Product можно было занасить в label
А то если его в таком виде вставлять в код формы получается много ошибок.
А как это делать для кода WMI я не знаю.
Подскажите пожалуйста новичку.
...
Рейтинг: 0 / 0
24.06.2015, 01:08
    #38991187
minioracle
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как адаптировать код wmi под код visual studio 2010
minioracle,
Если пишу так

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
Public Class Form1
    Dim Computer As String
    Dim WMI As Object
    Dim Items As Object
    Dim Item As Object
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click


        Computer = "."
        WMI = GetObject("winmgmts:" _
        & "{impersonationLevel=impersonate}!\\" & Computer & "\root\cimv2")
        Items = objWMIService.ExecQuery("SELECT * FROM Win32_BaseBoard", , 48)
        For Each Item In Items
            Debug.Print(Item.SerialNumber)
            Exit For
        Next
    End Sub
End Class


то у меня ошибка
...
Рейтинг: 0 / 0
24.06.2015, 03:23
    #38991204
Сон Веры Павловны
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как адаптировать код wmi под код visual studio 2010
...
Рейтинг: 0 / 0
24.06.2015, 11:31
    #38991424
minioracle
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как адаптировать код wmi под код visual studio 2010
При таком вводе он интересуется где у меня return
...
Рейтинг: 0 / 0
24.06.2015, 11:34
    #38991430
minioracle
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как адаптировать код wmi под код visual studio 2010
Сон Веры Павловны,

вот так
...
Рейтинг: 0 / 0
24.06.2015, 12:20
    #38991505
Сон Веры Павловны
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как адаптировать код wmi под код visual studio 2010
minioracleПри таком вводе он интересуется где у меня return
Ну, почитайте книжки по языку. Этот вопрос уже не относится к WMI.
...
Рейтинг: 0 / 0
24.06.2015, 12:52
    #38991543
minioracle
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как адаптировать код wmi под код visual studio 2010
Сон Веры Павловны,

Если бы подсказали книжку куда свой взор обратить?!
...
Рейтинг: 0 / 0
24.06.2015, 12:57
    #38991549
minioracle
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как адаптировать код wmi под код visual studio 2010
Сон Веры Павловны,

Я ж спрашиваю не про код что ниже, а про то как адаптировать, что бы понять как работать с WMI и выводить данные на форму
...
Рейтинг: 0 / 0
24.06.2015, 13:28
    #38991592
pation
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как адаптировать код wmi под код visual studio 2010
minioracleКак его адаптировать для .net что бы можно было полученные данные objItem.Product можно было занасить в label
А то если его в таком виде вставлять в код формы получается много ошибок.
А как это делать для кода WMI я не знаю.
Подскажите пожалуйста новичку.

что конкретно вызывает трудности?
как в label вывести текст?
о каких ошибках речь?
...
Рейтинг: 0 / 0
24.06.2015, 14:29
    #38991672
minioracle
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как адаптировать код wmi под код visual studio 2010
pation,

Трудности в том что как код из WMI code creator вставить в форму, что бы можно было выводить данные в label

ТУТ
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
Public Class Form1
    Dim Computer As String
    Dim WMI As Object
    Dim Items As Object
    Dim Item As Object
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click


        Computer = "."
        WMI = GetObject("winmgmts:" _
        & "{impersonationLevel=impersonate}!\\" & Computer & "\root\cimv2")
        Items = objWMIService.ExecQuery("SELECT * FROM Win32_BaseBoard", , 48)
        For Each Item In Items
            Debug.Print(Item.SerialNumber)
            Exit For
        Next
    End Sub
End Class


ругается на objWMIServic
...
Рейтинг: 0 / 0
24.06.2015, 14:38
    #38991684
VSVLAD
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как адаптировать код wmi под код visual studio 2010
minioracle,

WMI code creator умеет создавать код, как для VBScript, так и для C# и VB.NET (работающий с .NET классами, а не COM). Может всё таки их (классы) и использовать?
...
Рейтинг: 0 / 0
24.06.2015, 14:40
    #38991687
VSVLAD
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как адаптировать код wmi под код visual studio 2010
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
Imports System
Imports System.Management
Imports System.Windows.Forms

Namespace WMISample

    Public Class MyWMIQuery

        Public Overloads Shared Function Main() As Integer

            Try
                Dim searcher As New ManagementObjectSearcher( _
                    "root\CIMV2", _
                    "SELECT * FROM Win32_BaseBoard") 

                For Each queryObj As ManagementObject in searcher.Get()

                    Console.WriteLine("-----------------------------------")
                    Console.WriteLine("Win32_BaseBoard instance")
                    Console.WriteLine("-----------------------------------")
                    Console.WriteLine("SerialNumber: {0}", queryObj("SerialNumber"))
                Next
            Catch err As ManagementException
                MessageBox.Show("An error occurred while querying for WMI data: " & err.Message)
            End Try
        End Function
    End Class
End Namespace
...
Рейтинг: 0 / 0
24.06.2015, 14:41
    #38991690
VSVLAD
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как адаптировать код wmi под код visual studio 2010
Не заметил, код уже нашли.... А выводить форму, label1.Text = CStr(queryObj("SerialNumber")), разве нет?
...
Рейтинг: 0 / 0
24.06.2015, 15:06
    #38991732
minioracle
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как адаптировать код wmi под код visual studio 2010
VSVLAD,
Уже пробовал. Вот тут просит вставить Return
...
Рейтинг: 0 / 0
24.06.2015, 15:19
    #38991746
minioracle
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как адаптировать код wmi под код visual studio 2010
VSVLAD,
если перевожу на visual basic .net
...
Рейтинг: 0 / 0
25.06.2015, 12:55
    #38992506
Cat2
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как адаптировать код wmi под код visual studio 2010
minioracleVSVLAD,
если перевожу на visual basic .net


Возможно поврежден класс Win32_BIOS. На других классах ошибки есть?
...
Рейтинг: 0 / 0
25.06.2015, 12:57
    #38992510
Cat2
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как адаптировать код wmi под код visual studio 2010
minioracleVSVLAD,
Уже пробовал. Вот тут просит вставить Return


Так вставьте "return 0" или уберите "as Integer" в заголовке функции
...
Рейтинг: 0 / 0
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / Как адаптировать код wmi под код visual studio 2010 / 17 сообщений из 17, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]