powerwind 发表于 2006-5-20 16:54

[Windows Script 编程之三]文件操作

原来Windows Script也很少人玩,可是有时候还是很好玩的。
下面代码对文件的操作是比较基本的,Windows Script 可以完成的功能远不止如此。


/*
**@Author:PowerWind
**@Date:2006-5-20
**file name: FileOperation.js
*/
var FSO = new ActiveXObject("Scripting.FileSystemObject");

//文件夹操作

//选新建一个文件夹
function CreateFolder(folder)
{
        FSO.CreateFolder(folder);
}
//获取文件夹信息
function FolderInfo(folder)
{
        var str="";
        var f=FSO.GetFolder(folder);
        str+="\n目录名:"+f.name;
        str+="\n目录下文件数:"+f.Files.Count;
        str+="\n子目录数:"+f.SubFolders.Count;
        str+="\n该目录占字节数:"+(f.size/1024);
        str+="\n最后修改时间:"+f.DateLastModified;
        return str;
}
//copy文件夹
function CopyFolder(src,dest,overwrite)
{
        FSO.CopyFolder(src,dest,overwrite);
}
//删除文件夹
function DeleteFolder(folder)
{
        FSO.DeleteFile(folder);
}

//文件操作
//在文件夹内新建一个文件
function CreateFile(filename)
{
        FSO.CreateTextFile(filename);
}
//打开文件,写入一行字
function WriteToFile(filename,content)
{
        var append=8;
        var f=FSO.OpenTextFile(filename,append,true);
        f.WriteLine(content);
}
//读文件
function ReadFromFile(filename,content)
{
        var f=FSO.OpenTextFile(filename);
        return f.ReadAll();
}
//获取文件信息
function FileInfo(file)
{
        var ff=FSO.GetFile(file);
        var info="";
        info+="\n文件类型:"+ff.Type;
        info+="\n文件大小:"+ff.size/1024+"kb";
        info+="\n最后修改时间:"+ff.DateLastAccessed;
        return info;
}
//copy文件
function CopyFile(src,dest,overwrite)
{
        FSO.CopyFile(src,dest,overwrite);
}
//重命名文件
function RenameFile(src,dest)
{
        FSO.MoveFile(src,dest);
}
//删除文件夹
function DeleteFolder(filename)
{
        FSO.DeleteFolder(filename);
}

var folder="c:\\test";
var filename="c:\\test\\test.txt";
var content="写入一行,测试一下";

CreateFolder(folder);
CreateFile(filename);
WriteToFile(filename,content);
WScript.echo(ReadFromFile(filename));
//WScript.echo(FileInfo(filename));
//WScript.echo(FolderInfo(folder));
//DeleteFolder(folder);

hjack 发表于 2006-5-23 23:49

powerpoint写一个树形显式文件夹内容的出来吧。

powerwind 发表于 2006-5-24 12:47

这个算不算?


function showFolder(folder)
{
        var handle = 0;
        var option = 0;
        var title="Jscript做的文件夹浏览对话框";
        var appShell = new ActiveXObject("Shell.Application");
        var objFolder = appShell.BrowseForFolder(handle,title, option, folder);
}
showFolder("C:\\Windows");
页: [1]
查看完整版本: [Windows Script 编程之三]文件操作