| Вопрос: полное удаление базы | Добавлено: 02.08.04 11:48 |
Автор вопроса:  admsasha | Web-сайт: dansoft.krasnokamensk.ru | ICQ: 234002454 |
|
вот так удляю записи с базы
cnnADO.Open Form1.Adodc1.ConnectionString StrSQL = "DELETE * FROM Tabl1" cnnADO.Execute StrSQL, , adCmdText cnnADO.Close но база не чиститься она также имет большей размер, и в режиме просмотра можно наблюдать все записи... Как удалить "нормально" базу ? |
| Ответы | Всего ответов: 9 |
|
Номер ответа: 1 Автор ответа:  Mihalыch ICQ: 373-509-101 Вопросов: 56 Ответов: 330 |
Профиль | | #1 | Добавлено: 02.08.04 11:59 |
| Не уверен, о по моему перед строкой cnnADO.Close, нужо поставить cnnADO.Update | ||
|
Номер ответа: 2 Автор ответа: admsasha ICQ: 234002454 Вопросов: 56 Ответов: 69 |
Web-сайт: Профиль | | #2 | Добавлено: 02.08.04 12:22 |
| cnnADO.Update - такой нет команды ! | ||
|
Номер ответа: 3 Автор ответа: cresta Вопросов: 117 Ответов: 1538 |
Профиль | | #3 | Добавлено: 02.08.04 22:23 |
| После удаления записей её надо компактить. Удаленные записи - просто забитые нулями, а не удаленные в полном смысле слова | ||
|
Номер ответа: 4 Автор ответа: admsashaICQ: 234002454 Вопросов: 56 Ответов: 69 |
Web-сайт: Профиль | | #4 | Добавлено: 03.08.04 03:10 |
| Так, а как ее "компактить" ??? | ||
|
Номер ответа: 5 Автор ответа: crestaВопросов: 117 Ответов: 1538 |
Профиль | | #5 | Добавлено: 03.08.04 04:43 |
|
Подключи Microsoft Jet and Replication Objects хх library где хх номер версии используемого ADO
Dim jro As jro.JetEngine ‘ создание JetEngine Set jro = New jro.JetEngine ‘ jro.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0  ata Source=MyDatabase.mdb", _
"Provider=Microsoft.Jet.OLEDB.4.0 ata Source=MyCompactedDatabase.mdb;Jet OLEDB:Engine Type=4"
Set jro = Nothing Это если версия ADO не ниже 2.5 |
||
|
Номер ответа: 6 Автор ответа: admsashaICQ: 234002454 Вопросов: 56 Ответов: 69 |
Web-сайт: Профиль | | #6 | Добавлено: 03.08.04 10:22 |
|
"im jro As jro.JetEngine" - даже эта строчка не набирается
>>jro.JetEngine jro, это что??? |
||
|
Номер ответа: 7 Автор ответа: admsashaICQ: 234002454 Вопросов: 56 Ответов: 69 |
Web-сайт: Профиль | | #7 | Добавлено: 03.08.04 10:31 |
| c jro разобрался )) | ||
|
Номер ответа: 8 Автор ответа: admsashaICQ: 234002454 Вопросов: 56 Ответов: 69 |
Web-сайт: Профиль | | #8 | Добавлено: 05.08.04 09:34 |
|
Dim JRO As JRO.JetEngine
Set JRO = New JRO.JetEngine JRO.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;password=hjkfd ata Source=c:\daninet.mdb","Provider=Microsoft.Jet.OLEDB.4.0ata Source=c:\MyCompactedDatabase.mdb;Jet OLEDB:Engine Type=5"
Set JRO = Nothing пишет: Run-time error '-2147217843(80040e4d)': Не удается запустить приложение. Система база данных отсутвует или открыта с монопольным доступом другими пользователем. База естественно не открыта ни кем, а путь я прописал конкретно.. что еше может быть ? |
||
|
Номер ответа: 9 Автор ответа: ComancheВопросов: 87 Ответов: 459 |
Профиль | | #9 | Добавлено: 04.09.04 18:35 |
|
Посмотри ссылку - м.б. поможет:
http://www.relib.com/forums/topic.asp?id=761518 |
||
Страница: 1 |