| 0
- 30.08.2012 - 22:30
|
Добрый день. Подскажите пжл как прописать (построить) запрос чтобы очищалась указанная папка на локальном диске (удалялись все файлы в ней) ?
    | |
| 1
- 31.08.2012 - 10:21
|
Скорее не (SQL) запрос, а: 1) запуск DOS-приложения вида BAT-файла с командой DEL *.TXT из строки VBA макроса вида Shell("C:\del.bat",1) или напрямую 2) VBA макроcа с командой вида Kill "*.TXT" Возможности отлавливания ошибок (занят файл) и организации синхронности работы приложения в этих случаях разные. | |
| 2
- 31.08.2012 - 17:02
| я вот синтаксис VBA плохо знаю, подскажите что нужно прописать в модуле акцес для того что это сделать (очистить все, все файлы ни какой программой не заняты не заняты 100%) с папкой с расположением например D:\очистить\ ? | |
| 3
- 03.09.2012 - 16:05
|
Sub KillFilesFromDir() Kill "D:\ОЧИСТИТЬ\*.TXT" End sub Этот макрос можно: 1) запускать автоматически при открытии базы данных (событие Database_open) 2) назначить на кнопку 3) сочетанием клавиш 4) запускать по времени 5) итп | |
| 4
- 03.09.2012 - 19:02
| economist спасибо большое | |
| 5
- 03.09.2012 - 20:57
| нескромный вопрос, раз уж разговорились :) как из процедуры сделать функцию? т.к. макросом можно функцию (программу) запускать но не процедуру | |
| 6
- 04.09.2012 - 07:19
|
В контексте Access не знаю, но скорее всего в полях таблиц и SQL-запросах можно использовать пользовательские функции вида: Function MyFunction(argument As Double) As Double argument=argumen*2 End Function | |
| 7
- 04.09.2012 - 15:15
|
спасибо, рпзобралсяю В данном случае sub заменяется нв function и процедура становится функцией, которую можно запускать с кнопки function KillFilesFromDir() Kill "D:\ОЧИСТИТЬ\*.TXT" End function | |
Интернет-форум Краснодарского края и Краснодара |
