ASP中FSO的神奇功能 - 用FSO进行内容管理

发表日期：2000-9-29

新浪微博 QQ空间 QQ微博百度搜藏腾讯朋友 QQ收藏百度空间人人网开心网

平

　　到此，你对fso可能已经有了很好的体会。让我们再深入研究一步，来解决更复杂的难题。

　　首先，你可能希望对文件改名。为了跟踪所有的文档，你将要重新命名它们以便唯一，这样就可以被系统容易地区
别。很不幸，FSO不允许简单的文件改名操作，所以我们不得不修改一下。

< %
' create the fso object
set fso = Server.Createobject("Scripting.FileSystemObject")
path = "c: emp est.txt"
strDate = Replace(Date(), "/", "")
strDir = "c:inetpubwwwrootarticles" & strDate
strNewFileName = Hour(Now) & "_" & Minute(Now) & "_" &
second(Now) & ".html"

' open the old file
set file = fso.opentextfile(path, 1)  < -- For reading
strText = file.readall
set file = nothing

' check for and/or create folder
if not fso.folderexists(Server.MapPath(strDir)) then
        set f = fso.CreateFolder(Server.MapPath(strDir))
else
        set f = fso.GetFolder(Server.MapPath(strDir))
end if

' create and write new file
set file = fso.Createtextfile(f.path & "" & strNewFileName)
file.write(strText)
set f = nothing
file.close
set file = nothing

' delete the old file
fso.DeleteFile(path & "" & rst("FileName") & i)
' clean up
set fso = nothing
%>

　　 FSO能力的不足在这里却成了优势，我们可以一次执行2步。首先，打开文件并读入文件的内容。假设这里要创建一个
唯一的文件夹和一个唯一的文件来存储文章。然而，因为文件夹的路径每天都将改变，所以必须首先检查是否文件夹已经
存在，如果不存在，就创建它。这在if not fso.folderexists代码段完成。然后，取得那个路径，创建一个新的文件。新
文件建立完成后，删除掉旧文件，这通过fso.DeleteFile来完成。

　　这2步就是：对文件改名，然后移动到一个更合适的目录下。注意，在这里还可以对文件进行更多地操作，比如在写
入新文件前进行一下内容的编辑。

关注此文的读者还看过：
·2012-5-21 17:45:40 @ 指令参考之二 - @ENABLESESSIONSTATE
·2012-5-21 17:43:42 [视频教程]Dreamweaver与ASP动态网页设计教程 - 第三章 Dreamweaver应用之4 层
·2012-5-21 17:43:09 [视频教程]Dreamweaver与ASP动态网页设计教程 - 第一章HTML基本知识之1 HTML概述
·2012-5-21 17:42:12 初学者必读 ASP运行环境的搭建
·2012-5-21 17:41:47 ASP中FSO的神奇功能 - 使用FSO进行搜索
·2012-5-21 17:40:33 [视频教程]Dreamweaver与ASP动态网页设计教程 - 第三章 Dreamweaver应用之2 图像
·2012-5-21 17:40:33 [视频教程]Dreamweaver与ASP动态网页设计教程 - 第三章 Dreamweaver应用之3 链接
·2012-5-21 17:40:31 [视频教程]Dreamweaver与ASP动态网页设计教程 - 第三章 Dreamweaver应用之1 文本
·2012-5-21 17:39:58 ASP中FSO的神奇功能 - 权限许可

站长推荐 PS笔刷下载在线翻译系统进程广告代码

发表评论
姓　名:	验证码:
内　容:

教程搜索服务

项目外包信息

·汽车配件网站制作 50000元
·整站SEO优化
·课件门户网程序
·求长期合作网站设计制作高手
·公司网站重新改版 8000元
·asp企业网站小改动
·网站flash片头
·文化传播公司网站设计稿
·UI界面设计
·产品外观改版设计 15000元
·照明灯具网站设计 10000元
·求长期合作网站设计制作高手
·做B2C网站 20000元
·Android或QT软硬件平台设计（工
·网站首页FLASH

发布信息

浏览信息

邮件订阅服务

输入你的邮件地址，你将不会错过任何关于<ASP教程>的内容

网络编程文章分类

ASP教程
ASP实例
ASP技巧
ASP文摘
PHP教程
PHP技巧
PHP实例
PHP文摘
JSP教程
JSP技巧
JSP实例
JSP文摘
ASP.NET教程
ASP.NET技巧
ASP.NET实例
ASP.NET应用
xml教程
xsl教程
xml技巧
C#教程
C#应用
Delphi教程
Perl教程
Shell教程
Ajax教程
Visual Basic教程
Java教程
J2EE/J2ME教程
C/C++教程
移动解决方案
移动短信技术
移动行业动态
软件工程
WordPress
Android开发