| |
|
|
| | Доброго времени суток.
Уважаемые подскажи пж. как програмно удалить все связи в базе даных?
Заранее спасибо. | |
| |
| |
| |
|
|
| | Удалить все объекты коллекции Relations из Currentdb
Перечитал вопрос... а что вы понимаете под связями? | |
| |
| |
| |
 52 Кб. |
|
| | Например так. | |
| |
| |
| |
|
|
| | день добрый. Подскажите пж как можно испортить бд? Возможна ли полная очистка всех таблиц? | |
| |
| |
| |
|
|
| |
Возможна ли полная очистка всех таблиц?
|
возможна
ЗЫ.очистка таблиц не есть "испорченная БД", это БД без данных | |
| |
| |
| |
|
|
| |
Подскажите пж как можно испортить бд?
|
Всегда с опаской относился к таким вопросам. Непонятно, что хочет автор - зная слабые места предотвратить возможную порчу, или же сознательно грохнуть базу конторы. | |
| |
| |
| |
|
|
| | скажу честно "сознательно грохнуть базу конторы"
есть бекап данной базы. ответ за порушенную базу держать мне. Цель думаю не столь важна. Но помощ требуется.. | |
| |
| |
| |
|
|
| | Боюсь, что даже помощь в этом вопросе является противозаконной. Так что я пас. | |
| |
| |
| |
|
|
| | открываешь базу как текстовый файл или программно: Open sPath For Binary Access Write As #iFn и меняешь там какие-нибуть символы, а если добашь новые, то всё, тютю. Удачи. | |
| |
| |
| |
|
|
| | вот пример, можно так:
Dim sPath As String
sPath = "путь к базе"
Dim iFn As Integer
iFn = FreeFile()
Open sPath For Binary Access Write As #iFn
Put #iFn, 10, CStr("чо-нибудь")
Close #iFn
End Sub
А если как текстовый файл и потом запустить ещё, то сразу рухнет, обратно уже нельзя, будет. | |
| |
| |
| |
|
|
| | Так же нужно поступить и с бэкапом, если к нему доступ есть. | |
| |
| |
| |
|
|
| | очистить таблицы:
http://hiprog.com/index.php?option=com_content&task=view&id=460
Q.21
там же есть код проверки наличия таблицы, немного поправив можно получить список всех таблиц БД. | |
| |
| |
| |
|
|
| | Всем огромное спасибо.
Ми отдельное спасибо.
тему можно удалить. | |
| |
| |
