Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Обновить таблицу 
V
    Опции темы
Rodman
Дата 6.6.2007, 15:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


CIO
****


Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

Репутация: 1
Всего: 122



Дароф. 

есть форма по добавлению "пользователя", по нажатию на кнопку добавить - данные добавляются, форма закрывается, и сразу же открывается следующая которая должна вывести в поле данные последнего добавленного
Код
Dim v_xlApp As Object
  Dim v_Rst As ADODB.Recordset
  Dim v_X() As Variant
Dim dsf As Database, rew As Recordset
Set dsf = DBEngine.Workspaces(0).Databases(0)
Set rew = dsf.OpenRecordset("Персональные данные")
rew.Close
'rew.Update

  Set v_Rst = New ADODB.Recordset

     v_Rst.Open "SELECT [Персональные данные].Код_донора, [Персональные данные].Фамилия, [Персональные данные].Имя, [Персональные данные].Отчество FROM [Персональные данные] ORDER BY [Персональные данные].Код_донора DESC;", CurrentProject.Connection
     v_X = v_Rst.GetRows
     v_Rst.Close

   Set v_Rst = Nothing

  Код_донора = v_X(0, 0)
  Поле70 = v_X(1, 0) & " " & v_X(2, 0) & " " & v_X(3, 0)


но в поле выводятся данные предыдущего!!! Как это исправить?

Сенкс
PM MAIL WWW Skype GTalk YIM MSN   Вверх
Akina
Дата 6.6.2007, 21:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 30
Всего: 454



Добавление записи - процедура асинхронная. Следует в коде добавления использовать блокировку таблицы, а в коде считывания проверять статус.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Rodman
Дата 8.6.2007, 16:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


CIO
****


Профиль
Группа: Участник
Сообщений: 6144
Регистрация: 7.5.2006
Где: Ukraine ⇛ Kyiv ci ty

Репутация: 1
Всего: 122



Сделал при помощи промежуточной формы...Пока пользователь нажмет продолжить, таблица уже обновлена!!!
PM MAIL WWW Skype GTalk YIM MSN   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "MS Access"
Akina
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] и [code=sql][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | MS Access | Следующая тема »


 




[ Время генерации скрипта: 0.0455 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.