ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как из новой строки скопировать текущую дату в предыдущую стоку?
5 сообщений из 5, страница 1 из 1
Как из новой строки скопировать текущую дату в предыдущую стоку?
    #32461133
Alkush
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Alkush
Гость
В таблице присутствуют следующие поля:
S_GUID - поле (AutoNumber)
Exchange - курс $
EntryDate - день ввода данных (вводится автоматически при заполнении поля “Exchange”)
EnrtyBy - кем введены (вводится автоматически при заполнении поля “Exchange”)
NewEntryDate - данное поле должно получать дату с поля EntryDate (также должно вводится автоматически при заполнении поля “Exchange”)
Процесс такой, пример
Код: plaintext
1.
2.
3.
4.
5.
6.
S_Guid 	Exchange	EntryDate	EnrtyBy	NewEntryDate
 1 	 39 	 11 -Feb- 04 	Admin	 25 -Feb- 04 
 2 	 40 	 25 -Feb- 04 	Admin	 20 -Mar- 04 
 3 	 37 	 20 -Mar- 04 	Admin	 25 -Mar- 04 
 4 	 32 	 25 -Mar- 04 	Admin

Вопрос ко всем, кто может помочь
Что можно сделать чтобы поле “NewEntryDate” заполнялось автоматически при заполнении поля “Exchange”?
Заранее благодарен
...
Рейтинг: 0 / 0
29.03.2004, 17:01
| Ответить | Цитировать | Написать  
Как из новой строки скопировать текущую дату в предыдущую стоку?
    #32461409
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shuhard
Участник
Если есть событие после записи в табличку(т.е.существует форма для ввода и кнопочка) то примерно так :


Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
Dim MyRst As Recordset
Dim SqlString As String
Dim Mydate As Variant
SqlString =  " Select * From TBaks order by S_Guid" 
Set MyRst = CurrentDb.OpenRecordset(SqlString)
MyRst.MoveLast
MyRst.MoveFirst
If MyRst.RecordCount >  1  Then
   MyRst.MoveLast
   Mydate = MyRst!EntryDate
   MyRst.MovePrevious
   With MyRst
   .Edit
   !NewEntryDate = Mydate
   .Update
   End With
End If

если ввод прямиком в таблицу то пас
...
Рейтинг: 0 / 0
29.03.2004, 19:37
| Ответить | Цитировать | Написать  
Как из новой строки скопировать текущую дату в предыдущую стоку?
    #32461644
Alkush
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Alkush
Гость
2 Shuhard
Огромное спасибо.
Очень выручили, надоело из формы переходить в таблицу и в ручную все вносить
...
Рейтинг: 0 / 0
30.03.2004, 08:12
| Ответить | Цитировать | Написать  
Как из новой строки скопировать текущую дату в предыдущую стоку?
    #32461663
Фотография Shuhard
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shuhard
Участник
На здоровье!
забыл
Код: plaintext
1.
MyRst.close
...
Рейтинг: 0 / 0
30.03.2004, 08:41
| Ответить | Цитировать | Написать  
Как из новой строки скопировать текущую дату в предыдущую стоку?
    #32461831
Kelme
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Kelme
Участник
и
Код: plaintext
1.
 Set MyRst = Nothing
...
Рейтинг: 0 / 0
30.03.2004, 10:48
| Ответить | Цитировать | Написать  
5 сообщений из 5, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Как из новой строки скопировать текущую дату в предыдущую стоку?
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/moderation_log.php?user_name=alexhorek]:
 0ms
get settings:
 10ms
get forum list:
 13ms
get settings:
 10ms
get forum list:
 24ms
get settings:
 9ms
get forum list:
 17ms
get settings:
 12ms
get forum list:
 18ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 156ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 53ms
get tp. blocked users:
 1ms
others: 5575ms
total:  5919ms
созд. / загр.: 5919ms
x
x
Закрыть


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