日期:2010-08-05  浏览次数:21075 次

     四、fso.MoveFolder

    主要作用是进行文件夹的移动,相当于剪切粘贴动作。

    5,movefldr.ASP

  <%Set fso = CreateObject("Scripting.FileSystemObject")
  fso.CreateFolder ("c:\cnbruce")
  fso.MoveFolder "c:\cnbruce", "C:\Program Files\"%>
  <a href="C:\Program Files\">查看cnbruce文件夹有没有移动过来</a>

    格式:fso.MoveFolder "被移动的文件夹","移动到的文件夹"

    本程序先是在C盘下建立了cnbruce文件夹,然后将其移动到C:\Program Files\文件夹下面。

    不过同样需要注意的是你的系统文件夹不能乱移动。

    五、fso.CopyFolder

    主要作用:将文件夹从某位置复制到另一位置。

    6,copyfldr.asp

  <%Set fso = CreateObject("Scripting.FileSystemObject")
  fso.CopyFolder "c:\Program Files\cnbruce", "c:\"%>
  <a href="C:\">查看cnbruce文件夹有没有复制过来</a>

    该程序是建立在上一movefldr.asp的执行结果基础之上来完成复制到C盘根目录下的。(话比较长-_-!)

    当然,其拷贝也是将该文件夹包括里面所以子文件夹和文件统统拷贝。

    到最后再试着将c:\Program Files\cnbruce和c:\cnbruce两个文件夹进行删除掉吧。

    不过,继续提醒你:不要写错了,比如写成c:\Program Files,那你就惨了:这叫玩命,学ASP玩出心跳出来了。

    对文件夹的操作差不多了,是不是感到用处比较大?有训言:好东西是把双刃剑。正义和邪恶就只一线间,注意正规合理利用该组件。不过还有你放心的是,现在网站空间服务商对这权力已经限定得死死的了,你再怎么闹翻也不会冒泡的:)

   然后接下来就是更微妙的:FSO对文件的操作。

  FSO中除了可以对驱动器、文件夹的操作以外,功能最强大的就是对文件的操作了。它可以用来记数、内容管理、搜索还可生成动态HTML页面等等。

    一、fso.OpenTextFile

    无需多说,fso.OpenTextFile就是打开某个文件了,一般情况之下是打开的txt文本文件。所以首先我们先建立一个txt文件,然后通过FSO来读取其中的内容。

    1,info.txt

  name:cnbrucesex:male

    建立了该文件,下面再做个ASP页面,当然最好两个文件是在同一目录下。

    2,opentxt.asp

  <%whichfile=server.mappath("info.txt")
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set txt = fso.OpenTextFile(whichfile,1)
  rline = txt.ReadLine
  rline = rline & "<br>" & txt.ReadLine
  Response.Write rlinetxt.Close%>

    需要注意:无论是通过FSO打开驱动器、打开文件夹、打开文件,以及以后要接触到的打开数据库,都只能是打开绝对物理路径地址。但一般情况是上传到空间服务商那,不能很直接地了解到自己文件的所在位置,所以强烈推荐使用server.mappath方法:平台移植性强,适用性强。

    CreateObject("Scripting.FileSystemObject")建立了FSO组件的连接,fso.OpenTextFile(whichfile,1)打开了info.txt该文件。参数“1”表示“ForReading:以只读方式打开文件。不能写这个文件。”,其他还有参数“2”表示“ForWriting:以写方式打开文件”,参数“8”表示“ForAppending:打开文件并从文件末尾开始写”。

    打开了该文件,接下来是不是要显示文件中的内容?那就通过txt.ReadLine方法读取文本中的一整行,如果需要继续读取下一行,则继续使用txt.ReadLine方法。当然初此还有其它的读取方法,比如txt.Read(7)读取指定数量的字符,txt.ReadAll返回文本中的全部内容。