Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Убиенные записи / 8 сообщений из 8, страница 1 из 1
16.08.2004, 14:32:40
    #32651012
v-metallic
v-metallic
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Убиенные записи
1. Можно ли в Аксе восстановить удаленную запись
2. Можно ли при добавлении записей записывать их на место удаленных

Спасибо
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.08.2004, 14:58:30
    #32651074
Vsevolod V
Vsevolod V
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Убиенные записи
1. Ты уже удалил запись и хочеш ее восстановить или нужно написать код, который будет восстанавливать удаленные записи?
2. Что такое "место"? Если "место" - это номер, записанный в ключевом поле типа "счетчик", то НЕТ.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.08.2004, 15:06:01
    #32651092
v-metallic
v-metallic
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Убиенные записи
Нужен код, восстанавливающий записи
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.08.2004, 15:23:03
    #32651128
Vw
Vw
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Убиенные записи
Можно :
Запросом на добавление
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.08.2004, 15:39:11
    #32651172
Vsevolod V
Vsevolod V
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Убиенные записи
авторНужен код, восстанавливающий записи
Делаеш в таблице дополнительное поле (например, "логическое"). А в коде делаеш так, чтобы при нажатии клавиши Delete или кнопки "Удалить" запись не удалялась "физически", а только помечалась как удаленная.
Например:
Код: plaintext
1.
2.
3.
4.
5.
Private Sub Form_Delete(cancel As Integer)
If MsgBox("Подтвердите удаление сервиса '" & Me!Сервис & "'", vbOKCancel, "Удаление") = vbOK Then
SQLStr = "UPDATE TEMP_CALC SET TEMP_CALC.DELETED = True where operid = " & Me!OperId & ""
CurrentDb.Execute SQLStr
End If
End Sub
Соответственно в источнике данных формы пишеш: ".... where deleted <> true"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.08.2004, 15:40:34
    #32651178
Vsevolod V
Vsevolod V
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Убиенные записи
Блин!
Забыл!
Код: plaintext
1.
Private Sub Form_Delete(cancel As Integer)
Cancel = true
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.08.2004, 15:52:28
    #32651215
v-metallic
v-metallic
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Убиенные записи
VwМожно :
Запросом на добавление

Восстанавливать или перезаписывать удаленные?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.08.2004, 15:53:46
    #32651220
Daf
Daf
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Убиенные записи
Добавлять ...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Убиенные записи / 8 сообщений из 8, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 298ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1672444]:
 0ms
get settings:
 5ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 35ms
get topic data:
 7ms
get forum data:
 2ms
get page messages:
 28ms
get tp. blocked users:
 1ms
others: 206ms
total:  298ms
x
x
Закрыть


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