自寫的各種設(shè)置Windows系統(tǒng)變量的vbs腳本

　　第一段：

　　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"))

　　這個(gè)代碼用于添加當(dāng)前目錄下的Python27目錄到（用戶）系統(tǒng)變量Path上。最初的用途是，把Python27安裝目錄、Editplus（經(jīng)過一些配置）和這個(gè)vbs打包，可以用于快速搭建Python的開發(fā)環(huán)境，其中Editplus是編輯器，Python是解釋器，Editplus經(jīng)過了一些設(shè)置有代碼高亮、自動(dòng)所經(jīng)等功能（代碼自動(dòng)補(bǔ)全由于做得不怎么好，被我放棄了），可以通過快捷鍵方便運(yùn)行Python代碼。這幾樣?xùn)|西加起來用7z壓縮，還不到9M。當(dāng)初學(xué)Python的時(shí)候，這個(gè)工具包是隨身攜帶，隨時(shí)可用的。

　　第二段：

　　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"))

　　這段代碼用于添加用戶系統(tǒng)變量的一個(gè)項(xiàng)LM_LICENSE_FILE，值為當(dāng)前目錄下的license.dat的完整路徑，這其實(shí)是用于Modelsim的破解的。上學(xué)期學(xué)習(xí)Verilog，需要使用Modelsim。經(jīng)過研究，Modelsim是用Tcl寫的界面，軟件本身有綠色軟件的性質(zhì)。我把一些安裝時(shí)產(chǎn)生的文檔，和VHDL等其他語言的示例和庫文件等刪除，配合破解程序和這段vbs腳本，完成了一個(gè)快速可用的Modelsim+Verilog開發(fā)工具包，壓縮包只有19M，解壓之后，幾個(gè)點(diǎn)擊和雙擊就可以使用了，比超大的原始安裝程序的安裝要快和輕便了很多。

　　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"))

　　這段代碼是用于配置Jdk的，雙擊之后，可以立即完成PATH、CLASSPATH等系統(tǒng)變量的設(shè)置，比從系統(tǒng)屬性上要快很多。當(dāng)然也可以和上面的代碼一樣完成“綠色版”JDK工具包。這段代碼在Windows XP上沒有什么問題，似乎在Windows 7下需要修改一下。

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

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

　　這行看似沒有什么用處，其實(shí)不然。vbs通過WScript.Shell對(duì)象設(shè)置系統(tǒng)變量，但是只有修改和刪除的直接方法，修改就是用等號(hào)賦值，刪除使用remove方法，而增加系統(tǒng)變量的直接方法，微軟沒有提供，在一些文檔上也是這么說的。于是想添加系統(tǒng)變量，就得另辟蹊徑，操作注冊(cè)表，vbs可以操作注冊(cè)表，但是單單寫注冊(cè)表項(xiàng)并不能立即生效，只有在重新登錄后才有用，使用讀注冊(cè)表regread，似乎就是為了解決這個(gè)問題。上面的第二段代碼也沒有注意到這個(gè)問題。