[精品]ASP中常用的22个FSO文件操作函数（2）
来源：cnlei.org 发布时间：2007-08-18 15:12:00
标签：FSO,函数,文件操作
4.使用fso复制指定文件
Function CopyAFile(SourceFile,DestinationFile)
’//功能：源文件存在时，才能对文件进行复制，目的文件无影响
’//形参：源文件，目的文件
’//返回值：成功为1，失败为-1
’//
Dim MyFile
If ReportFileStatus(SourceFile) = 1 Then
Set MyFile = fso.GetFile(SourceFile)
MyFile.Copy (DestinationFile)
CopyAFile = 1
Else
CopyAFile = -1
End if
End Function
5.源文件存在时目的文件不存在时才能对文件进行移动
’Response.Write MoveAFile("f:\123\4561.exe","f:\123\4562.txt")
Function MoveAFile(SourceFile,DestinationFile)
’//形参：源文件，目的文件
’//返回值：成功为1，失败为-1
’//
If ReportFileStatus(SourceFile)=1 And
ReportFileStatus(DestinationFileORPath) =-1 Then
fso.MoveFile SourceFile,DestinationFileORPath
MoveAFile = 1
Else
MoveAFile = -1
End if
End Function
6.FSO判断指定文件是否存在？
Function ReportFileStatus(FileName)
’//功能：判断文件是否存在
’//形参：文件名
’//返回值：成功为1，失败为-1
’//
Dim msg
msg = -1
If (fso.FileExists(FileName)) Then
msg = 1
Else
msg = -1
End If
ReportFileStatus = msg
End Function
0
投稿猜你喜欢
今天我们看看所有的类!由于工作的上的事有点忙!点图!以后讲解这是我编译好了的类的结构图,我们可以用很多软件可以从原板的DLL看到这些内容!当- 这个目前还是有个别无法显示，翻了下msdn貌似没看到更好的解决方案，暂时放弃继续研究，有晓得完全解决的朋友不妨回复说一声。 先附bat创建畸
- 在本文中，此示例标准蓝图的存储过程命名方法只适用于SQL内部，假如你正在创建一个新的存储过程，或是发现一个没有按照这个标准构造的存储过程，即
- 为满足用户的视觉追求及产品的背景图片的换肤功能，设计师难免在设计上会用到半透明的效果。因此页面重构师基于视觉及产品的需要，采用了PNG32的
- 如何编写一个只在Web服务关闭时执行的程序？如：<SCRIPT LANGUAGE="VBScript"&
- 小小程序猿SQL Server认知的成长 1.没毕业或工作没多久，只知道有数据库、SQL这么个东东，浑然分不清SQL和Sql Server
- 一个JavaScript代码编写的图片展示特效，效果很棒。效果图：演示：<!DOCTYPE HTML PUBLIC "-//
- 看了下传统的方法，觉得不好，太麻烦。自己重写了个，思路比较新。这个函数的优点是html代码可以很简洁，使用图片也可以很少，只需要两张图片。事
- 昨天有位同事说，他的网页查询过程中发现普通索引和唯一索引的效率是有差别的，普通索引比唯一索引快，今天在我的虚拟机中布置了环境，测试抓图如下：
- iframe 标签 -- 代表HTML内联框架iframe 标签是成对出现的,以<iframe>开始,</ifr
- 假如您在安装SQL Server 2005时出现计数器错误，在搜索过所有的方法都不适用的情况下可以采用以下方法：将4个计数器删除：（如果没有
- 增强的toggleClass()1.toggleClass也可以和addClass一样，用空格分隔多个class名称了。.toggleCla
- 网页过渡是指当浏览者进入或离开网页时，页面呈现的不同的刷新效果，比如卷动、百叶窗等。注：通过模板所建网页无法添加网页过渡效果！制作步骤：1、
- 有时候想为我们的网页提供多语言支持，如果一种语言用一张网页来做实在太麻烦了，幸好Google提供了语言工具功能，下面介绍如何利用它来实现网页
- 突发奇想，写了以下这段代码，感觉还不错，拿来和大家分享作用：查看页面布局使用方法：在页面底部包含以下这段代码ff3,ie7测试可用var&n
- 连接数据库：mysql -u用户名 -p密码导入数据 source d:\create.sql用下面的语句就可以导出mysql中的数据了：m
- 在VBScript中有Filter这个函数可以用来对数组进行过滤，并返回原数组的一个子集数组。语法说明： 引用内容Filter 函
- 一个网站的导航就相当于是一条路的路标，不同的是，网站的不同栏目页的入口远远比马路要来得复杂，所以一个清晰的导航设计对于一个网站的意义远远大于
- <!--#include file="strcheck.asp"--> <％ '笔者在写程序的
- 每次在操作数据库的时候最烦的就是根据表单提交的内容写sql语句，特别是字段比较多的时候很麻烦，动不动就容易写错。所以我就写了下面的生成sql
