随笔分类 - vbs
vbs 知识
摘要:Set shell = CreateObject("Shell.Application") Set selFolder = shell.BrowseForFolder(0, "请选择JAVA_HOME目录", 0, ssfDRIVES) Set selFolderItem = selFolder.Self selPath = selFolderItem.Path dim wsh Set...
阅读全文
摘要:1.利用vbs设置环境变量有时候感觉设置环境变量还真是比较麻烦,我是希望可以做成点击一下就ok的,这样重装系统就不用那么麻烦了,但是考虑到通用性,为了不把路径写死所以做了个选择目录的对话框,源码如下:用记事本保存为JavaHomeTool.vbs即可。下面的脚本仅仅是设置JAVA_HOME,同样原理有了JAVA_HOME连PATH,CLASSPATH也就可以设置了,不过这里我就不写了,留给读者完成吧。MsgBox"欢迎使用JAVA_HOME设置工具createbysunyujia"'转载请注明作者和出处http://blog.csdn.net/sunyujia/ S
阅读全文
摘要:1 'gethardwareinformation 2 On Error Resume Next 3 Dim WMI,WS,Fso 4 Set WMI = GetObject("Winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2") 5 Set cOSs = WMI.ExecQuery("Select * from Win32_OperatingSystem") 6 For Each oOS in cOSs 7 OSx = oOS.Caption & " "
阅读全文

浙公网安备 33010602011771号