用lisp如何获取电脑的物理地址？

sfzyr · 发表于 2021-7-5 00:46:32

highflybird 发表于 2011-1-5 18:21

http://club.excelhome.net/forum. ... amp;_dsign=c7707872，是不是这些个原因，但是我不知道如何修改好你的代码，我需要64位系统64位cad能运行的代码，谢谢

highflybird · 发表于 2021-7-5 10:25:40

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")
方法二：
采用如下代码：

(setq wmi (vlax-create-object "WbemScripting.SWbemLocator"))
(setq svr (vlax-invoke wmi 'ConnectServer))
(setq net (vlax-invoke svr 'InstancesOf "Win32_NetworkAdapterConfiguration"))
(vlax-for n net
(if(/= (vlax-get n 'IPEnabled) 0)
(princ (vlax-get n 'MacAddress))
)
)

sfzyr · 发表于 2021-7-23 23:39:29

highflybird 发表于 2021-7-5 10:25
方法一：在64位系统中采用
(vlax-create-object "Aec32BitAppServer.AecScriptControl.1"))
替换

感谢回复，如果没连网络，你这个就无法获得网卡物理地址mac地址

highflybird · 发表于 2021-7-26 08:08:42

sfzyr 发表于 2021-7-23 23:39
感谢回复，如果没连网络，你这个就无法获得网卡物理地址mac地址

不需连接到网络，依旧可以获得。

brainstorm · 发表于 2021-7-26 21:33:25

highflybird 发表于 2021-7-26 08:08
不需连接到网络，依旧可以获得。

很久没有看到老大了

sfzyr · 发表于 2021-8-6 03:13:54

本帖最后由 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
_$

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

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