powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / добавление данных из rst в SQL server
13 сообщений из 13, страница 1 из 1
добавление данных из rst в SQL server
    #34953968
rstqwest
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Можно ли добавить одним "хлопом" данные из рекордсета в таблицу?
...
Рейтинг: 0 / 0
добавление данных из rst в SQL server
    #34956259
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
можно.
...
Рейтинг: 0 / 0
добавление данных из rst в SQL server
    #34956801
rstqwest
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
как это можно сделать?
...
Рейтинг: 0 / 0
добавление данных из rst в SQL server
    #34956856
White Owl
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
командой соответствующей.
...
Рейтинг: 0 / 0
добавление данных из rst в SQL server
    #34956948
rstqwest
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
какой?
...
Рейтинг: 0 / 0
добавление данных из rst в SQL server
    #34957636
Фотография HandKot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
смотря как у вас открыт рекордсет
что за рекордсет
и т.д.


I Have Nine Lives You Have One Only
THINK!
...
Рейтинг: 0 / 0
добавление данных из rst в SQL server
    #34958201
LETME
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
    Set cnn = New ADODB.Connection
    Set rst = New ADODB.Recordset
    rst.CursorLocation = adUseClient

	cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & ThisWorkbook.FullName & ";" & _
    "Extended Properties=""Excel 8.0;HDR=No;IMEX=1"""
    
    rst.Open "SELECT F1, F2, F3, F4, F5, F6, F7, F8 FROM [verification$B1:I" & lngRow & "]", cnn
    rst.Close
    cnn.Close
...
Рейтинг: 0 / 0
добавление данных из rst в SQL server
    #34976722
LETME
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Народ, ну дк и что дальше то?
...
Рейтинг: 0 / 0
добавление данных из rst в SQL server
    #34977036
Фотография HandKot
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
точный синтаксис не помню
но примерно так

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
    Set cnn = New ADODB.Connection
    Set rst = New ADODB.Recordset
    rst.CursorLocation = adUseClient

	cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & ThisWorkbook.FullName & ";" & _
    "Extended Properties=""Excel 8.0;HDR=No;IMEX=1"""
    
    rst.Open "SELECT F1, F2, F3, F4, F5, F6, F7, F8 FROM [verification$B1:I" & lngRow & "]", cnn, adBatchOptimistic
    'добавляем запись
    rst.AddNew
    rst.Fields("F1") = ...
    ...
    rst.Fields("F8") = ...
    'обновляем данные
    rst.UpdateBatch
    rst.Close
    cnn.Close

попробуйте
I Have Nine Lives You Have One Only
THINK!
...
Рейтинг: 0 / 0
добавление данных из rst в SQL server
    #34977091
LETME
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
HandKot, ды это понятно... по одной записи в цикле я добавлять умею...
Вопрос в том - может сразу все как можно добавить?
Или нельзя?
...
Рейтинг: 0 / 0
добавление данных из rst в SQL server
    #34977152
vkodor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
нужно воспользоваться комадой INSERT INTO и методом Connection.Execute
что-то типа
Код: plaintext
cnn.Execute "insert into [имя таблицы] select [f1],[f2],[f3] from [Лист2$A4:AP4] WHERE temp = 1"
...
Рейтинг: 0 / 0
добавление данных из rst в SQL server
    #34977157
LETME
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
...ну что-то типа копифромрекордсет...%%%
...
Рейтинг: 0 / 0
добавление данных из rst в SQL server
    #34977158
LETME
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
vkodorнужно воспользоваться комадой INSERT INTO и методом Connection.Execute
что-то типа
Код: plaintext
cnn.Execute "insert into [имя таблицы] select [f1],[f2],[f3] from [Лист2$A4:AP4] WHERE temp = 1"


vkodor, спасибо!!!
...
Рейтинг: 0 / 0
13 сообщений из 13, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / добавление данных из rst в SQL server
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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