ReSQL.ru
     
powered by simpleCommunicator - 2.0.52     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Заполнить таблицу данными из сохранённого SQL запроса
15 сообщений из 15, страница 1 из 1
Заполнить таблицу данными из сохранённого SQL запроса
    #39695701
sup_ben
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sup_ben
Гость
Есть SQL запрос, есть таблица с аналогичными полями, в которую надо всунуть построчно данные из этого запроса. Что-то делаю не так. Код не работает:

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Dim rs As Recordset
Set db = CurrentDb

Set rs = db.OpenRecordset("QProductToPackageAssign")

 While Not rs.EOF
    'On Error Resume Next
    db.Execute "INSERT INTO ProductToPackageAssignTMP ([ProductID],[ProductNameLat],[PriceFinal],[Quantity],[ProjectID],[Manufacturer],[UnitTypeEN]) SELECT ProductID,ProductNameLat,PriceFinal,Quantity,ProjectID,Manufacturer,UnitTypeEN;"
    'On Error GoTo 0
    rs.MoveNext
  Wend

  rs.Close
  Set rs = Nothing



Не подскажете? Спасибо
...
Рейтинг: 0 / 0
30.08.2018, 16:51
| Ответить | Цитировать | Написать  
Заполнить таблицу данными из сохранённого SQL запроса
    #39695706
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Akina
Участник
В INSERT INTO навылет отсутствует секция FROM. Кстати, и итерации по рекордсету не нужны (да и он сам не нужен).
...
Рейтинг: 0 / 0
30.08.2018, 16:58
| Ответить | Цитировать | Написать  
Заполнить таблицу данными из сохранённого SQL запроса
    #39695707
Прогер_самоучка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прогер_самоучка
Участник
sup_benЕсть SQL запрос, есть таблица с аналогичными полями, в которую надо всунуть построчно данные из этого запроса. Что-то делаю не так. Код не работает:

Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Dim rs As Recordset
Set db = CurrentDb

Set rs = db.OpenRecordset("QProductToPackageAssign")

 While Not rs.EOF
    'On Error Resume Next
    db.Execute "INSERT INTO ProductToPackageAssignTMP ([ProductID],[ProductNameLat],[PriceFinal],[Quantity],[ProjectID],[Manufacturer],[UnitTypeEN]) SELECT ProductID,ProductNameLat,PriceFinal,Quantity,ProjectID,Manufacturer,UnitTypeEN;"
    'On Error GoTo 0
    rs.MoveNext
  Wend

  rs.Close
  Set rs = Nothing




Не подскажете? Спасибоэто ещё что за ужас ?
Вы понимаете что делает этот код?
...
Рейтинг: 0 / 0
30.08.2018, 16:59
| Ответить | Цитировать | Написать  
Заполнить таблицу данными из сохранённого SQL запроса
    #39695708
Прогер_самоучка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прогер_самоучка
Участник
зачем нужно построчно?
...
Рейтинг: 0 / 0
30.08.2018, 17:01
| Ответить | Цитировать | Написать  
Заполнить таблицу данными из сохранённого SQL запроса
    #39695713
sup_ben
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sup_ben
Гость
Прогер_самоучка, там есть ещё поля, которые должны пустыми оставаться
...
Рейтинг: 0 / 0
30.08.2018, 17:03
| Ответить | Цитировать | Написать  
Заполнить таблицу данными из сохранённого SQL запроса
    #39695715
Прогер_самоучка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прогер_самоучка
Участник
Вся эта ересь заменяется ровно одной строчкой кода
Код: vbnet
1.
2.
3.
  Currentdb.Execute " INSERT INTO ProductToPackageAssignTMP ([ProductID],[ProductNameLat],[PriceFinal],[Quantity],[ProjectID],[Manufacturer],[UnitTypeEN]) " & _
                    " SELECT ProductID,ProductNameLat,PriceFinal,Quantity,ProjectID,Manufacturer,UnitTypeEN " & _
                    " FROM QProductToPackageAssign "
...
Рейтинг: 0 / 0
30.08.2018, 17:04
| Ответить | Цитировать | Написать  
Заполнить таблицу данными из сохранённого SQL запроса
    #39695717
