function FileOperation()
        
{
            
var   fso,   f1,   f2,   s; 
            fso   
=   new ActiveXObject("Scripting.FileSystemObject");     
            f1   
=   fso.CreateTextFile('d:\\testfile.txt',   true);     
            
//   写一行     
            f1.Write("This   is   a   test.");     
            
//   关闭文件     
            f1.Close();     
            
//   获取C:根目录下的文件句柄     
            f2   =   fso.GetFile('d:\\testfile.txt');     
            
//   移动文件到 mp目录下     
            f2.Move("d:\\tmp\\testfile.txt");       
            
//   拷贝文件到 emp目录下     
            f2.Copy("d:\\temp\\testfile.txt");     
            
//   获取文件句柄     
            f2   =   fso.GetFile("d:\\tmp\\testfile.txt");     
            f3   
=   fso.GetFile("d:\\temp\\testfile.txt");     
            
//   删除文件     
            f2.Delete();     
            f3.Delete();    
        }
如果以上函数运行时报错:Automation Server can't create object,将IE中的Tools - Internet Options - Security - Customer Level - Activex controls and plug-ins - Initialize and script Activex controls not market as safe or scripting 置为Enable或者Prompt就行了。
posted on 2007-10-11 15:28  pdfw  阅读(979)  评论(0编辑  收藏  举报