明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
12
返回列表 发新帖
楼主: 欲海猛男

[基础] 用lisp如何获取电脑的物理地址?

[复制链接]
发表于 2021-7-5 00:46 | 显示全部楼层

http://club.excelhome.net/forum. ... amp;_dsign=c7707872,是不是这些个原因,但是我不知道如何修改好你的代码,我需要64位系统64位cad能运行的代码,谢谢
发表于 2021-7-5 10:25 | 显示全部楼层
sfzyr 发表于 2021-7-5 00:46
http://club.excelhome.net/forum.php?mod=viewthread&tid=1403424&page=1&_dsign=c7707872,是不是这些 ...

方法一: 在64位系统中采用
(vlax-create-object "Aec32BitAppServer.AecScriptControl.1"))
替换
(vlax-create-object "ScriptControl")
方法二:
采用如下代码:
  1.   (setq wmi (vlax-create-object "WbemScripting.SWbemLocator"))
  2.   (setq svr (vlax-invoke wmi 'ConnectServer))
  3.   (setq net (vlax-invoke svr 'InstancesOf "Win32_NetworkAdapterConfiguration"))
  4.   (vlax-for n net
  5.     (if(/= (vlax-get n 'IPEnabled) 0)
  6.       (princ (vlax-get n 'MacAddress))
  7.     )
  8.   )
发表于 2021-7-23 23:39 | 显示全部楼层
highflybird 发表于 2021-7-5 10:25
方法一: 在64位系统中采用
(vlax-create-object "Aec32BitAppServer.AecScriptControl.1"))
替换

感谢回复,如果没连网络,你这个就无法获得网卡物理地址mac地址
发表于 2021-7-26 08:08 | 显示全部楼层
sfzyr 发表于 2021-7-23 23:39
感谢回复,如果没连网络,你这个就无法获得网卡物理地址mac地址

不需连接到网络,依旧可以获得。
发表于 2021-7-26 21:33 来自手机 | 显示全部楼层
highflybird 发表于 2021-7-26 08:08
不需连接到网络,依旧可以获得。

很久没有看到老大了
发表于 2021-8-6 03:13 | 显示全部楼层
本帖最后由 sfzyr 于 2021-8-6 03:15 编辑
highflybird 发表于 2021-7-26 08:08
不需连接到网络,依旧可以获得。

我这边是win10系统,双网卡,无线连上时候,显示无线的MAC,有线的连上,就显示有线的,wifi和网线的都连接上网,都显示。若都不连上网络,就显示nil。还请老大看看,问题出在哪了。是不是需要打开某个服务(服务未启动?)
#<VLA-OBJECT ISWbemLocator 000002623ee42a80>
#<VLA-OBJECT ISWbemServicesEx 000002623ee423a0>
#<VLA-OBJECT ISWbemObjectSet 00000262bb8b6e90>
nil
_$
_$

#<VLA-OBJECT ISWbemLocator 000002625b53c3c0>
#<VLA-OBJECT ISWbemServicesEx 000002625b53a370>
#<VLA-OBJECT ISWbemObjectSet 0000026214ec4f70> B8:9A:2A:2D:96:97
nil
_$

#<VLA-OBJECT ISWbemLocator 0000026224079240>
#<VLA-OBJECT ISWbemServicesEx 00000262240785e0>
#<VLA-OBJECT ISWbemObjectSet 000002629cfda6b0> F8:75:A4:FD:3B:09B8:9A:2A:2D:96:97
nil
_$
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-5-5 06:11 , Processed in 0.216795 second(s), 18 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表