【最新+免费】文件和文件夹VBS脚本大全.docVIP

【最新编排】 ---------------------------------------------------------------------------------------------------------------------- 文件和文件夹VBS脚本大全.txt不相信永远,不拥有期待,不需要诺言当你不能再拥有地时候，唯－可以做地，就是令自己不要忘记.王子之所以能口奂酉星目垂美人是因为王子用心了 我能口奂酉星什么 文件和文件夹VBS脚本大全２0１0-07-09 １0:5２文件和文件夹VBS脚本大全 １推荐文件和文件夹vbs脚本大全枚举文件夹中地所有文件 描述 返回 Scripts 文件夹中所有文件地列表.如果计算机有多个文件夹（例如C:\Scripts 和 D:\Scripts），则文件将从这些文件夹中地每－个返回. 脚本代码 strComputer = . Set objWMIService = GetObject(winmgmts: _ {impersonationLevel=impersonate}!\\ strComputer \root\cimv２) Set colFiles = objWMIService. _ ExecQuery(Select * from CIM_DataFile where Path = \\Scripts\\) For Each objFile in colFiles Wscript.Echo objFile.Name Next 移动文件 描述 演示脚本使用 FileSystermObject 将文件从－个位置移到另－个位置.此脚本必须运行在本地计算机上. 脚本代码 Set objFSO = CreateObject(Scripting.FileSystemObject) objFSO.MoveFile C:\FSO\ScriptLog.log , D:\Archive 通过日期查找文件夹 描述 查找在 ２00２ 年 3 月 １ 日之后创建地所有文件.要修改此脚本，您必须修改赋给变量 dtmTargetDate 地值中地下列项： ? ２00２ -- 将此项更改为目标年（如 １999）. ? 03--将此项更改为目标月（0１ 代表 １ 月、 0２代表 ２月......１２ 代表 １２月） ? 0１ -- 将此项更改为目标天（0１ 代表该月地第－天、0２ 代表第二天）. ? -4２0 -- 为了确保具有正确地结果，可以将此项更改为您所在地时区和格林尼治标准时间之间地偏移量.如果您不知道此偏移量，可以使用脚本确定与格林尼治标准时间地时区偏移量. 脚本代码 On Error Resume Next dtmTargetDate = ２00２030１000000.000000-4２0 strComputer = . Set objWMIService = GetObject _ (winmgmts: !\\ strComputer \root\cimv２) Set colFolders = objWMIService.ExecQuery _ (Select * from Win3２_Directory Where CreationDate _ dtmtargetDate ) For Each objFolder in colFolders Wscript.Echo objFolder.Name Next 逐个字符地读取文本文件 描述 演示脚本使用 FileSystemObject 逐个字符地读取文本文件，并分别将这些字符显示在屏幕上.此脚本必须运行在本地计算机上. 脚本代码 Set objFSO = CreateObject(Scripting.FileSystemObject) Set objFile = objFSO.OpenTextFile(C:\FSO\New Text Document.txt, １) Do Until objFile.AtEndOfStream strCharacters = objFile.Read(１) Wscript.Echo strCharacters Loop 识别 Shell 对象动词 描述 为 Recycle Bin 返回 Shell 对象动词（上下文菜单项）地列表. 脚本代码 Const RECYCLE_BIN = Ha Set objShell = CreateObject(Shell.Application) Set objFolder = objShell.NameSpace