Access ASP SQL Server VBA NET - Форумы по проектированию

LEADERSOFT.ru Разработка на заказ программ и сайтов

Форумы по информационным технологиям

Начало

Forums

Регистрация | Вход

Форумы

Поиск

Список форумов

Программирование

Microsoft Access. Файлы mdb и accdb

Тема: Не проход...

Тема: Не проходит удаление таблицы из-за связей

15.06.2007 21:03:36

Antonio

6 сообщения

Тема: Не проходит удаление таблицы из-за связей

Братцы, хэлп!
Кто знает как обойти проблему?

Пытаюсь программно покилять таблицы:

StrSQL = "DROP TABLE " & tbl
DoCmd.RunSQL StrSQL

Но Access выдает ошибку:
"Удаление индекса невозможно. Он используется для установления связи".

Что самое смешное, если вручную начинаешь удалять таблицы, то все ОК.

И еще момент, может знатоки подскажут, как программно вызвать диалог вызова функии "Импорт"? Эта та, что в окне Database по правой кнопке.

Заранее благодарен за ответ.

P.S. Проблемы с базой данных
Автор: Antonio от 13.01.2003 0:59:16 Источник ...

15.06.2007 21:03:36

All

4316 сообщения

RE: Не проходит удаление таблицы из-за связей

Аналог "ручного" удаления
DoCmd.DeleteObject acTable,"TT"
Вызов команд меню подробно описан в примерах сайта (la_menu.mdb)

P.S. Проблемы с базой данных
Автор: Anonymous от 0:00:00 Источник ...

15.06.2007 21:03:36

All

4316 сообщения

RE: Не проходит удаление таблицы из-за связей

похоже, что это не совсем аналог, т.к.
выполнение этой команды приводит к той же самой ошибке - невозможности уделения таблицы, с установленными связями :(
в принципе, я почти решил проблему с удалением связей
Dim db, rel
Set db = CurrentDb

For Each rel In db.Relations
db.Relations.Delete rel.Name
Next rel

после этого таблицы легко удалить.

Только почему-то не удаляются связи, если у таблиц, участвующих в них определены подчиненные таблицы :(
Вот с этим я пока не знаю как бороться.
Так что вопрос все еще остается открытым.

P.S. Проблемы с базой данных
Автор: Antonio от 0:00:00 Источник ...

15.06.2007 21:03:36

All

4316 сообщения

RE: Не проходит удаление таблицы из-за связей

>Что самое смешное, если вручную начинаешь удалять таблицы, то все ОК
Не надо вводить в заблуждение
Если вручную удаляете связанную таблицу, то также выскакивает ошибка
Access запрашивает разрешение на удаление связей
После чего таблицу можно удалить
Так какие проблемы сделать это програмно?
(что Вами и показано от 14/1/2003)

P.S. Проблемы с базой данных
Автор: Anonymous от 0:00:00 Источник ...

15.06.2007 21:03:36

REAntonio

1 сообщения

RE: Не проходит удаление таблицы из-за связей

Antonio алгоритм удаление связёй принципиально не правильный... тк он удаляет не все связи а через одну!

вот правельный:
'------------
Dim db
Set db = CurrentDb
Do While db.Relations.Count > 0
db.Relations.Delete db.Relations.Item(0).Name
Loop
'------------

oda

P.S. Проблемы с базой данных
Автор: RE Antonio от 07.02.2005 15:12:40 Источник ...

Страница 1 из 1

Программирование

Microsoft Access. Файлы mdb и accdb

Тема: Не проход...

Поиск

Список форумов

Начало | Forums