各位版主,帮过我的好朋友,工作需要要个CAD屏保加密码lsp,在线等中.....

AMTONNY · 发表于 2009-1-18 00:05:00

这个想法很好哦，我有个思路，当启动此文件后，就启动了关闭全部图层命令，再关闭图层工具栏，同时临时启动“LAYER”这个命令做别的命令使用，比如用此命令来画线，那别人就无法启用此命令来打开图层工具栏和图层了，解密就是输入一个命令来恢复这些操作就好了

不死猫 · 发表于 2009-1-18 09:56:00

简单点：需要密码123

(defun c:test ()

(vlax-invoke-method (vlax-get-acad-object) 'Eval "Do While InputBox(\"\") <> \"123\": Loop")

)

AMTONNY · 发表于 2009-3-15 10:45:00

帮人顶上去........

nonsmall · 发表于 2009-3-16 08:49:00

caoyin发表于2008-6-10 21:20:00楼主为什么不直接使用 windos 的屏保功能我觉得实现有困难-->怎样使 AutoCAD 在无人操作时延迟 N 秒而激活“屏保”程序...

写一个外部进程"监视"AUTOCAD空闲状态即可

例:使用Lisp写个VBS然后后台运行在AUTOCAD空闲一段时间后即触发"锁屏"

VBS段代码如下:

此程序还需要做个简单的进程处理(防止多个监视进程同时启动)

还要写个关闭该进程的Lisp代码(这个我就偷懒不写了)

liminnet · 发表于 2009-3-16 09:48:00

提示: 作者被禁止或删除内容自动屏蔽

liminnet · 发表于 2009-3-16 09:49:00

提示: 作者被禁止或删除内容自动屏蔽

liminnet · 发表于 2009-3-16 09:55:00

提示: 作者被禁止或删除内容自动屏蔽

samshs · 发表于 2009-3-16 13:49:00

學習一下

yangchao2005090 · 发表于 2017-12-12 09:53:50

yxp 发表于 2008-6-10 22:42
本帖最后由作者于 2008-6-10 22:54:40 编辑 ;;默认密码为“yxp”，输入限制3次，（取自yxpxa@163.com， ...

好像改了不对，一直是原始密码

liwen888888 · 发表于 2018-12-8 22:01:33

yxp 发表于 2008-6-10 22:42
本帖最后由作者于 2008-6-10 22:54:40 编辑 ;;默认密码为“yxp”，输入限制3次，（取自yxpxa@163.com， ...

你好，请问一下密码保存在哪里了？改了密码后新密码登陆不了，必须原密码，换个CAD就可以，不知道怎么清除。谢谢

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

liminnet liminnet 当前离线积分 9754 明经币个注册时间 2007-8-22 在线时间小时威望金钱个贡献激情	楼主\| 发表于 2009-3-16 09:48:00 \| 显示全部楼层提示: 作者被禁止或删除内容自动屏蔽

	回复支持反对使用道具举报显身卡

liminnet liminnet 当前离线积分 9754 明经币个注册时间 2007-8-22 在线时间小时威望金钱个贡献激情	楼主\| 发表于 2009-3-16 09:49:00 \| 显示全部楼层提示: 作者被禁止或删除内容自动屏蔽

	回复支持反对使用道具举报显身卡

liminnet liminnet 当前离线积分 9754 明经币个注册时间 2007-8-22 在线时间小时威望金钱个贡献激情	楼主\| 发表于 2009-3-16 09:55:00 \| 显示全部楼层提示: 作者被禁止或删除内容自动屏蔽

	回复支持反对使用道具举报显身卡