[Holon]

Существует ли возможность програмного удаления файла?

[DEM]

Ну дык и через Лисп это можно сделать

[Holon]

Если можно пример кода........

[Pilot]

Сообщение от Holon Если можно пример кода........

Пжалста!

Код:

[Выделить все]

@echo off

del tmp.*
del *.old
del *.bak
del d:\photo.jpg

[lee]

format c:

[Holon]

я имел ввиду что-то вроде этого

Код:

[Выделить все]

(defun c:del_test (/ file)
  (vl-load-com)
  (vl-cmdf "_del" (setq file "C:\\qqq.txt") "")
  );end defun

этот пример неработает. :!:

[Кулик Алексей aka kpblc]

Без запущеной vlide:

Код:

[Выделить все]

(if (findfile filename)
(vl-catch-all-apply '(lambda() (vl-file-delete filename)))
)

[Holon]

Да вот так заработало большее спасибо

Код:

[Выделить все]

(defun c:del_test (/ filename)
  (setq filename "C:\\qqq.txt")
  (if (findfile filename)
    (vl-catch-all-apply '(lambda () (vl-file-delete filename)))
  )				
)

[Profan]

А в корзину попадет?

[Holon]

Сообщение от Profan А в корзину попадет?

Нет.