如何判断一个目录下的文件，你有没有权限修改

citykunan · 发表于 2004-7-20 15:33:00

如何用lisp判断一个目录下的文件，你有没有权限修改？如果不先判断，将文件重命名，当你没有权限时，cad就会死掉了。谢谢。

龙龙仔 · 发表于 2004-7-20 17:04:00

我没有权限时，cad也不会死掉了。(R2004)

alin · 发表于 2004-7-20 20:57:00

如果是rerad only的问题，可以试试doslib的dos_attrib

citykunan · 发表于 2004-7-21 08:31:00

谢谢，cad是是没死，只是程序不能进行完毕。我试试dos_attrib吧。

mmmmmm · 发表于 2004-7-21 11:25:00

本帖最后由作者于 2004-7-21 12:02:13 编辑

(Defun Write-p(pFILE / FIL)
(if (setq FIL (open pFILE "w"))
(progn
(close FIL)
(setq FIL T)
))
FIL
)

citykunan · 发表于 2004-7-21 15:59:00

谢谢6m。

账号		自动登录	找回密码
密码			注册