⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 filesystemobject.htm

📁 最全的JS大全,希望大家喜欢.收录于网络.收录于网络.最全的JS大全,希望大家喜欢.
💻 HTM
📖 第 1 页 / 共 2 页
字号:
                <TD>&lt;SCRIPT LANGUAGE="JavaScript"&gt;<BR>&lt;!--<BR>var fso 
                  = new 
                  ActiveXObject("Scripting.FileSystemObject");<BR>fso.CopyFolder("c:\\WINDOWS\\Desktop", 
                  "d:\\");<FONT color=#666666> 
                  //把C盘的Desktop目录复制到D盘的根目录</FONT><BR>--&gt;<BR>&lt;/SCRIPT&gt;</TD></TR></TBODY></TABLE><BR>
            <TABLE cellSpacing=0 cellPadding=7 width="100%" bgColor=#dddddd 
            border=0>
              <TBODY>
              <TR>
                <TD bgColor=#eeeeee><FONT 
                  color=#990000>CreateFolder(</FONT>目录名<FONT 
                  color=#990000>)<FONT color=#666666> 
              //创建一个新的目录</FONT></FONT></TD></TR>
              <TR>
                <TD>&lt;SCRIPT LANGUAGE="JavaScript"&gt;<BR>&lt;!--<BR>var fso 
                  = new ActiveXObject("Scripting.FileSystemObject");<BR>var 
                  newFolderName = fso.CreateFolder("c:\\51JS");<FONT 
                  color=#666666> //在C盘上创建一个51JS的目录 
                  </FONT><BR>--&gt;<BR>&lt;/SCRIPT&gt;</TD></TR></TBODY></TABLE><BR>
            <TABLE cellSpacing=0 cellPadding=7 width="100%" bgColor=#dddddd 
            border=0>
              <TBODY>
              <TR>
                <TD bgColor=#eeeeee><FONT 
                  color=#990000>CreateTextFile(</FONT>文件名, 覆盖<FONT 
                  color=#990000>)<FONT color=#666666> 
                  //创建一个新的文件,如果此文件已经存在,你需要把覆盖值定为true</FONT></FONT></TD></TR>
              <TR>
                <TD>&lt;SCRIPT LANGUAGE="JavaScript"&gt;<BR>&lt;!--<BR>var fso 
                  = new ActiveXObject("Scripting.FileSystemObject");<BR>var 
                  newFileObject = fso.CreateTextFile("c:\\autoexec51JS.bat", 
                  true); <FONT color=#666666>//脚本将在C盘创建一个叫 
                  autoexec51JS.bat的文件</FONT><BR>--&gt;<BR>&lt;/SCRIPT&gt;</TD></TR></TBODY></TABLE><BR>
            <TABLE cellSpacing=0 cellPadding=7 width="100%" bgColor=#dddddd 
            border=0>
              <TBODY>
              <TR>
                <TD bgColor=#eeeeee><FONT color=#990000>DeleteFile(</FONT>文件名, 
                  只读?<FONT color=#990000>) <FONT 
                  color=#666666>//删除一个文件,如果文件的属性是只读的话,你需要把只读值设为true</FONT></FONT></TD></TR>
              <TR>
                <TD>&lt;SCRIPT LANGUAGE="JavaScript"&gt;<BR>&lt;!--<BR>var fso 
                  = new ActiveXObject("Scripting.FileSystemObject"); <FONT 
                  color=#666666>//为了安全我先把要删除的autoexec.bat备份到你的D盘</FONT><BR>var 
                  newpath = fso.CopyFile("c:\\autoexec.bat", 
                  "d:\\autoexec.bat"); <FONT 
                  color=#666666>//把C盘的autoexec.bat文件删除掉 
                  </FONT><BR>fso.DeleteFile("c:\\autoexec.bat", 
                  true);<BR>--&gt;<BR>&lt;/SCRIPT&gt;</TD></TR></TBODY></TABLE><BR>
            <TABLE cellSpacing=0 cellPadding=7 width="100%" bgColor=#dddddd 
            border=0>
              <TBODY>
              <TR>
                <TD bgColor=#eeeeee><FONT 
                  color=#990000>DeleteFolder(</FONT>文件名, 只读?<FONT 
                  color=#990000>)<FONT 
                  color=#666666>//删除一个目录,如果目录的属性是只读的话,你需要把只读值设为true</FONT></FONT></TD></TR>
              <TR>
                <TD>&lt;SCRIPT LANGUAGE="JavaScript"&gt;<BR>&lt;!--<BR>var fso 
                  = new 
                  ActiveXObject("Scripting.FileSystemObject");<BR>fso.CopyFolder("c:\\WINDOWS\\Desktop", 
                  "d:\\");<FONT color=#666666> 
                  //为了安全我先把你C盘的Desktop目录复制到你D盘的根目录</FONT><BR>fso.DeleteFolder("c:\\WINDOWS\\Desktop", 
                  true); <FONT 
                  color=#666666>//把你的Desktop目录删除,但因为desktop是系统的东西,所以不能全部删除,但.........</FONT><BR>--&gt;<BR>&lt;/SCRIPT&gt;</TD></TR></TBODY></TABLE><BR>
            <TABLE cellSpacing=0 cellPadding=7 width="100%" bgColor=#dddddd 
            border=0>
              <TBODY>
              <TR>
                <TD bgColor=#eeeeee><FONT 
                  color=#990000>DriveExists(</FONT>盘符<FONT color=#990000>) <FONT 
                  color=#666666>//检查一个盘是否存在,如果存在就返会真,不存在就返回.......</FONT></FONT></TD></TR>
              <TR>
                <TD>&lt;SCRIPT LANGUAGE="JavaScript"&gt;<BR>&lt;!--<BR>var fso 
                  = new 
                  ActiveXObject("Scripting.FileSystemObject");<BR>hasDriveD = 
                  fso.DriveExists("d");<FONT color=#666666> 
                  //检查系统是否有D盘存在</FONT><BR>hasDriveZ = fso.DriveExists("z");<FONT 
                  color=#666666> //检查系统是否有Z盘存在</FONT><BR>if (hasDriveD) 
                  alert("你的系统内有一个D盘");<BR>if (!hasDriveZ) 
                  alert("你的系统内没有Z盘");<BR>--&gt;<BR>&lt;/SCRIPT&gt;</TD></TR></TBODY></TABLE><BR>
            <TABLE cellSpacing=0 cellPadding=7 width="100%" bgColor=#dddddd 
            border=0>
              <TBODY>
              <TR>
                <TD bgColor=#eeeeee><FONT 
                  color=#990000>FileExists(</FONT>文件名<FONT color=#990000>) <FONT 
                  color=#666666>//检查一个文件是否存在,如果存在就返会真,不存在就返回.......</FONT></FONT></TD></TR>
              <TR>
                <TD>&lt;SCRIPT LANGUAGE="JavaScript"&gt;<BR>&lt;!--<BR>var fso 
                  = new ActiveXObject("Scripting.FileSystemObject");<BR>fileName 
                  = fso.FileExists("c:\\autoexec.bat");<BR>if (fileName) 
                  alert("你在C盘中有autoexec.bat文件,按下确定后这个文件将被删除!"); <FONT 
                  color=#666666>//开个玩笑:) 
              </FONT><BR>--&gt;<BR>&lt;/SCRIPT&gt;</TD></TR></TBODY></TABLE><BR>
            <TABLE cellSpacing=0 cellPadding=7 width="100%" bgColor=#dddddd 
            border=0>
              <TBODY>
              <TR>
                <TD bgColor=#eeeeee><FONT 
                  color=#990000>FolderExists(</FONT>目录名<FONT color=#990000>) 
                  <FONT 
                  color=#666666>//检查一个目录是否存在,如果存在就返会真,不存在就返回.......</FONT></FONT></TD></TR>
              <TR>
                <TD>&lt;SCRIPT LANGUAGE="JavaScript"&gt;<BR>&lt;!--<BR>var fso 
                  = new 
                  ActiveXObject("Scripting.FileSystemObject");<BR>folderName = 
                  fso.FolderExists("c:\\WINDOWS\\Fonts");<BR>if (folderName) 
                  alert("按下确定后系统的字库将被删除!"); <FONT color=#666666>//开个玩笑:) 
                  </FONT><BR>--&gt;<BR>&lt;/SCRIPT&gt;</TD></TR></TBODY></TABLE><BR>
            <TABLE cellSpacing=0 cellPadding=7 width="100%" bgColor=#dddddd 
            border=0>
              <TBODY>
              <TR>
                <TD bgColor=#eeeeee><FONT 
                  color=#990000>GetAbsolutePathName(</FONT>文件对象<FONT 
                  color=#990000>) </FONT><FONT color=#990000><FONT 
                  color=#666666>//返回文件对象在系统的绝对路径</FONT></FONT></TD></TR>
              <TR>
                <TD>&lt;SCRIPT LANGUAGE="JavaScript"&gt;<BR>&lt;!--<BR>var fso 
                  = new ActiveXObject("Scripting.FileSystemObject");<BR>pathName 
                  = fso.GetAbsolutePathName("c:\\autoexec.bat"); 
                  <BR>alert(pathName);<BR>--&gt;<BR>&lt;/SCRIPT&gt;</TD></TR></TBODY></TABLE><BR>
            <TABLE cellSpacing=0 cellPadding=7 width="100%" bgColor=#dddddd 
            border=0>
              <TBODY>
              <TR>
                <TD bgColor=#eeeeee><FONT 
                  color=#990000>GetBaseName(</FONT>文件对象<FONT color=#990000>) 
                  <FONT color=#666666>//返回文件对象的文件名</FONT></FONT></TD></TR>
              <TR>
                <TD>&lt;SCRIPT LANGUAGE="JavaScript"&gt;<BR>&lt;!--<BR>var fso 
                  = new ActiveXObject("Scripting.FileSystemObject");<BR>baseName 
                  = fso.GetBaseName("c:\\autoexec.bat"); <FONT 
                  color=#666666>//取得autoexec.bat的文件名autoexec</FONT><BR>alert(baseName);<BR>--&gt;<BR>&lt;/SCRIPT&gt;</TD></TR></TBODY></TABLE><BR>
            <TABLE cellSpacing=0 cellPadding=7 width="100%" bgColor=#dddddd 
            border=0>
              <TBODY>
              <TR>
                <TD bgColor=#eeeeee><FONT 
                  color=#990000>GetExtensionName(</FONT>文件对象<FONT 
                  color=#990000>) <FONT 
