ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Запрос на обновление/добавление
25 сообщений из 31, страница 1 из 2
  1  все
Запрос на обновление/добавление
    #32656403
Татьяна Валерьевна
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Татьяна Валерьевна
Участник
Проблема вот в чем: существуют 2 запроса. Их нужно объединить так, чтобы в объединенный запрос входили ВСЕ записи из первого и из второго (часть записей во 2 запросе уникальны и по ключу не совпадут с первым).
Что можно сделать?
...
Рейтинг: 0 / 0
19.08.2004, 12:04:27
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32656410
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
UNION SELECT
...
Рейтинг: 0 / 0
19.08.2004, 12:05:21
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32656502
Фотография Pavel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Pavel
Участник
Татьяна Валерьевначасть записей во 2 запросе уникальны и по ключу не совпадут с первым
Стало быть другая часть совпадет, а потому Union All
...
Рейтинг: 0 / 0
19.08.2004, 12:34:36
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32656671
Фотография маяк
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
маяк
Участник
Татьяна Валерьевначасть записей во 2 запросе уникальны и по ключу не совпадут с первымВот это совершенно неважно. Только, упаси Г-сподь, не трогайте запросы на обновление и добавление - что-то мне подсказывает, что в этом случае вашим данным очень скоро придёт каюк...
...
Рейтинг: 0 / 0
19.08.2004, 13:24:12
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32656699
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
Непонятно как записи должны быть объединены - вертикально или горизонтально.
Быть может не Union/Union All требуется, а Join/Left Join/Right Join/Full Outer Join
...
Рейтинг: 0 / 0
19.08.2004, 13:31:17
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32656730
Фотография маяк
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
маяк
Участник
Лох ПозорныйНепонятно как записи должны быть объединены - вертикально или горизонтально.
Быть может не Union/Union All требуется, а Join/Left Join/Right Join/Full Outer JoinНу, этого мы, полагаю, уже никогда не узнаем. Татьяна Валерьевна зарегистрировалась, задала вопрос и забыла про sql.ru как про страшный сон, оставив нам тему для флуда %)
...
Рейтинг: 0 / 0
19.08.2004, 13:38:51
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32657851
Фотография Темный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Темный
Участник
Видать убила все-таки... :(
...
Рейтинг: 0 / 0
19.08.2004, 21:30:43
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32658015
Татьяна Валерьевна
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Татьяна Валерьевна
Участник
Нет уважаемые, это запросы меня добили. Вчера убила полдня на то, чтобы написать этот "шедевр"
Public Sub бал()
Dim баланс_металла As Recordset, остаток_вх As Recordset, s As String
Set баланс_металла = CurrentDb.OpenRecordset("баланс_металла", dbOpenDynaset)
Set остаток_вх = CurrentDb.OpenRecordset("остаток_вх")
остаток_вх.MoveFirst
Do While Not остаток_вх.EOF
s = "[номном]=" & str(остаток_вх![номном])
баланс_металла.FindFirst (s)
If баланс_металла.NoMatch = False Then
баланс_металла.Edit
баланс_металла![наименование] = остаток_вх![наименование]
баланс_металла.Update
Else
баланс_металла.MoveLast
баланс_металла![номном] = остаток_вх![номном]
баланс_металла![наименование] = остаток_вх![наименование]
баланс_металла.Update
End If
остаток_вх.MoveNext
Loop
баланс_металла.Close
остаток_вх.Close
End Sub
НО ОН, ЗАРАЗА, НЕ РАБОТАЕТ!!!! Конкретно ругается на ф-ию FindFirst
ПОМОГИТЕ ЧЕМ МОЖЕТЕ!!!
...
Рейтинг: 0 / 0
20.08.2004, 08:02:59
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32658073
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
paparome
Участник
Опа.
FindFirst в цикле :(
Нет внутри цикла надо делать FindNext

И, ваще, эти функции тормознутые
Я в таких случаях сразу делаю нужную выборку (т.е. добавляю к запросу WHERE) - Советую!!!
...
Рейтинг: 0 / 0
20.08.2004, 09:08:21
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32658087
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
paparome
Участник
Хотя нет - наврал
Плохо цикл прочитал :(
Но все равно как-то мне это не нравиться

Предположу
1. По else (ИМХО) надо делать не MoveLast, а AddNew
2. Может это можно одним запросом сделать?
Код: plaintext
1.
2.
3.
4.
5.
6.
Select
остаток_вх.номном as num1,
остаток_вх.наименование as name1,
баланс_металла.номном as num2,
баланс_металла.номном as name2
From остаток_вх Left join баланс_металла
On остаток_вх.номном = баланс_металла.номном
Не то?
...
Рейтинг: 0 / 0
20.08.2004, 09:16:51
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32658147
amel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
amel
Участник
Как писали выше, нужно сделать вот так:
Select остаток_вх.номном, остаток_вх.наименование from остаток_вх
Union select баланс_металла.номном, баланс_металла.наименование from баланс_металла
...
Рейтинг: 0 / 0
20.08.2004, 09:54:06
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32658413
Фотография paparome
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
paparome
Участник
AmelКак писали выше, нужно сделать вот так:
Select остаток_вх.номном, остаток_вх.наименование from остаток_вх
Union select баланс_металла.номном, баланс_металла.наименование from баланс_металла
ИМХО - не в тему
И как это прикрутить к тому что девушке надо?
...
Рейтинг: 0 / 0
20.08.2004, 11:16:40
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32658429
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
Вместо
Код: plaintext
баланс_металла.FindFirst (s)
Следует писать
Код: plaintext
баланс_металла.FindFirst s
...
Рейтинг: 0 / 0
20.08.2004, 11:21:34
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32658440
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
В условии Else попытка сделать Update рекордсета без AddNew или Edit
...
Рейтинг: 0 / 0
20.08.2004, 11:23:31
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32658444
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
И наконец не ясно почему это делается через рекордсеты, а не через запрос.
...
Рейтинг: 0 / 0
20.08.2004, 11:25:02
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32658698
Татьяна Валерьевна
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Татьяна Валерьевна
Участник
Уважаемый Vsevolod, - FindFirst (s) работает так же как и FindFirst s - т.е. не работает!
А зачем мне нужен цикл - по старой привычке, чтоб наверняка.
Предыдущие советы тоже не помогли. Может что-то с самого начала не так.
Еще версии есть, или уже не ждать?
...
Рейтинг: 0 / 0
20.08.2004, 12:33:41
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32658804
SRG
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SRG
Гость
авторКонкретно ругается на ф-ию FindFirst

А как КОНКРЕТНО он ругается?
...
Рейтинг: 0 / 0
20.08.2004, 12:59:39
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32658820
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
Мадам, вы начали с какого-то непонятного вопроса по SQL-запросу, так и не объяснили что же вам в итоге надо, незаметно перескочили на совершенно не связанный с запросом VBA-код с какой-то ошибкой, так и не объяснили что же за ошибка, и теперь спрашиваете - ждать ли еще версий??? Ну ждите...
...
Рейтинг: 0 / 0
20.08.2004, 13:04:29
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32658837
amel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
amel
Участник
paparome:))
>существуют 2 запроса. Их нужно объединить так, чтобы в объединенный >запрос входили ВСЕ записи из первого и из второго (часть записей во 2 >запросе уникальны и по ключу не совпадут с первым).

Уважаемый paparome! То ли я читать разучился, то ли вопрос сформулирован по тупому!?
...
Рейтинг: 0 / 0
20.08.2004, 13:08:13
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32658844
Татьяна Валерьевна
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Татьяна Валерьевна
Участник
Уточняю (хотя кому это интересно?): Есть 4 таблицы. Данные из них переписываются в общую по принципу - если есть запись с таким №(номном), заполняется определенное поле, если нет записи - она добавляется и опять таки заполняются поля. Поля во всех таблицах разные, в общей таблице есть они все.
Цикл вроде бы простой, но сделать это в ACCESSe я уже отчаялась!
...
Рейтинг: 0 / 0
20.08.2004, 13:10:52
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32658859
Татьяна Валерьевна
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Татьяна Валерьевна
Участник
SRG авторКонкретно ругается на ф-ию FindFirst

А как КОНКРЕТНО он ругается?

Method or data member not found
...
Рейтинг: 0 / 0
20.08.2004, 13:16:28
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32658861
amel
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
amel
Участник
По моему тут уже писали выше все можно сделать одним запросом left join + insert table методом execute: выбираешь все записи, которых нет left join и вставляешь в нужную табл.
...
Рейтинг: 0 / 0
20.08.2004, 13:16:48
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32658864
Фотография Daf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Daf
Участник
А как у вас обстоят дела с сылками на библиотеки? Нет ли потерянных?
...
Рейтинг: 0 / 0
20.08.2004, 13:18:40
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32658867
Фотография Victosha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Victosha
Участник
это можно сделать двумя запросами или одним циклом, в котором только edit-update.

сделайте один рекордсет, представляющий собой Левое соединение
"остаток_вх" с "баланс_металла" по "[номном]" , редактируйте поля, соответствующие "баланс_металла"
не помню - в параметрах запроса может потребоваться dbInconsistent

(с выражением лица)
...
Рейтинг: 0 / 0
20.08.2004, 13:20:14
| Ответить | Цитировать | Написать  
Запрос на обновление/добавление
    #32658882
sposad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
sposad
Участник
Код: plaintext
s = "[номном]='" & str(остаток_вх![номном]) & "'"

попробуйте вот так, если, конечно, хотите продолжить борьбу с циклом. И вообще я бы не применял русские буквы в названиях полей.
...
Рейтинг: 0 / 0
20.08.2004, 13:25:15
| Ответить | Цитировать | Написать  
25 сообщений из 31, страница 1 из 2
  1  все
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Запрос на обновление/добавление
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=45&msg=32656410&tid=1672300]:
 0ms
get settings:
 6ms
get forum list:
 15ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 41ms
get topic data:
 6ms
get forum data:
 2ms
get page messages:
 67ms
get tp. blocked users:
 1ms
others: 195ms
total:  339ms
созд. / загр.: 339ms
x
x
Закрыть


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