Платные хостинги     Раскрутка сайта     Книги по программированию

АРХИВ, удаление записей в другой файл

- Есть 2 файла Clynic.mdb и Archive.mdb (Access),абсолютно идентичные(только архив,естественно пока без данных).В каждой базе данных 14 таблиц,вот некотроые из них: Собаки(IdDog,Name), Визиты(IdVisit,IdDog,Date), Прививки собак(IdVisit,IdInoculate,Amount) и т.д и т.п.Я хочу чтобы при удалении какой-либо собаки в Clynic.mdb все данные относительно этой собачки перешли в файл архива.Единственное,что приходит в голову это что-то типа того:поочередно переписывать каждую запись из каждой таблицы в clynic.mdb в кажую подходящую таблицу в архиве.Но это же какой запутанный способ получается!!!!Может кто-нибудь знает как сделать это проще?

- , то при прямом переносе тебя может ожидать неприятный сюрприз в виде развала связей - у тебя ведь есть поля ключей с автозаполнением? так вот, в базе архива их надо сменить с типа "счетчик" на тип "длинное целое". однако это породит другую проблему - теоретически возможно использование ранее существовавшего значения ключа...В третьих, перенос данных при удалении вряд ли разумен. Делай как в старом добром DBF - помечай записи как неиспользуемые (или переноси в другую таблицу, но в той же БД), а снос в архивную БД организуй отдельной кнопкой (пунктом меню).ИМХО

- А нельзя ли поподробнее про проблему,потому что я уже сделала этот перенос и вроде все нормально работает без проблем.Или это только пока?

- Посмотри алгоритмы заполнения поля счетчик. Их всего-то два...

- А где смотреть?И потом я же в архиве ни одного счетчика не поставила.Я что-то не поняла в чем дело.Всеравно возвращать записи из архива я не собираюсь,пусть сидят себе там.

- Ну коли так, то плюнь и забудь.К слову. После долгих мытарств с вот таким "архивированием" я пришел таки к выводу, что куда как спокойнее делать выгрузку в какой-нить plain text, используя любой delimited формат. 1) читаемо 2) совместимо 3) места занимает меньше на порядки. СоответственноКод rst=openrecordsetopen for output as #1foreach   print #1 Cstr(!FieldN)nextclose #1rst=nothinghighlightSyntax('vbNjVlNm','vb');и аналогично загрузка.

- спасибо

Интернет казино     Онлайн игры     Увеличение члена     Купить DVD