Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: Программирование на Basic / VBA


Информационный Канал Subscribe.Ru

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Basic/VBA

Выпуск № 131
от 14.10.2005, 19:42

Администратор:Калашников О.А.
В рассылке:Подписчиков: 122, Экспертов: 18
В номере:Вопросов: 2, Ответов: 5


Вопрос № 27439: Как сделать имея на форме кнопку, при нажатии на неё удалялась определённая папка или файл?...
Вопрос № 27448: Скажите, пожалуйста, как можно завершить определённый процесс?...

Вопрос № 27.439
Как сделать имея на форме кнопку, при нажатии на неё удалялась определённая папка или файл?
Отправлен: 08.10.2005, 23:08
Вопрос задал: Dushin Igor (статус: 1-ый класс)
Всего ответов: 4
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Чурсанов Евгений Ильич
Здравствуйте, Dushin Igor!
Предлагаю через WIn API. Это не сложно и никаких компонентов подключать не надо.

Приложение:

---------
Создайте систему, которой сможет пользоваться дурак, и только дурак захочет ею пользоваться.

Ответ отправил: Чурсанов Евгений Ильич (статус: 3-ий класс)
Отправлен: 09.10.2005, 01:34
Оценка за ответ: 5
Комментарий оценки:
Супер! То что надо!

Отвечает: Licvidator
Здравствуйте, Dushin Igor!
Зачем АПИ? Есть же встроенные функции ВБ для удаления файлов и каталогов! Никаких подключаемых компонентов (это я к ответу Евгения)
RmDir "C: est" - удаляет каталог
Kill "C: est.txt" - удаляет файл
Ответ отправил: Licvidator (статус: Профессор)
Отправлен: 10.10.2005, 18:40
Оценка за ответ: 5

Отвечает: _Виталий
Здравствуйте, Dushin Igor!
Предыдущие предложения экспертов работают только в том случае если папка пустая, а если в ней есть файл или вложенная папка, то удаление директории не происходит. Предлагаю 2 варианта удаления папки вместе с содержимым.
1 вариант: При помощи FSO. Подключите в ссылках Microsoft Scripting Runtime (scrrun.dll). Код для кнопки:
-----------------------------------------
Private Sub Command1_Click()
Dim FSO As Scripting.FileSystemObject
Set FSO = New Scripting.FileSystemObject
FSO.DeleteFolder "c:111"
Set FSO = Nothing
End Sub
-----------------------------------------

2 Вариант без подключения чего-либо. На форму закинте кнопку. См. приложение.

Приложение:

Ответ отправил: _Виталий (статус: 8-ой класс)
Отправлен: 10.10.2005, 23:28

Отвечает: Miklucho
Здравствуйте, Dushin Igor!
Используй встроенные функции:
kill(pathfile) для удаления файла,
rmdir(pathdir) для удаления папки.
Имей ввиду что, если удаляемая папка не пуста (т.е. в ней есть вложенные папки или файлы), то сначало ее нужно очистить, иначе будет ошибка.

Вообще посмотри в Object Browser'е класс FileSystem - много интересных функций имеется.
Ответ отправил: Miklucho (статус: Студент)
Отправлен: 12.10.2005, 19:22


Вопрос № 27.448
Скажите, пожалуйста, как можно завершить определённый процесс?
Отправлен: 09.10.2005, 09:31
Вопрос задал: Dushin Igor (статус: 1-ый класс)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Licvidator
Здравствуйте, Dushin Igor!
1. Если процесс имеет топ-окно, то послать ему сообщение с флагом WM_QUIT или WM_CLOSE. Это так называемый "вежливый" способ прикрыть процесс
2. Более грубый состоит в использовании ф-ии TerminateProcess.
Примеры можно найти тут: http://sql.ru/forum/actualthread.aspx?tid=124521
Ответ отправил: Licvidator (статус: Профессор)
Отправлен: 10.10.2005, 19:02


Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2005, RusFAQ.ru, Россия, Москва. Все права защищены.
Идея, дизайн, программирование, авторское право: Калашников О.А.

Rambler's Top100 Яндекс


Subscribe.Ru
Поддержка подписчиков
Другие рассылки этой тематики
Другие рассылки этого автора
Подписан адрес:
Код этой рассылки: comp.soft.prog.basicvba
Архив рассылки
Отписаться
Вспомнить пароль

В избранное