中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-04 13:11
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 关于VBS脚本,请高手指教. 查看 811 回复 0
楼 主 关于VBS脚本,请高手指教. 发表于 2007-05-06 10:22 ·  中国 广西 梧州 电信
初级用户
积分 94
发帖 31
注册 2007-01-27 14:04
19年会员
UID 77865
性别 男
状态 离线
最近我想学编写VBS脚本,但在网上找不到教程..

请高手指导一下..可以给写基础VBS脚本教程我吗??

以下有个例子但我不知道那里出错了...请高手指教

取得本机IP
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set IPConfigSet = objWMIService.ExecQuery("Select IPAddress from
Win32_NetworkAdapterConfiguration Where IPEnabled=TRUE")
For Each IPConfig in IPConfigSet
If Not IsNull(IPConfig.IPAddress) Then
For Each strAddress in IPConfig.IPAddress
WScript.Echo strAddress
Next
End If
Next

运行后出现..(如图)
附件
{69EC5F8E-EA09-49F9-BEFA-803A5AD38404}.JPG
论坛跳转: