繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > FSO文件对象介绍及常用函数
- ASP
- 用ASP发 WAP MAIL(-)
- 使用纯粹的asp+语言制作的栏目管理(一)
- 使用ASP方便的建立自己网站的每日更新
- 中文虚拟域名实现(1) (环境：中文NT)
- 中文虚拟域名实现(2) (环境：中文NT)
- 中文虚拟域名实现(3) (环境：中文NT)
- 最简单的ASP聊天室（附源码）
- Win2k IIS 远程执行命令漏洞
- 搜索按钮(客户端表单)
- 转换字符串带有http://的超级链接字符串为真正的超级链接(源码)
- 第一个ASP组件:设置服务器日期时间组件
- 虹雨的功能较全的计数程序
- 下拉框连动的小例子（数据库版）
- 下拉框连动的小例子（.htm版）
- 纯ASP上传图像文件到数据库的最佳例子
- 数组数据排序的程序例子
- 网络精英计数器源程序
- 全文本检索的应用(1)
- 全文本检索的应用(2)
- 全文本检索的应用(3)
ASP 中的 FSO文件对象介绍及常用函数
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-13 浏览: 68 ::
收藏到网摘: n/a
FSO的意思是FileSystemObject，即文件系统对象。FSO对象模型包含在Scripting 类型库 (Scrrun.Dll)中，它同时包含了Drive、Folder、File、FileSystemObject和TextStream五个对象，用来操作文件和文件夹十分方便。
FSO文件（File）对象属性
属 性 说 明
DateCreated 返回该文件夹的创建日期和时间
DateLastAccessed 返回最后一次访问该文件的日期和时间
DateLastModified 返回最后一次修改该文件的日期和时间
Drive 返回该文件所在的驱动器的Drive对象
Name 设定或返回文件的名字
ParentFolder 返回该文件的父文件夹的Folder对象
Path 返回文件的绝对路径，可使用长文件名
ShortName 返回DOS风格的8.3形式的文件名
ShortPath 返回DOS风格的8.3形式的文件绝对路径
Size 返回该文件的大小（字节）
Type 如果可能，返回一个文件类型的说明字符串
FSO文件（File）对象方法
FSO文件对象方法 用途
CopyFile 拷贝一个或者多个文件到新路径
CreateTextFile 创建文件并且返回一个TextStream对象
DeleteFile 删除一个文件
OpenTextFile 打开文件并且返回TextStream对象，以便读取或者追加
重命名文件：
复制代码 代码如下:
Function reName(sourceName,destName)
dim oFso,oFile
set oFso=server.createobject("Scripting.FileSystemObject")
set oFile=oFso.getFile(Server.mappath(sourceName))
oFile.Name=destName
Set oFso=Nothing
Set oFile=Nothing
End Function
dim oFso,oFile
set oFso=server.createobject("Scripting.FileSystemObject")
set oFile=oFso.getFile(Server.mappath(sourceName))
oFile.Name=destName
Set oFso=Nothing
Set oFile=Nothing
End Function
删除文件
复制代码 代码如下:
Function FSOdel(fileName)
dim fso,f
set fso = server.CreateObject("scripting.filesystemobject")
f=server.MapPath(fileName)
if fso.FileExists(f) then
fso.DeleteFile f,true
end if
set f = nothing
set fso = nothing
End Function
dim fso,f
set fso = server.CreateObject("scripting.filesystemobject")
f=server.MapPath(fileName)
if fso.FileExists(f) then
fso.DeleteFile f,true
end if
set f = nothing
set fso = nothing
End Function
替换文件中的字符串
复制代码 代码如下:
Function FSOreplace(fileName,Target,repString)
Dim objFSO,objCountFile,FiletempData
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objCountFile = objFSO.OpenTextFile(Server.MapPath(fileName),1,True)
FiletempData = objCountFile.ReadAll
objCountFile.Close
FiletempData=Replace(FiletempData,Target,repString)
Set objCountFile=objFSO.CreateTextFile(Server.MapPath(fileName),True)
objCountFile.Write FiletempData
objCountFile.Close
Set objCountFile=Nothing
Set objFSO = Nothing
End Function
Dim objFSO,objCountFile,FiletempData
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objCountFile = objFSO.OpenTextFile(Server.MapPath(fileName),1,True)
FiletempData = objCountFile.ReadAll
objCountFile.Close
FiletempData=Replace(FiletempData,Target,repString)
Set objCountFile=objFSO.CreateTextFile(Server.MapPath(fileName),True)
objCountFile.Write FiletempData
objCountFile.Close
Set objCountFile=Nothing
Set objFSO = Nothing
End Function
评论 (0) All
