• Ref
  • Восстановленный участник
  • На форуме с 26 июля 2005г.
  • Сообщений: 2
  • Спасибо: 0

Тема: Как удалить файл на диске?

Можно ли, используя VBA удалить файл на диске?

  • kpblc
  • kpblc
  • Активный участник
  • Откуда: С.-Петербург
  • На форуме с 29 ноября 2004г.
  • Сообщений: 8,348
  • Спасибо: 24

Re: Как удалить файл на диске?

Справка:

Delete Method
Description
Deletes a specified file or folder.
Syntax
object.Delete force
The Delete method syntax has these parts:
object Required. Always the name of a File or Folder object.
force Optional. Boolean value that is True if files or folders with the read-only attribute set are to be deleted; False (default) if they are not.
Remarks
An error occurs if the specified file or folder does not exist.
The results of the Delete method on a File or Folder are identical to operations performed using FileSystemObject.DeleteFile or FileSystemObject.DeleteFolder.
The Delete method does not distinguish between folders that have contents and those that do not. The specified folder is deleted regardless of whether or not it has contents.

  • JS
  • Восстановленный участник
  • На форуме с 12 мая 2005г.
  • Сообщений: 51
  • Спасибо: 0

Re: Как удалить файл на диске?

Посмотри библиотеку VBA.FileSystem и её методы. Есть там Kill.
А откуда взялось то, что привёл  kpblc (2005-09-15 08:16:29) я, честно говоря, не нашёл.

  • kpblc
  • kpblc
  • Активный участник
  • Откуда: С.-Петербург
  • На форуме с 29 ноября 2004г.
  • Сообщений: 8,348
  • Спасибо: 24

Re: Как удалить файл на диске?

Ну дык ить, справка по VBA в AutoCAD, раздел Delete Method. Можно за компанию глянуть на DeleteFile Method и DeleteFolder Method.

  • Откуда: Москва
  • На форуме с 2 июля 2004г.
  • Сообщений: 2,538
  • Спасибо: 10

Re: Как удалить файл на диске?

> kpblc
А для какой версии акада хелп? В акаде 2004 таких методов нет, или я их тоже не нашел...
В лиспе пожалуйста:
vl-file-delete

  • kpblc
  • kpblc
  • Активный участник
  • Откуда: С.-Петербург
  • На форуме с 29 ноября 2004г.
  • Сообщений: 8,348
  • Спасибо: 24

Re: Как удалить файл на диске?

2005-й.
Может, конечно, меня и забьют ногами в туалете, но как я добрался: с ком.строки вводил vbaide, и там F1, поиск, Delete - все видно.

  • Откуда: Москва
  • На форуме с 2 июля 2004г.
  • Сообщений: 2,538
  • Спасибо: 10

Re: Как удалить файл на диске?

> kpblc
Спасибо!
Сразу нашел много интересного для себя.
А я, грешным делом, думал, что весь VBA хелп у меня в справке по лиспу...

  • kpblc
  • kpblc
  • Активный участник
  • Откуда: С.-Петербург
  • На форуме с 29 ноября 2004г.
  • Сообщений: 8,348
  • Спасибо: 24

Re: Как удалить файл на диске?

> Евгений Елпанов
Ну ладно издеваться-то...
:lol:

  • Откуда: Москва
  • На форуме с 2 июля 2004г.
  • Сообщений: 2,538
  • Спасибо: 10

Re: Как удалить файл на диске?

> kpblc
Чесное слово!
Никаких издевок!
Совсем недавно пытался найти подходы к FileSystemObject, но в справке ничего не нашел - разбирался по лиспам найденным через google.com...
После загрузки VBA увидел все на ладони.

  • Откуда: Москва
  • На форуме с 2 июля 2004г.
  • Сообщений: 2,538
  • Спасибо: 10

Re: Как удалить файл на диске?

> kpblc
Моя аська здесь:
https://www.caduser.ru/forum/topic7313.html
Думаю, в том же ключе, на форуме продолжать не стоит.

  • VBAmaker
  • Восстановленный участник
  • На форуме с 16 сентября 2005г.
  • Сообщений: 2
  • Спасибо: 0

Re: Как удалить файл на диске?

С подачи JS, вот что у меня получилось:
Option Explicit
Public Sub GoodbyeMyLovedFiles()
'Удаляем все *.dwg файлы из папки "MyDir":
Kill ("c:\MyDir\*.dwg")
End Sub
Public Sub KillFiles()
'Удаляем все  файлы:
Kill ("c:\MyDir\*.*")
End Sub

  • Sigma
  • Восстановленный участник
  • На форуме с 1 июня 2004г.
  • Сообщений: 62
  • Спасибо: 0

Re: Как удалить файл на диске?

Надо только еще проверить, что каждый удаляемый файл НЕ имеет атрибут ReadOnly, а то ошибка генериться будет