php 生成vbs文件路径,vbs下一些取特殊路径的方法总结

vbs下一些取特殊路径的方法总结

更新时间：2008年07月16日 22:57:49   作者：

经常有一些想学习vbs的朋友问我一些问题，昨天又有一个朋友问我取路径的问题，今天就biweilun就一并写出来，希望对大家有点帮助，呵呵

1、用FSO的SpecialFolder常数

FSO的SpecialFolder常数依赖的函数为GetSpecialFolder(SpecialFolder)，很遗憾的是，SpecialFolder常数只有3个，0-2，0对应WindowsFolder，就是你的Windows文件夹，如果你的系统装在C盘的话，那么返回的就是"C:\Windows"这个路径字符串。1对应SystemFolder，GetSpecialFolder(1)返回"C:\Windows\system32"。2代表临时文件夹，就不要我多说了吧？

下面给出取临时文件夹路径字符串的实例：

Dim fso

Set fso = CreateObject("Scripting.FileSystemObject")         //绑定FSO对象

Dim tempfolder

Const TemporaryFolder = 2

Set tempfolder = fso.GetSpecialFolder(TemporaryFolder)

Wscript.Echo tempfolder

你把上面的代码保存为一个vbs文件打开试试，弹出了你的临时文件夹所在的路径。这个字符串存放在变量tempfolder里面，明白？

2、用WshShell的取系统环境变量

Wscript.Shell对象提供了Environment这个一个东东。返回WshEnvironment的对象合集。先看一个实例：

Set WshShell=Wscript.CreateObject("Wscript.Shell")         //绑定WSH对象

Set WshSysEnv=WshShell.Environment("Process")

Wscript.Echo WshSysEnv.Item("SYSTEMROOT")

将以上代码保存为vbs文件，运行，是不是弹出了你的系统路径？"C:\windows"对吧？

有人会问，如果想取其他的路径呢？取决于你的系统环境变量了，系统环境变量一般又下面几个：

名称说明

NUMBER_OF_PROCESSORS计算机上运行的处理器数目。

PROCESSOR_ARCHITECTURE用户工作站使用的处理器类型。

PROCESSOR_IDENTIFIER用户工作站的处理器ID。

PROCESSOR_LEVEL用户工作站的处理器级。

PROCESSOR_REVISION用户工作站的处理器版本。

OS用户工作站所用的操作系统。

COMSPEC用于运行“命令提示”窗口的命令(通常为cmd.exe)。

HOMEDRIVE本地主驱动器(通常为C驱动器)。

HOMEPATH用户的默认路径(在WindowsNT上通常为\users\default)。

PATH路径环境变量。

PATHEXT可执行文件的扩展名(通常为.com、.exe、.bat或.cmd)。

PROMPT命令提示符(通常为$P$G)。

SYSTEMDRIVE系统所在的本地驱动器(例如，c:\)。

SYSTEMROOT系统目录(例如，c:\winnt)。和WINDIR相同。

WINDIR系统目录(例如c:\winnt)。和SYSTEMROOT相同。

TEMP存储临时文件的目录(例如，c:\temp)。用户可更改。

TMP存储临时文件的目录(例如，c:\temp)。用户可更改。

你可以用上面的变量自己替换WshSysEnv.Item("SYSTEMROOT")里面的SYSTEMROOT。

3、用WshShell的SpecialFolders属性

SpecialFolders属性提供WshSpecialFolders对象以便访问Windows的shell文件夹，例如桌面文件夹、开始菜单文件夹和个人文档文件夹。

下面biweilun给出实例：

Set WshShell=Wscript.CreateObject("Wscript.Shell")

Wscript.Echo "Yourdesktopis"&WshShell.SpecialFolders("Desktop")

这是一个弹出你的桌面文件夹所在的路径的字符串，当然你也可以选择用一个字符串来保存它。那么，SpecialFolders属性一共有那些呢？

AllUsersDesktop

AllUsersStartMenu

AllUsersPrograms

AllUsersStartup

Desktop

Favorites

Fonts

MyDocuments

NetHood

PrintHood

Programs

Recent

SendTo

StartMenu

Startup

Templates

以上的文件夹大家看就能猜到这是什么路径了吧？如果你认为我写得不全，你可以自己使用下面的脚本代码看：

Set WshShell=Wscript.CreateObject("Wscript.Shell")

'htp://hi.baidu.com/biweilun

'Listallspecialfolders

For Each strFolder In WshShell.SpecialFolders

Wscript.Echo strFolder

Next

你会发现所有可用的SpecialFolders都一一弹出来显示了。

相关文章

bookfind 通过ISBN序号获取图书连接的书名与作者的vbs代码，类似小偷程序，通过正则匹配，虽然现在已经无法使用，但代码不错，原理都有2011-12-12

用VBS可执行程序+Xmlhttp下载备份网上文件的代码...2007-08-08

这篇文章主要介绍了使用 iisext.vbs 启用应用程序的相关资料,需要的朋友可以参考下2014-07-07

用VBS模拟二叉树，可以得到一个排序办法....2007-03-03

如何在 Windows 7 系统中向用户显示一个用来选择文件的对话框呢2011-10-10

思路不错，大家可以测试下，在vbscript调用另外一个vbscript2008-11-11

程序利用 vbs 的wmi 、scripting.filesystemobject、shell.application、scripting.dictionary、wscript.shell的相关功能功能实现将当前进程列表显示在一个文本文件中，通过用户界面的选择，确定需要瞬间中断的进程列表，然后中断之。2008-06-06

用vbs实现可以查找指定扩展名的文件，方便大家搜索2008-06-06

解密base64的vbs小函数,支持英文与数字不支持中文。2008-05-05

VBS教程：函数-FormatPercent 函数...2006-11-11

最新评论