Прогер_самоучка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прогер_самоучка
Участник
sup_benПрогер_самоучка, там есть ещё поля, которые должны пустыми оставатьсякакие поля и где они должны оставаться?
В запросе QProductToPackageAssign должны остаться и не должны перекочевать ?
Или что вы имеет в виду ?
...
Рейтинг: 0 / 0
30.08.2018, 17:06
| Ответить | Цитировать | Написать  
Заполнить таблицу данными из сохранённого SQL запроса
    #39695722
sup_ben
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sup_ben
Гость
Прогер_самоучка, не работает, говорит "Record is deleted".
...
Рейтинг: 0 / 0
30.08.2018, 17:09
| Ответить | Цитировать | Написать  
Заполнить таблицу данными из сохранённого SQL запроса
    #39695783
Прогер_самоучка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прогер_самоучка
Участник
sup_benПрогер_самоучка, не работает, говорит "Record is deleted".а в вашем-то запросе не участвуют ли линкованные таблицы к серверу?
...
Рейтинг: 0 / 0
30.08.2018, 18:36
| Ответить | Цитировать | Написать  
Заполнить таблицу данными из сохранённого SQL запроса
    #39695833
sup_ben
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sup_ben
Гость
Прогер_самоучка, участвуют, но не к SQL-серверу, а просто клиент к back-end базе с таблицами.
...
Рейтинг: 0 / 0
30.08.2018, 20:44
| Ответить | Цитировать | Написать  
Заполнить таблицу данными из сохранённого SQL запроса
    #39695863
Прогер_самоучка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прогер_самоучка
Участник
sup_benПрогер_самоучка, участвуют, но не к SQL-серверу, а просто клиент к back-end базе с таблицами.вот в этой бэкэнд базе что за структура ? не аксовская?
...
Рейтинг: 0 / 0
30.08.2018, 22:01
| Ответить | Цитировать | Написать  
Заполнить таблицу данными из сохранённого SQL запроса
    #39695899
sup_ben
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sup_ben
Гость
Родной Access 2007- В разных источниках говорят, что, мол, база запортилась, если такая ошибка. Repair и recompile не помогли. Остальное всё нормально работает. Ну не знаю, буду разбираться.
...
Рейтинг: 0 / 0
30.08.2018, 23:47
| Ответить | Цитировать | Написать  
Заполнить таблицу данными из сохранённого SQL запроса
    #39695904
Прогер_самоучка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прогер_самоучка
Участник
sup_benРодной Access 2007- В разных источниках говорят, что, мол, база запортилась, если такая ошибка. Repair и recompile не помогли. Остальное всё нормально работает. Ну не знаю, буду разбираться.проверьте все типы данных в исходном запросе. Скорее всего что-то с типами и в 2003 не понимает что за тип хотят залить
...
Рейтинг: 0 / 0
31.08.2018, 00:06
| Ответить | Цитировать | Написать  
Заполнить таблицу данными из сохранённого SQL запроса
    #39696096
sup_ben
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sup_ben
Гость
Нашёл, в чём проблема. В запросе поле ProductNameLat было вычисляемым, почему-то не кушал, удалил его и стало работать. Всем самоучкам спасибо :)
...
Рейтинг: 0 / 0
31.08.2018, 11:49
| Ответить | Цитировать | Написать  
Заполнить таблицу данными из сохранённого SQL запроса
    #39696108
Прогер_самоучка
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Прогер_самоучка
Участник
sup_benНашёл, в чём проблема. В запросе поле ProductNameLat было вычисляемым, почему-то не кушал, удалил его и стало работать. Всем самоучкам спасибо :);)
...
Рейтинг: 0 / 0
31.08.2018, 11:58
| Ответить | Цитировать | Написать  
15 сообщений из 15, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Заполнить таблицу данными из сохранённого SQL запроса
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&gotonew=1&tid=1611208]:
 0ms
get settings:
 7ms
get forum list:
 12ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 161ms
get topic data:
 8ms
get first new msg:
 7ms
get forum data:
 3ms
get page messages:
 44ms
get tp. blocked users:
 1ms
others: 306ms
total:  557ms
созд. / загр.: 557ms
x
x
Закрыть


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