随笔分类 -  VBS

VB脚本的小功能
如何在VB脚本中Ping IP
摘要：函数代码如下，通讯成功返回True，通讯失败返回False： Function PingIP(IP) Dim objWMIService '定义SWbemServices对象 Dim colItems 'SWbem对象集合 Dim objItem 'Swbem单个对象 Set objWMIServi 阅读全文
posted @ 2019-12-20 09:53 星墨 阅读(1521) 评论(0) 推荐(0) 编辑
VBS实现UTC时间和本地时间互转
摘要：本地时间转UTC时间 dim SWDT, datetime, utcTime Set SWDT = CreateObject("WbemScripting.SWbemDateTime") datetime = "2019-10-11 12:00:00" '本地时间转UTC时间 SWDT.SetVar 阅读全文
posted @ 2019-10-11 11:42 星墨 阅读(1186) 评论(0) 推荐(0) 编辑

点击右上角即可分享
微信分享提示