如何用VBA取得局域网上的计算机名[有新探讨]

120HYH · 发表于 2011-7-15 15:33

37楼就是我自己的IP

120HYH · 发表于 2011-7-15 15:37

这是截图，请看

120HYH · 发表于 2011-7-15 15:47

以下是截图。

灰袍法师 · 发表于 2011-7-15 18:17

哦，那就是英文版的 ping 输出的文字跟中文版的不一样

所以我的VBA就没法找出其输出那一段是 IP 地址

我28楼的附件已经更新，增加一个可以处理英文ping的附件，你测试一下行不行吧，不行就得你自己改VBA里面的截取代码了

格式问题总是很麻烦的。。。。。。

[ 本帖最后由灰袍法师于 2011-7-15 19:42 编辑 ]

120HYH · 发表于 2011-7-15 20:10

用了你的英文版。还是不行，见图。

ljw990485 · 发表于 2011-7-15 20:50

以上讨论的方法有缺陷
1) 关闭本机某些服务,程序只能得到本机的IP
2) 目标机器有防火墙,拦击某些数据包,则这个程序无法发现目标机器
3)即使能用,但处理一个C类网段非常慢,无法忍受,象这样任务不重,但又要重复很多次的程序,最好还是用多线程

本人认为,VBA的专长是处理数据的,而不是用来系统或网络管理,要是真的想这么做,还是C/C++吧

灰袍法师 · 发表于 2011-7-15 20:55

原帖由 120HYH 于 2011-7-15 20:10 发表
用了你的英文版。还是不行，见图。

出现这个错误是 fileobj.delete 的时候，无法删除文件

唉，想省些事还是不行吖

28楼增加新附件，加入VBA监测BAT运行完毕的代码

这样应该可以保证每次VBA要读取结果的时候，所有BAT都运行完毕。

[ 本帖最后由灰袍法师于 2011-7-15 22:30 编辑 ]

120HYH · 发表于 2011-7-15 22:53

大师，用了你第三个，还是不行。跟第一个一样，什么都没取得。

灰袍法师 · 发表于 2011-7-15 22:56

原帖由 120HYH 于 2011-7-15 22:53 发表
大师，用了你第三个，还是不行。跟第一个一样，什么都没取得。

那你只好注释掉 fileobj.deletefile的行

然后自己逐步调试VBA代码，看看是截取的什么地方出错了

我没有你的.TXT结果，没法测试的。

120HYH · 发表于 2011-7-15 22:57

也没产生BAT，TXT啊

		自动登录	找回密码
密码			免费注册

[已解决] 如何用VBA取得局域网上的计算机名[有新探讨]

回复 40楼灰袍法师的帖子

这是截图，请看

[已解决] 如何用VBA取得局域网上的计算机名[有新探讨]

回复 40楼 灰袍法师 的帖子

这是截图，请看

回复 40楼灰袍法师的帖子