[求助]：LISP中如何重命名文件夹？

wkq004 · 发表于 2008-9-11 17:51:27

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

也关注这个问题,等待高手帮助.

舟自横 · 发表于 2008-9-24 09:20:40

这个简单的，只要你能熟悉VLISP应该就不难了

首先在F盘下建立新资料夹命名123可以手工建立也可以用程序建立
(setq SYS (vlax-create-object "Scripting.FileSystemObject"))
(setq FOLDER (vlax-invoke-method SYS 'CREATEFOLDER "f:/123"))
(vlax-release-object FOLDER)
(vlax-release-object SYS)
可以看到在F盘下建立了一个名字123的文件夹
下面取得文件
(setq SYS (vlax-create-object "Scripting.FileSystemObject"))
(setq FOLDER (vlax-invoke-method SYS 'GETFOLDER "f:/123"))
更换名字
(vlax-put FOLDER "name" "456")
(vlax-release-object FOLDER)
(vlax-release-object SYS)
可以看到文件夹123被改成了456

caoyin · 发表于 2008-9-24 15:26:53

不需要使用接口，vl-file-rename

icqlinery · 发表于 2008-9-25 00:31:09

感觉太复杂了点

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

[求助] [求助]：LISP中如何重命名文件夹？

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子