那些年，我写过的设置Windows系统变量的vbs脚本

下面是我之前整理过的三段vbs代码，他们的主要都是用于快速设置Windows系统变量的。这些代码，在使用的过程中，都做了很多修改，已经记不清最初从哪里学来的了。

第一段：

Set WshShell=CreateObject("WScript.Shell")Set WshEnv=WshShell.Environment("User")'WScript.Echo(WshShell.currentdirectory&"\Python27")WshEnv.Item("Path") = WshEnv.Item("Path")&";"&WshShell.currentdirectory&"\Python27;"WScript.Echo(WshEnv.Item("Path"))

这个代码用于添加当前目录下的Python27目录到（用户）系统变量Path上。最初的用途是，把Python27安装目录、Editplus（经过一些配置）和这个vbs打包，可以用于快速搭建Python的开发环境，其中Editplus是编辑器，Python是解释器，Editplus经过了一些设置有代码高亮、自动所经等功能（代码自动补全由于做得不怎么好，被我放弃了），可以通过快捷键方便运行Python代码。这几样东西加起来用7z压缩，还不到9M。当初学Python的时候，这个工具包是随身携带，随时可用的。

第二段：

curdir = createobject("Scripting.FileSystemObject").GetFolder(".").Pathregpath="HKEY_CURRENT_USER\Environment\"set  ws=wscript.createobject("wscript.shell")temp=ws.regwrite(regpath & "LM_LICENSE_FILE",curdir&"\license.dat")

这段代码用于添加用户系统变量的一个项LM_LICENSE_FILE，值为当前目录下的license.dat的完整路径，这其实是用于Modelsim的破解的。上学期学习Verilog，需要使用Modelsim。经过研究，Modelsim是用Tcl写的界面，软件本身有绿色软件的性质。我把一些安装时产生的文档，和VHDL等其他语言的示例和库文件等删除，配合破解程序和这段vbs脚本，完成了一个快速可用的Modelsim+Verilog开发工具包，压缩包只有19M，解压之后，几个点击和双击就可以使用了，比超大的原始安装程序的安装要快和轻便了很多。

第三段：

curdir = createobject("Scripting.FileSystemObject").GetFolder(".").Path   regpath="HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Session Manager\Environment\"  set  ws=wscript.createobject("wscript.shell")   temp=ws.regwrite(regpath & "JAVA_HOME",curdir)   temp=ws.regwrite(regpath & "CLASSPATH",".;%JAVA_HOME%\lib;%JAVA_HOME%\lib\tools.jar")   oldpath=ws.regread(regpath & "PATH")   newpath=oldpath & ";%JAVA_HOME%\bin;%JAVA_HOME%\jre\bin"    ws.Environment("system").Item("PATH")=newpath   temp=ws.regread(regpath & "PATH")   wscript.echo "ok"

这段代码是用于配置Jdk的，双击之后，可以立即完成PATH、CLASSPATH等系统变量的设置，比从系统属性上要快很多。当然也可以和上面的代码一样完成“绿色版”JDK工具包。这段代码在Windows XP上没有什么问题，似乎在Windows 7下需要修改一下。

第三段代码最值得品味的一行是

temp=ws.regread(regpath & "PATH")

这行看似没有什么用处，其实不然。vbs通过WScript.Shell对象设置系统变量，但是只有修改和删除的直接方法，修改就是用等号赋值，删除使用remove方法，而增加系统变量的直接方法，微软没有提供，在一些文档上也是这么说的。于是想添加系统变量，就得另辟蹊径，操作注册表，vbs可以操作注册表，但是单单写注册表项并不能立即生效，只有在重新登录后才有用，使用读注册表regread，似乎就是为了解决这个问题。上面的第二段代码也没有注意到这个问题。

那些年，我写过的设置Windows系统变量的vbs脚本相关推荐

java一键换壁纸_Java 版下载必应每日壁纸并自动设置 Windows 系统桌面（改编自 C# 版）...
哈哈,好久没有写博客了,已经荒废了,前几天在某 IT 网站看到一个用 C# 写的设置必应每日壁纸为 Windows 系统桌面,看了看源码是通过调用 User32.dll 进行设置的,刚刚最近做的项目更 ...
电脑计算机里怎么找恢复出厂设置,Windows系统电脑如何恢复出厂设置?
原标题:Windows系统电脑如何恢复出厂设置? 最近有位朋友发现电脑使用时间久了,出现了运行卡顿和系统垃圾过多的问题,想知道是否可以通过恢复出厂设置来解决.其实,电脑Windows系统恢复出厂设置是 ...
bat小工具_小程序反编译工具在windows系统下的调用脚本
点击上方蓝字可以订阅哦之前的文章中介绍了小程序的反编译工具,工具在 Linux 系统下使用时执行bingo.sh [xxx.wxapkg]就可以. 有小伙伴不知道在windows系统下如何使用,这里 ...
C# 爬取在线时间设置 Windows系统时间
效果图: 最近发现自己的小主机每次关机后,时间都不准时,这个问题一般都是主板的电池没电导致的,某宝买一个即可,但毕竟是写程序的,为什么不能写一个程序校准呢,每次开机运行一下时间来源: 北京时间官网 ...
获取与设置windows系统下音频设备音量
一.获取设备音量不同系统获取音量的方法是有差别的,比如vista和win7获取音量的方式就是不同的,因此,我们应该首先获取系统的信息,然后根据系统信息,用其对应的方法获取音量. 1.OSVERSIO ...
通过脚本设置Windows系统ip地址
代码中有两种IP的设置模式:静态IP地址和DHCP模式. 将下面的代码保存到一个文本中,并将文件后缀改为.bat,双击就可以实现IP地址的自动设置 ps:要将代码中对应的ip.网管.DNS改为自己网络 ...
用python设置windows系统桌面背景(壁纸)的代码
下面的代码已经实现了把一张图片设置为壁纸的功能,我也加了比较详细的注释, 稍微改造一下就可以实现播放文件夹中所有图片, 下载设置必应图片等一些功能了 PIL官方下载地址(注:PIL貌似对python ...
41.设置windows系统字体CreateFont、CreateFontIndirect、GetStockObject
设置字体,建议在WM_CREATE消息处理中进行设置设置系统字体有多种方法方法一:CreateFont函数设置每一个参数 HFONT hFont = CreateFont(80,0,0,0,0,0 ...
windows系统开关机测试脚本与方法
1.系统设置如无特别说明run in test 都应该设置 1)关闭UAC 2)关闭系统失败自动重新启动(我的电脑属性-启动与故障恢复) 3)关闭防火墙 4)关闭系统更新 5)关闭电源选项(不关屏不 ...

那些年，我写过的设置Windows系统变量的vbs脚本

那些年，我写过的设置Windows系统变量的vbs脚本相关推荐

最新文章

热门文章