InstantForum.NET v4.1.4Релибhttp://www.relib.com/forums/robot@relib.comWed, 03 Dec 2008 05:31:58 GMT20http://www.relib.com/forums/Topic912341-20-1.aspxБольшое спасибо. Работает как надо. :)Tue, 10 Apr 2007 21:25:08 GMTpvik1970http://www.relib.com/forums/Topic912341-20-1.aspxВообще-то я говорил о критерии поиска записи в таблице Выборка, но так как в конце-концов выяснилось, что таблица содержит не более одной записи, то вопрос о критерии отпадает. Изменения можно сделать так:<br>CurrentDB.Execute "UPDATE [Выборка] SET [Заказчик название]='" & Me![Название] & "', [Заказчик ФИО]='" & Me![ФИО] & "', [Заказчик адрес]='" & Me![Адрес] & "'"<br><br>Tue, 10 Apr 2007 21:01:23 GMTBoNiMhttp://www.relib.com/forums/Topic912341-20-1.aspxЕсли запись есть, то вставлять (см. выше, ошибся)Tue, 10 Apr 2007 20:16:00 GMTpvik1970http://www.relib.com/forums/Topic912341-20-1.aspxЯ почему сразу спросил про Insert? Чтобы проверяя таблицу на наличие полей выявить, если запись есть, то только заменять, если ничего в таблице нет, то просто заменять. Все критерии теже самые. три поля из одной в другую, но через Update. Просто в таблице должна быть только одна запись всегда! Вы спрашивали насче Word. Так вот эти поля будут использоваться в различных документах Word, чтобы их не набирать, они будут браться из полей базы путем слияния, так как в Word может быть открыт только один источник данных. Ну примерно так.Tue, 10 Apr 2007 20:15:11 GMTpvik1970http://www.relib.com/forums/Topic912341-20-1.aspx[quote][b]pvik1970 (10.04.2007)[/b][hr]Спасибо. То, что надо! Ну а если мне нужно будет просто заменить запись, вместо Insert просто вставить Update? Вопросы, конечно, глупые, просто я новичок. А хэлп в аксэссе - никакой. :([/quote]<br>Вместо INSERT вставить UPDATE - не пойдет.<br>Давайте поговорим про замену. Если запись в табл. Фирмы не изменилась, то заменять запись в таблице Вставка не имеет смысла. Если же она изменилась, то нам в таблице Выборка необходимо определить запись, которая подлежит замене. Укажите, пожалуйста критерий, по которому можно определеть эту запись.<br>Tue, 10 Apr 2007 20:08:19 GMTBoNiMhttp://www.relib.com/forums/Topic912341-20-1.aspxСпасибо. То, что надо! Ну а если мне нужно будет просто заменить запись, вместо Insert просто вставить Update? Вопросы, конечно, глупые, просто я новичок. А хэлп в аксэссе - никакой. :(Tue, 10 Apr 2007 19:29:20 GMTpvik1970http://www.relib.com/forums/Topic912341-20-1.aspxДа, но предыдущим запросом вся таблица Фирмы будет полностью скопирована в табл. Выборка. Чтобы скопировать одну, текущую запись формы, можно так (предполагается, что на форме есть поля с именами Название, ФИО, Адрес<br>CurrentDB.Execute "INSERT INTO [Выборка] ([Заказчик название], [Заказчик ФИО], [Заказчик адрес]) VALUES ('" & Me![Название] & "', '" & Me![ФИО] & "', '" & Me![Адрес] & "')"Tue, 10 Apr 2007 17:48:18 GMTBoNiMhttp://www.relib.com/forums/Topic912341-20-1.aspxСработало! Но одно НО! Он вставил мне в таблицу все записи с предыдущей, а нужна только та, на которой нахожусь.....Tue, 10 Apr 2007 17:37:22 GMTpvik1970http://www.relib.com/forums/Topic912341-20-1.aspxДа, говорил за Update, но решил просто в таблицу вставить запись. Update потом разберу. Щас попробую... Все-равно спасибо.Tue, 10 Apr 2007 17:34:51 GMTpvik1970http://www.relib.com/forums/Topic912341-20-1.aspxПопробуйте так. <br><br>Private Sub Заказчик_Click() <br><br>On Error GoTo Err_Заказчик_Click<br><br>CurrentDB.Execute "INSERT INTO [Выборка] ([Заказчик название], [Заказчик ФИО], [Заказчик адрес]) SELECT [Название], [ФИО], [Адрес] FROM [Фирмы]"<br> <br>Exit_Заказчик_Click:<br> Exit Sub<br><br>Err_Заказчик_Click:<br> MsgBox Err.Description<br> Resume Exit_Заказчик_Click<br> <br>End Sub<br><br>В первом посте Вы говорили об изменении записи, а здесь делаете вставку новой записи. <br>Tue, 10 Apr 2007 17:29:20 GMTBoNiM