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

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都一一弹出来显示了。

赞 (0)

相关推荐

  • vbs获取当前路径的代码

    CMD当前路径 复制代码 代码如下: test = createobject("Scripting.FileSystemObject").GetFolder(".").PathWscript.echo test 当前VBS路径 复制代码 代码如下: test = createobject("Scripting.FileSystemObject").GetFile(Wscript.ScriptFullName).ParentFolder.PathW

  • 用vbs实现的确定共享文件夹的本地路径？

    如何确定共享文件夹的本地路径? 问: 您好,脚本专家!如果有 UNC 路径(例如 \\server1\test),可以使用脚本确定共享文件夹(例如 C:\Scripts\Test 文件夹)的本地路径吗? -- JVK 答: 您好,JVK.是的,您说得没错 噢,对了:我们几乎忘了.您能使用脚本确定共享文件夹的本地路径吗?您当然可以(尽管我们不知道为什么在棒球赛季期间还有人有闲心做这些).但如果这确实是您想要做的,那么这就告诉您该如何去做: 复制代码 代码如下: strPath = "\\atl-f

  • 批量替换快捷方式目的路径的VBS脚本

    可以替换指定目录及其子目录下所有的快捷方式,自己指定存放快捷方式的路径.要被替换的字符串和希望替换成的字符串,然后双击即可运行. 下面为代码,不很复杂,:) 复制代码 代码如下: On Error Resume Next  '替换某文件夹及其子文件夹下的所有快捷方式的指向路径 strFolderPath="D:\Program Files\TrueLaunchBar\Shortcut\File\ Style" '快捷方式的路径  strToReplace="\SOFTWARE

  • VBS中解决带空格路径的三种方法

    方法一: Set wshell=CreateObject("WScript.Shell") wshell.Run """C:\Program Files\360\360se\360se.exe""",5,True Set wshell = Nothing 方法二: temp="C:\Program Files\360\360se3\360se.exe" path = Chr(34) & temp &

  • VBS 脚本不能运行 提示Windows无法访问指定设备路径或文件

    VBS 脚本不能运行 提示Windows无法访问指定设备路径或文件

    昨天下载并且安装了Updater Application Block后,需要执行一个Deploy.vbs的文件,鄙人才疏学浅,这个小问题竟然也花费了我不少心机. 现在把结论共享一下. 首先,我的vbs文件关联已经被"豪杰"夺取了.我双击Deploy.vbs就会打开豪杰,比较郁闷.但是我用了打开方式,试了浏览器.cmd,都无济于事. 今天,我想到这个问题后,就有想法去Microsoft的News Group上去问一问.然后又去了CSDN的全文检索.果然很争气,我的关键字只是vbs,执行,

  • vbs中获取脚本当前路径的2个方法

    方法一: 复制代码 代码如下: currentpath = createobject("Scripting.FileSystemObject").GetFolder(".").Path 方法二: 复制代码 代码如下: currentpath = createobject("Scripting.FileSystemObject").GetFile(Wscript.ScriptFullName).ParentFolder.Path

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

    1.用FSO的SpecialFolder常数 FSO的SpecialFolder常数依赖的函数为GetSpecialFolder(SpecialFolder),很遗憾的是,SpecialFolder常数只有3个,0-2,0对应WindowsFolder,就是你的Windows文件夹,如果你的系统装在C盘的话,那么返回的就是"C:\Windows"这个路径字符串.1对应SystemFolder,GetSpecialFolder(1)返回"C:\Windows\system32&

  • Global.asax取绝对路径的方法

    在Global.asax文件中取绝对路径的方法: 复制代码 代码如下: string absolutelyPath =AppDomain.CurrentDomain.BaseDirectory;

  • python输出当前目录下index.html文件路径的方法

    本文实例讲述了python输出当前目录下index.html文件路径的方法.分享给大家供大家参考.具体实现方法如下: import os import sys path = os.path.join(os.path.dirname(sys.argv[0]),'index.html') print path 希望本文所述对大家的Python程序设计有所帮助.

  • Global.asax取物理路径/取绝对路径具体方法

    虚拟路径 复制代码 代码如下: Server.MapPath("~/") 取得的就是虚拟路径 取绝对路径 复制代码 代码如下: string absolutelyPath =AppDomain.CurrentDomain.BaseDirectory; 取物理路径和应用程序路径 复制代码 代码如下: System.Web.HttpContext.Current.Request.ApplicationPath

  • Windows下修改iTunes备份路径 的方法

    0.准备工作: •关闭itunes •在任务管理器中杀掉iTunes开头的服务 1,找到iTunes默认备份路径:C:\Users\xxx\AppData\Roaming\Apple Computer\MobileSync xxx为里的用户名 2,删掉默认路径下的MobileSync文件夹,以前有备份的可以重命名这个文件夹 3,win10下打开CMD 4,运行如下命令:(根据自己实际修改) mklink/j "C:\Users\xthua\AppData\Roaming\Apple Comput

  • 基于获取JAVA路径,包括CLASSPATH外的路径的方法详解

    归纳一些网上取JAVA路径的方法: 注明:如果从ANT启动程序,this.getClass().getResource("")取出来的比较怪,直接用JAVA命令行调试就可成功.得到classpath和当前类的绝对路径的一些方法获得CLASSPATH之外路径的方法:URL base = this.getClass().getResource(""): //先获得本类的所在位置,如/home/popeye/testjava/build/classes/net/ Stri

  • python获取指定路径下所有指定后缀文件的方法

    本文实例讲述了python获取指定路径下所有指定后缀文件的方法.分享给大家供大家参考.具体实现方法如下: # 获取指定路径下所有指定后缀的文件 # dir 指定路径 # ext 指定后缀,链表&不需要带点 或者不指定.例子:['xml', 'java'] def GetFileFromThisRootDir(dir,ext = None): allfiles = [] needExtFilter = (ext != None) for root,dirs,files in os.walk(dir

  • SelecT下拉框选中和取值的解决方法

    Select下拉框的问题,想在选择一个选项后,前台显示做出变动,并且知道选择的是第几个选项. 这个很好解决: 如下: <div class="page-header"> <div class="form-horizontal"> <div class="control-label col-lg-0"> </div> <div class="col-lg-2"> <

  • Python实现调用另一个路径下py文件中的函数方法总结

    Python实现调用另一个路径下py文件中的函数方法总结

    本文实例讲述了Python实现调用另一个路径下py文件中的函数方法.分享给大家供大家参考,具体如下: 针对这个问题,网上有很多的解决方式.其实最主要的原因是因为Python无法正确找到你其他文件夹下文件的路径.针对不同的环境和问题有不同的方法,大家可自行测试. 1. 方法一 首先,我先把解决我本人问题的方法记录如下.环境,Python为3.5,pycharm工作区间.主文件(main_preprocess.py)需要运用split_by_date.py中的函数,main_preprocess与s

  • python 获得任意路径下的文件及其根目录的方法

    似乎有一段时间没有更新博客了,这里就写点小功能,轻松获得电脑任意路径下的文件及文件夹,并将其写入word,以下是主要代码: **import os** **from os import walk** # 获取文件夹的中的文件夹和文件夹里文件 def do_file(save_filepath,o_filepath): #定义函数 传入写入文档保存的位置和要操作的任意电脑路劲 file=open(save_filepath,"w+") # 遍历文件路径 for parent,dirnam

随机推荐