<script type="text/javascript">
/*
创建文件
*/
function CreateFile()
{
   var fso, tf;
   fso = new ActiveXObject("Scripting.FileSystemObject");//获取对象
   tf = fso.CreateTextFile("d:\\testfile.txt", true);//创建一个文件夹
   // 写一行，并且带有新行字符。
   tf.WriteLine("Testing 1, 2, 3.") ;
   // 向文件写三个新行字符。  
   tf.WriteBlankLines(3) ;
   // 写一行。
   tf.Write ("This is a test.");
   tf.Close();//关闭
}
//删除文件
function deleteFile()
{
	var fso, tf;
	fso = new ActiveXObject("Scripting.FileSystemObject");
	tf = fso.GetFile("d:\\testfile.txt");
	tf.Delete();
}
// 读取文件
function readFile()
{
var ForReading = 1;
var  fso = new ActiveXObject("Scripting.FileSystemObject");
// 打开文件
var ts = fso.OpenTextFile("d:\\testfile.txt",ForReading);
// 读取文件第一行内容
var s = ts.ReadLine();
alert("File contents = " + s + "");
}

/**
 *Folder的API：
 *任务 方法 
 *创建文件夹。 FileSystemObject.CreateFolder 
 *删除文件夹。 Folder.Delete 或 FileSystemObject.DeleteFolder 
 *移动文件夹。 Folder.Move 或 FileSystemObject.MoveFolder 
 *复制文件夹。 Folder.Copy 或 FileSystemObject.CopyFolder 
 *检索文件夹的名字。 Folder.Name 
 *如果文件夹在驱动器上存在，则找出它。 FileSystemObject.FolderExists 
 *获得现有 Folder 对象的实例。 FileSystemObject.GetFolder 
 *找出文件夹的父文件夹名。 FileSystemObject.GetParentFolderName 
 *找出系统文件夹的路径。 FileSystemObject.GetSpecialFolder 
 */

// 创建文件夹
function createFolder()
{
	var  fso = new ActiveXObject("Scripting.FileSystemObject");
	if(!fso.FolderExists("d:\\temp")) //如果文件夹不存在，则创建文件夹
	{
		fso.CreateFolder("d:\\temp");
		alert("Created folder d:\\temp" + "\n");
	}else{
		alert("folder is exists");
	}
	
	// 显示文件夹基础名称，不包含路径名
	alert("Basename = " + fso.GetBaseName("d:\\temp") + "\n");
}
// 删除文件夹
function deleteFolder()
{
	var  fso = new ActiveXObject("Scripting.FileSystemObject");
	
	if(fso.FolderExists("d:\\temp")){	// 判断文件夹是否存在
		var ftemp = fso.GetFolder("d:\\temp");
		fso.DeleteFolder(ftemp);
		alert("Delete success");
	}else{
		alert("To delete a file does not exist!");
	}
}
// 将d盘下的testfile.txt文件移动到d:\\temp\\目录下
function MoveFile()
{
 var  fso = new ActiveXObject("Scripting.FileSystemObject");
	if(!fso.FolderExists("d:\\temp")) //如果文件夹不存在，则创建文件夹
	{
		fso.CreateFolder("d:\\temp");
	}
   // 获取 C 的根目录(d:\)中的文件的句柄。
var  f2 = fso.GetFile("d:\\testfile.txt");
   f2.Move ("d:\\temp\\");
   alert("Copying file to d:\\temp <br>");
}
// CreateFile();
// deleteFile();
// readFile();
// createFolder();
// deleteFolder();
 CopyFile();
</script>