Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / Запись данных из WMI в access / 2 сообщений из 2, страница 1 из 1
03.07.2015, 17:26
    #38999210
minioracle
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запись данных из WMI в access
доброе время суток.

есть код
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
        Dim objshdd As Object
        Dim objbhdd As Object
        'Dim hddt As String
        objshdd = WMI.InstancesOF("Win32_DiskDrive")
        For Each objbhdd In objshdd
            TextBox11.Text &= objbhdd.Caption.ToString & vbCrLf
        Next


Подскажите пожалуйста как мне записать полученные данные правильно в DB?
Код: vbnet
1.
2.
3.
4.
            SqlCom = New OleDb.OleDbCommand("INSERT INTO [HDD] ( [hdd], [pcname]) VALUES ('" & TextBox11.Text & "', '" & PC & "')", Con)
            Con.Open()
            SqlCom.ExecuteNonQuery()
            Con.Close()


А получается что записывает только один винт, хотя отображает их 2
...
Рейтинг: 0 / 0
04.07.2015, 10:11
    #38999535
Cat2
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Запись данных из WMI в access
minioracle,

Используйте цикл по свойству Lines

https://msdn.microsoft.com/ru-ru/library/system.windows.forms.textboxbase.lines(v=vs.110).aspx

Или делайте запросы прямо цикле считывания.

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
Con.Open()
For Each objbhdd In objshdd
            TextBox11.Text &= objbhdd.Caption.ToString & vbCrLf
            SqlCom = New OleDb.OleDbCommand("INSERT INTO [HDD] ( [hdd], [pcname]) VALUES ('" & objbhdd.Caption.ToString & "', '" & PC & "')", Con)
            SqlCom.ExecuteNonQuery()
        Next
Con.Close()


============
И, традиционно, не собирайте строку запроса контактенцией, используйте запросы с параметрами!

https://msdn.microsoft.com/ru-ru/library/yy6y35y8(v=vs.110).aspx
...
Рейтинг: 0 / 0
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / Запись данных из WMI в access / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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