用lisp调用.vlx/给ao.vlx取一个别名

自贡黄明儒

;;仅供参考，大家多提意见

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;用lisp调用.vlx
;;;给ao.vlx取一个别名
(defun c:kk()
   (vl-load-com)
   (defun SendKeys (keys / ws)
        (setq ws (vlax-create-object "WScript.Shell"))
        (vlax-invoke-method ws 'sendkeys keys)
        (vlax-release-object ws)
        (princ)
   )
(sendkeys "ao ")
)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

461045462

用lisp调用.vlx/给ao.vlx取一个别名收藏了。

下来学习学习。

虽然还没有明白有什么用，是改文件名，还是改命令名呢？如果是后者就好了。有冲突的命令改了就好了。

等会试试。

谢谢了

nuts26173802

谢谢 学习了

tm20038175

没用，vlx有很多作者和命令打印信息，在屏幕上已经打出来了，取别名根本没有作用，最好加上一个清理命令行文字的程序，这样就完美了！…

长风（尚品）

没搞明白如何使用