摘要： Set shell = CreateObject("Shell.Application") Set selFolder = shell.BrowseForFolder(0, "请选择JAVA_HOME目录", 0, ssfDRIVES) Set selFolderItem = selFolder.Self selPath = selFolderItem.Path dim wsh Set wsh = WScript.CreateObject("WScript.Shell") wsh.Environment("system&qu 阅读全文