Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / как в такой ситуации сжимать базу / 16 сообщений из 16, страница 1 из 1
08.10.2003, 11:34
    #32287286
Бобер
Бобер
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в такой ситуации сжимать базу
MS Access 97.
База не такая маханькая (15метров). Окно самого Access скрыто с помощью АПИшки ->

Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long
Public Const SW_HIDE = 0
Public Const SW_NORMAL = 1


Как в этом случае сжимать файл базы данных. При этом прога же перепускаетсся. Ну короче застрял не по детски.
Ответьте кто знает ошень нуно !!!!!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2003, 11:44
    #32287324
Бобер
Бобер
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в такой ситуации сжимать базу
горю
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2003, 12:04
    #32287357
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в такой ситуации сжимать базу
1. Если открыть Аксесс с шифтом, то ничего не запускается.

2. Сжимать можно и в пустом Аксессе, без открытого mdb.

3. Можно сжимать через опции командной строки.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2003, 12:06
    #32287359
RVI
RVI
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в такой ситуации сжимать базу
Не помню, где я это скачал:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
 Function Compact()
 Const CompactId As Long =  2071 
   With CommandBars.Add(, msoBarFloating, , True)
     .Controls.Add msoControlButton, CompactId, , , True
     DoEvents 'íåîáÿçàòåëüíî
     .Visible = True
     .Controls( 1 ).SetFocus
     DoEvents
     SendKeys  "~" 
   End With
 End Function

Вроде бы сжимает без выхода из программы
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2003, 12:09
    #32287366
Владимир Саныч
Владимир СанычПривилегированный пользователь
Модератор форума
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в такой ситуации сжимать базу
А вообще, тут много интересного на эту тему:\r
\r
/topic/36726
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2003, 12:28
    #32287406
Bor-L
Bor-L
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в такой ситуации сжимать базу
Может подойдет
http://msa.polarcom.ru/downloads.htm
Пример Compact.ZIP
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2003, 14:32
    #32287668
Бобер
Бобер
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в такой ситуации сжимать базу
Всем Спасибо !!! Все хокей!!!
Все сделал кнопочку для юзверя и на нее повесил
With CommandBars.Add(, 1, , True)
.Controls.Add 1, 2071, , , True
.Visible = True
.Controls(1).SetFocus

SendKeys "~"
End With
Все нормалек сжимается (но только под 97)


работает под 97 акксеесс ,а под 2k/xp ругается. А нуна есё и под 2k/xp .
ищу способы.

Кстати без аксессного окошка формы как мне показалось выглядят намного симпатишней!!! НУ это так к слову.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2003, 14:43
    #32287698
Бобер
Бобер
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в такой ситуации сжимать базу
бля, сука под 2000 не хотит работать!!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2003, 15:04
    #32287741
АлексейЕ
АлексейЕ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в такой ситуации сжимать базу
А по форуму посмотреть слабо?\r
Ведь еще даже на вторую страницу не ушло, так и просится, что бы кликнули мышью.\r
Сжатие базы\r
\r
P.S. Кстати, а на все эти б... и с... отвечать не очень то и хочется.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2003, 15:14
    #32287763
RVI
RVI
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в такой ситуации сжимать базу
Ссылки проверь.\r
Здесь материшься, а там тебе не нравится, что кто-то матерится???
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2003, 15:19
    #32287771
Бобер
Бобер
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в такой ситуации сжимать базу
НУ простите если кого обидел.
А указанный топик читал (именно с него и содрал нужное, в 97 это работало)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2003, 15:22
    #32287784
Бобер
Бобер
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в такой ситуации сжимать базу
2 RVI
А вот это ты бы не сравнивал.. Зря ты..однако...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2003, 15:26
    #32287794
RVI
RVI
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в такой ситуации сжимать базу
> Бобер

Ну извини...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2003, 15:34
    #32287814
TatianaT
TatianaT
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в такой ситуации сжимать базу
может и не стоит сравнивать , может даже не стоит говорить но

но 1) не приятно, причём как вижу не мне одной
2) как насчёт соринки....? а ? Аааа
вот и я про тоже
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2003, 15:37
    #32287817
Лох Позорный
Лох Позорный
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в такой ситуации сжимать базу
Ухожу, Марьиванна, ухожу, ухожу...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.10.2003, 15:40
    #32287821
АлексейЕ
АлексейЕ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
как в такой ситуации сжимать базу
Бобер.

Обрати внимание на сообщение Анатолия (Киев), в ссылке "Сжатие базы".
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / как в такой ситуации сжимать базу / 16 сообщений из 16, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 388ms
Закрыть
start [/forum/topic.php?fid=45&tablet=1&tid=1678971]:
 0ms
get settings:
 9ms
get forum list:
 19ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 71ms
get topic data:
 10ms
get forum data:
 3ms
get page messages:
 54ms
get tp. blocked users:
 1ms
others: 213ms
total:  388ms
x
x
Закрыть


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