作者：电脑信息网日期：
返回目录：win7问题
保存名字为：设置环境变量.vbs，复制以e799bee5baa6e58685e5aeb9365下代码即可：
------------------------------------------------------------
Set pSysEnv = CreateObject("WScript.Shell").Environment("System")
'Check whether a character string matches a regular expression
' ^\w+[@]\w+[.]\w+$ E-MailAddress
' ^[0-9-]+$ Numeral
Function IsMatch(Str, Patrn)
Set r = new RegExp
r.Pattern = Patrn
IsMatch = r.test(Str)
End Function
Sub SetEnv(pPath, pValue)
Dim ExistValueOfPath
IF pValue <> "" Then
ExistValueOfPath = pSysEnv(pPath)
IF Right(pValue, 1) = "\" Then pValue = Left(pValue, Len(pValue)-1)
If IsMatch(ExistValueOfPath, "\*?" & Replace(pValue, "\", "\\") & "\\?(\b|;)") Then Exit Sub '已经存在该环境变量设置
If ExistValueOfPath <> "" Then pValue = ";" & pValue
pSysEnv(pPath) = ExistValueOfPath & pValue
Else
pSysEnv.Remove(pPath)
End IF
End Sub
设置环境变量有两种方式：第一种
是在命令提示符运行窗口中设置;第二种是通过zhidao单击“我的电脑→属性→高回级”标签的“环境变量”按钮设置。
需要注意的是，第一种设置环境变量的方式只对当前运行窗口有效，关闭运行窗口后，设置就不起作用了，
而第二种设答置环境变量的方式则是永久有效。
1.右键计算机 ——> 属性 ——> 左边的“高级系统设置” ——> “高级”选项卡 ——> 下面“环境变zd量”
2.系统变量那里，新建一个版变量名为 JAVA_HOME的，变量值为 C:\Program Files\Java\jdk1.6.0_10 （注意！以你自己安装jdk的目录为准），然后确定。
3.找到系统变量里面的Path，编辑，变量值那里最后加一个分号（;），加上jdk的目录 C:\Program Files\Java\jdk1.6.0_10\bin ，点击确定。
4.网上还有说要改classpath的，不过我觉得一个点（.）就够了。当然，你也可以尝权试，加上也没事。
classpath设置为:.;C:\Program Files\Java\jdk1.6.0_10\lib\tools.jar;C:\Program Files\Java\jdk1.6.0_10\lib\dt.jar;C:\Program Files\Java\jdk1.6.0_10\bin
至此，设置完毕。