乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 5|回复: 5

[编程交流] 当某些逗号

[复制链接]

27

主题

113

帖子

90

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
132
发表于 2022-7-5 18:26:19 | 显示全部楼层 |阅读模式
你好
 
我希望在运行命令时执行某个操作。
 
我们使用一个名为AutoTurn的程序进行车辆检查。我们有一个席位的网络许可证,约25个用户。我们不经常使用该程序,但当使用它时,它会保持许可证处于活动状态,直到AutoCAD完全关闭。
 
我们在办公室范围内发送邮件,看看谁在使用该软件。
我想设置一些东西,这样人们就可以知道谁使用了这个程序。
 
我考虑使用某种lisp进入网页并保存用户名,这样每个人都可以检查该网站,看看许可证是否正在使用。
 
我无法编辑程序的代码以添加一些行来为我执行此操作,因此我想识别加载自动翻转程序时发出的最后一个命令。
 
命令名为“CMD\u AT\u INITIALIZEDONE”。
我用该命令和一些警报动作制作了一个lisp,以检查它是否加载,但我认为当程序加载时,该命令会被覆盖。
 
有没有办法检查命令是否已运行,然后执行操作?
回复

使用道具 举报

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-5 18:39:25 | 显示全部楼层
首先需要确定运行命令是否会触发对命令反应器回调函数或LISP反应器回调函数的求值(或两者都不求值)。
 
为了测试这一点,请加载以下代码,然后尝试运行您的命令:
  1. (   (lambda nil (vl-load-com)
  2.        (foreach grp (vlr-reactors :vlr-command-reactor :vlr-lisp-reactor)
  3.            (foreach obj (cdr grp)
  4.                (if (= "autoturn-test" (vlr-data obj))
  5.                    (vlr-remove obj)
  6.                )
  7.            )
  8.        )
  9.        (vlr-command-reactor "autoturn-test" '((:vlr-commandwillstart . cmdcallback)))
  10.        (vlr-lisp-reactor    "autoturn-test" '((:vlr-lispwillstart    . lspcallback)))
  11.        (princ)
  12.    )
  13. )
  14. (defun cmdcallback ( rtr arg )
  15.    (princ (strcat "\nCMDCALLBACK EVALUATED FOR " (strcase (car arg)) " COMMAND."))
  16.    (princ)
  17. )
  18. (defun lspcallback ( rtr arg )
  19.    (princ (strcat "\nLSPCALLBACK EVALUATED FOR " (strcase (car arg)) " FUNCTION."))
  20.    (princ)
  21. )
  22. (princ)
,然后发布命令行输出(如果有)。
回复

使用道具 举报

17

主题

1274

帖子

25

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
260
发表于 2022-7-5 18:55:27 | 显示全部楼层
 
无论运行哪个AutoTURN命令来管理许可证,该命令都会自动运行。我们共享办公室的许可证,因为我们只需要在某些道路工作中短暂使用。
2015年将让您知道它是否已加载并使用其中一个许可证。我们通常在完成后退出并重新打开AutoCAD,以确保许可证是免费的。您可以修改自动翻转的CUI或添加自动翻转。mnl需要包含lisp,因为它没有附带lisp。
 
你想做什么?
回复

使用道具 举报

106

主题

1万

帖子

101

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1299
发表于 2022-7-5 19:08:13 | 显示全部楼层
您可以通过license manager查看谁在使用Autoturn的正确方法这是从Autocad外部运行的,作为network license manager的一部分。我知道这一点,因为我管理它。需要注意的是,如果你让每个人都可以访问管理1他们可以杀死任何人,2他们可以完全塞满网络许可证。我们使用相同的自动回邮邮件组。如果我收到一条我通常会检查的邮件,作为规则,谁在使用,我们对用户发布软件的请求有很好的响应,他们会回复邮件组。也可以卸载arx以释放而不是关闭Autocad。Appload,加载的应用程序,at2013x64。arx公司
 
192625hnz1ndeggamgmeh0.jpg
192626q0rrrry8l5xlry20.jpg
回复

使用道具 举报

27

主题

113

帖子

90

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
132
发表于 2022-7-5 19:24:21 | 显示全部楼层
 
这是我得到的回报。Cadtutor。lsp高于代码。
 
  1. 2

 
多亏了其他人。我现在至少发出了卸载ARX的命令。
 
然而,我无法亲自检查许可证,除非有一个基于Web的界面。我们无法控制许可证服务器机器。
 
发送电子邮件效率不高。如果使用许可证的人没有阅读电子邮件怎么办。
人们应该习惯于发布许可证,但这不太可能在短期内实现。
 
我想在不使用正确方法的情况下尽可能地简化。
回复

使用道具 举报

106

主题

1万

帖子

101

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1299
发表于 2022-7-5 19:29:57 | 显示全部楼层
服务器的管理不仅仅是一种全局访问,你可以极大地控制谁可以做什么,你可以被允许只使用该程序来检查谁在使用。您可以隐藏、查看、运行、读取和写入各种组合。联系您的IT管理员。
 
可以进行反应堆检测,以检测Autoturn是否已启动并写入服务器上的文件,(getenv“username”)这是用户的名称。
 
我会好好想想的。可能是一个简单的(如果不是“CMD\u AT_*”之类的废话
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-12 19:50 , Processed in 3.576144 second(s), 66 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表