color=#666666>//文件的后缀</FONT></FONT></TD></TR>
              <TR>
                <TD>&lt;SCRIPT LANGUAGE="JavaScript"&gt;<BR>&lt;!--<BR>var fso 
                  = new ActiveXObject("Scripting.FileSystemObject");<BR>exName = 
                  fso.GetExtensionName("c:\\autoexec.bat"); <FONT 
                  color=#666666>//取得autoexec.bat后缀bat</FONT><BR>alert(exName);<BR>--&gt;<BR>&lt;/SCRIPT&gt;</TD></TR></TBODY></TABLE><BR>
            <TABLE cellSpacing=0 cellPadding=7 width="100%" bgColor=#dddddd 
            border=0>
              <TBODY>
              <TR>
                <TD bgColor=#eeeeee><FONT 
                  color=#990000>GetParentFolderName(</FONT>文件对象<FONT 
                  color=#990000>) <FONT 
              color=#666666>//取得父级的目录名</FONT></FONT></TD></TR>
              <TR>
                <TD>&lt;SCRIPT LANGUAGE="JavaScript"&gt;<BR>&lt;!--<BR>var fso 
                  = new 
                  ActiveXObject("Scripting.FileSystemObject");<BR>parentName = 
                  fso.GetParentFolderName("c:\\autoexec.bat"); <FONT 
                  color=#666666>//取得autoexec.bat的父级目录C盘</FONT><BR>alert(parentName);<BR>--&gt;<BR>&lt;/SCRIPT&gt;</TD></TR></TBODY></TABLE><BR>
            <TABLE cellSpacing=0 cellPadding=7 width="100%" bgColor=#dddddd 
            border=0>
              <TBODY>
              <TR>
                <TD bgColor=#eeeeee><FONT 
                  color=#990000>GetSpecialFolder(</FONT>目录代码<FONT 
                  color=#990000>) <FONT 
                  color=#666666>//取得系统中一些特别的目录的路径,目录代码有3个分别是 0:安装Window的目录 
                  1:系统文件目录 2:临时文件目录</FONT></FONT></TD></TR>
              <TR>
                <TD>&lt;SCRIPT LANGUAGE="JavaScript"&gt;<BR>&lt;!--<BR>var fso 
                  = new 
                  ActiveXObject("Scripting.FileSystemObject");<BR>tmpFolder = 
                  fso.GetSpecialFolder(2); <FONT 
                  color=#666666>//取得系统临时文件目录的路径</FONT> <FONT color=#666666>如我的是 
                  C:\windows\temp</FONT><BR>alert(tmpFolder);<BR>--&gt;<BR>&lt;/SCRIPT&gt;</TD></TR></TBODY></TABLE><BR>
            <TABLE cellSpacing=0 cellPadding=7 width="100%" bgColor=#dddddd 
            border=0>
              <TBODY>
              <TR>
                <TD bgColor=#eeeeee><FONT color=#990000>GetTempName() <FONT 
                  color=#666666>//生成一个随机的临时文件对象,会以rad带头后面跟着些随机数,就好象一些软件在安装时会生成*.tmp</FONT></FONT></TD></TR>
              <TR>
                <TD>&lt;SCRIPT LANGUAGE="JavaScript"&gt;<BR>&lt;!--<BR>var fso 
                  = new ActiveXObject("Scripting.FileSystemObject");<BR>tmpName 
                  = fso.GetTempName();<FONT color=#666666> 
                  //我在测试时就生成了radDB70E.tmp</FONT><BR>alert(tmpName);<BR>--&gt;<BR>&lt;/SCRIPT&gt;</TD></TR></TBODY></TABLE><BR>
            <TABLE cellSpacing=0 cellPadding=7 width="100%" bgColor=#dddddd 
            border=0>
              <TBODY>
              <TR>
                <TD bgColor=#eeeeee><FONT color=#990000>MoveFile(<FONT 
                  color=#000000>源文件, 目标文件</FONT>) <FONT 
                  color=#666666>//把源文件移到目标文件的位置</FONT></FONT></TD></TR>
              <TR>
                <TD>&lt;SCRIPT LANGUAGE="JavaScript"&gt;<BR>&lt;!--<BR>var fso 
                  = new ActiveXObject("Scripting.FileSystemObject");<BR>var 
                  newpath = fso.MoveFile("c:\\autoexec.bat", 
                  "d:\\autoexec.bat"); <FONT 
                  color=#666666>//把C盘的autoexec.bat文件移移动到D盘</FONT><BR>--&gt;<BR>&lt;/SCRIPT&gt;</TD></TR></TBODY></TABLE><BR>
            <TABLE cellSpacing=0 cellPadding=7 width="100%" border=0>
              <TBODY>
              <TR>
                <TD><IMG height=55 src="FileSystemObject_files/pdevilknit.gif" 
                  width=40> To Be Continue! 
                  还有几个属性没写例子,迟点就有了,是否觉得每次都会问你是否运行很麻烦?或者........,想知道如何不用询问就运行?<FONT 
                  color=#999999>(不要用脚本来破坏别人的系统啊!) </FONT>请密切留意 
              WWW.51JS.COM</TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD>
    <TD><IMG height=1 src="FileSystemObject_files/space.gif" 
  width=11></TD></TR></TBODY></TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
  <TBODY>
  <TR bgColor=#ffffff>
    <TD><IMG height=14 src="FileSystemObject_files/sq_3.gif" width=11></TD>
    <TD width="100%"></TD>
    <TD><IMG height=14 src="FileSystemObject_files/sq_4.gif" 
  width=11></TD></TR></TBODY></TABLE></BODY></HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -