📄 0123.htm

📁 asp教程宝典``还不错
💻 HTM
字号:
<html>

<head>
<title>新时代软件教程:操作系统 主页制作 服务器 设计软件 网络技术 编程语言 文字编辑</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style>
<!--
body, table {font-size: 9pt; font-family: 宋体}
a {text-decoration:none}
a:hover {color: red;text-decoration:underline}
.1  {background-color: rgb(245,245,245)}
-->
</style>
</head>
<p align="center"><script src="../../1.js"></script></a>
    <p align="center"><big><strong>用FSO进行内容管理</strong></big></p>

<div align="right">---（文/甘冀平）</div>

到此，你对FSO可能已经有了很好的体会。让我们再深入研究一步，来解决更复杂的难题。首先，你可能希望对文件改名。为了跟踪所有的文档，你将要重新命名它们以便唯一，这样就可以被系统容易地区别。很不幸，FSO不允许简单的文件改名操作，所以我们不得不修改一下。&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br>
&lt; %<br>
' create the fso object<br>
set fso = Server.Createobject(&quot;Scripting.FileSystemObject&quot;)<br>
path = &quot;c: emp est.txt&quot;<br>
strDate = Replace(Date(), &quot;/&quot;, &quot;&quot;)<br>
strDir = &quot;c:inetpubwwwrootarticles&quot; &amp; strDate<br>
strNewFileName = Hour(Now) &amp; &quot;_&quot; &amp; Minute(Now) &amp; &quot;_&quot; &amp;<br>
second(Now) &amp; &quot;.html&quot;<br>
<br>
' open the old file<br>
set file = fso.opentextfile(path, 1)&nbsp;&nbsp;&lt; -- For reading<br>
strText = file.readall<br>
set file = nothing<br>
<br>
' check for and/or create folder<br>
if not fso.folderexists(Server.MapPath(strDir)) then<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;set f = fso.CreateFolder(Server.MapPath(strDir))<br>
else<br>
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;set f = fso.GetFolder(Server.MapPath(strDir))<br>
end if<br>
<br>
' create and write new file<br>
set file = fso.Createtextfile(f.path &amp; &quot;&quot; &amp; strNewFileName)<br>
file.write(strText)<br>
set f = nothing<br>
file.close<br>
set file = nothing<br>
<br>
' delete the old file<br>
fso.DeleteFile(path &amp; &quot;&quot; &amp; rst(&quot;FileName&quot;) &amp; i)<br>
' clean up<br>
set fso = nothing<br>
%&gt;<br>
<br>
　　 FSO能力的不足在这里却成了优势，我们可以一次执行2步。首先，打开文件并读入文件的内容。假设这里要创建一个<br>
唯一的文件夹和一个唯一的文件来存储文章。然而，因为文件夹的路径每天都将改变，所以必须首先检查是否文件夹已经<br>
存在，如果不存在，就创建它。这在if not fso.folderexists代码段完成。然后，取得那个路径，创建一个新的文件。新<br>
文件建立完成后，删除掉旧文件，这通过fso.DeleteFile来完成。<br>
　 这2步就是：对文件改名，然后移动到一个更合适的目录下。注意，在这里还可以对文件进行更多地操作，比如在写<br>
入新文件前进行一下内容的编辑。<br>


  </table>
<p align="center"><script src="../../2.js"></script></a>
</body>
</html>
⌨️ 快捷键说明

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