VBS教程:属性-Path 属性

所属分类: 脚本专栏 / vbs 阅读数: 1977
收藏 0 赞 0 分享

Path 属性

返回指定文件、文件夹或驱动器的路径。

object.Path

object 应为 File、Folder 或 Drive 对象的名称。

说明

对于驱动器,路径不包含根目录。例如,C 驱动器的路径是 C:,而不是 C:\。

以下代码举例说明如何使用 Path 属性:

Function ShowFileAccessInfo(filespec)    Dim fso, d, f, s    Set fso = CreateObject("Scripting.FileSystemObject")    Set f = fso.GetFile(filespec)    s = UCase(f.Path) & "<BR>"    s = s & "创建时间:" & f.DateCreated & "<BR>"    s = s & "上次访问时间:" & f.DateLastAccessed & "<BR>"    s = s & "上次修改时间:" & f.DateLastModified  ShowFileAccessInfo = sEnd Function
更多精彩内容其他人还在看

e是自然对数的底 e.vbs

'e=1+1/1!+1/2!+1/3!+1/4!+……+1/n! 'φkρ=αe '其中,α和k为常数,φ是极角,ρ是极径,e是自然对数的底。为了讨论方便,我们把e或由e经过一定变换和复合的形式定义为“自然律”。因此,“自然律”的核心是e,其值为2.71828……,是一个无限循环... 查看详情
收藏 0 赞 0 分享

vbs imail 密码解密

复制代码 代码如下:on error resume next const HKEY_LOCAL_MACHINE = &H80000002 strComputer = "." Set oReg=GetObject("winmgmts:{impersonationLevel=... 查看详情
收藏 0 赞 0 分享

VBS Runas 自动输入密码, 明文

复制代码 代码如下:Set Shell = CreateObject("WScript.Shell") Shell.Run "cmd /c @runas /user:administrator CMD" WScript.Sleep 2000 Shell.SendKeys "pas... 查看详情
收藏 0 赞 0 分享

vbscript 三个数比较大小的实现代码

复制代码 代码如下:dim a,b,c a =inputbox ("请输入0-99的整数且不能重复更不要用汉字和字母") b =inputbox ("请输入0-99的整数且不能重复更不要用汉字和字母") c =inputbox ("请输入0-99的整数且不能重复更不要用汉字和字母... 查看详情
收藏 0 赞 0 分享

脚本 MsAgent组件 微软精灵 揪出系统自带的宠物

复制代码 代码如下:'On Error Resume Next strAgentName = "Merlin" strAgentPath = "c:\windows\msagent\chars\" & strAgentName & ".acs" ScriptCom... 查看详情
收藏 0 赞 0 分享

VBS InternetExplorer.Application的属性和方法介绍

示例代码 Set ie = CreateObject("InternetExplorer.Application") ie.Navigate "https://www.jb51.net" Wscript.Sleep 1000 ie.Toolbar = 0 ... 查看详情
收藏 0 赞 0 分享

vbs 列出该目录下所有文件和文件夹的类型,大小,和所有者

GetOwner.VBS用法,在命令行下:GetOwner.vbs 目录名会在相应目录下生成一个TXT.TXT文件,内里列出该目录下所有文件和文件夹的类型,大小,和所有者 注意:大小以MB为单位,小于1MB的就显示为0MB, 以下是代码: G = WScript.argument... 查看详情
收藏 0 赞 0 分享

雷客图 站长安全助手 vbs版代码(asp 木马查找)

均在命令行下使用 AntiIframe.vbs #该脚本是批量挂马程序的逆向,用于批量清除被添加到文件中的恶意代码。记事本打开文件可以修改Pattern参数指定要处理的文件名,文件名之间用|隔开(也支持vbs正则表达式)。由于要修改文件,请谨慎的使用(最好先备份文件) #用法: ... 查看详情
收藏 0 赞 0 分享

discuz 任意管理员密码漏洞利用工具 vbs代码

也利于修改 以下是search.inc.php 文件漏洞利用代码VBS版 复制代码 代码如下: Dim strUrl,strSite,strPath,strUid showB() Set Args = Wscript.Arguments If Args.Count <>... 查看详情
收藏 0 赞 0 分享

添加网站到安全站点.设置安全站点打开ActiveX时提示.去页眉页脚的vbs代码

复制代码 代码如下:'/*========================================================================= ' * Intro 主要是解决在使用WebBrowser打印时,得先设置IE安全性的问题 ' * File... 查看详情
收藏 0 赞 0 分享
查看更多