![](https://img-blog.csdnimg.cn/20201014180756916.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
vbs
文章平均质量分 66
dnvodcwan
这个作者很懒,什么都没留下…
展开
-
vbs read COM port
Const ForReading = 1 Const ForWriting = 2 Set fso = CreateObject("Scripting.FileSystemObject") Set com = fso.OpenTextFile("COM6:9600,N,8,1", ForReading) Set objFSO = CreateObject("Scripting.Fi转载 2013-06-26 10:07:59 · 713 阅读 · 0 评论 -
vbscript list local printer
'Displays current status for all printers on a computer. strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")转载 2013-06-26 10:01:40 · 921 阅读 · 0 评论