Запрос на обновление

[slone2179]

Здравствуйте, уважаемые! Нужно сделать запрос на обновление на строк. Сделал запрос
UPDATE ТАБЛИЦА SET ТАБЛИЦА.[Наименование поля] = "Значение неодинаковое", INVOICE.Дата = #неодинаковая#
WHERE (((INVOICE.Поле еще одно)=36));
нужно сделать очень много запросов на обновление, т.е. следующий запрос будет
UPDATE ТАБЛИЦА SET ТАБЛИЦА.[Наименование поля] = "Другое значение", INVOICE.Дата = #Другая дата#
WHERE (((INVOICE.Поле еще одно)=Это число будет 37, затем 38));
В запросе менять 350 раз очень долго. Можно ли это дело как-то автоматизировать?

[slone2179]

Была бы возможность делать хотя бы так - каждый запрос на новой строке, тоже бы подошло
UPDATE ТАБЛИЦА SET ТАБЛИЦА.[Наименование поля] = "Значение неодинаковое", INVOICE.Дата = #неодинаковая#
WHERE (((INVOICE.Поле еще одно)=36));
UPDATE ТАБЛИЦА SET ТАБЛИЦА.[Наименование поля] = "Другое значение", INVOICE.Дата = #Другая дата#
WHERE (((INVOICE.Поле еще одно)=Это число будет 37));

[gluk_fm]

Да создав простую таблицу где будет 3 поля (или сколько параметров у Вас там) и написав:

sub t()
dim db as database
set db=currentdb
dim p1 as string,p2 as string,p3 as string'с форматами параметров играйтесь сами в зависимости от свойст созданных вами полей

set t = db.openrecorset (запрос на выборку с таблицы описанной выше)

t.movefirst
Do Until t.EOF
p1 = t!["Значение неодинаковое"]
p2 = t![#неодинаковая#]
p3 = t![36 или как будет называться столбец с созданной таблицы]

db.execute("UPDATE ТАБЛИЦА SET ТАБЛИЦА.[Наименование поля] = " & p1 & ", INVOICE.Дата = #" & p2 & # " & _
"WHERE (((INVOICE.Поле еще одно)=" & p3 & "));")

t.MoveNext
Loop

[slone2179]

Да спасибо, gluk_fm! Сделал только немного по-другому. Только перекопав столько статей узнал, что хотел - что в запросе можно делать циклы. Но Ваш запрос работает в 2 раза быстрее моего. Значит Вы опять молодец!