僵尸先生后传:cad vba中的权限实现

来源:百度文库 编辑:中财网 时间:2024/04/29 07:24:21

cad vba中的权限实现

首先建立一个工程,工程中的代码在http://download.csdn.net/source/2977463,在cad 安装目录中新建acad.lsp 文件 在文件中写上vba自动运行代码:

(defun S::STARTUP()
(command "_-vbarun" "model1.qidong")
)

保存,即可,另外,工程中需要的用户名和密码数据库,放在d盘中即可,本次只使用了一条数据,当存在多条数据时应该在数据库循环查找即可,

当然也可以添加菜单,然用户随时可以进行权限的更改,只需要在cad中打开工具—》自定义->界面-》打开菜单-》右击,新建菜单,然后再命令列表中新建命令,在宏的位置处添加:_-vbarun c:/acad.dvb!qidong,注意,这里的路径千万不能带空格,如果带空格,就会找不到需要执行的宏,目前还没有找到解决方法,有人知道,麻烦告诉下我

整个程序就是这样。很简单,但比较实用!