欧美成人官网二区,亚洲石原莉奈一区二区在线观看

作者 : 甘冀平

　　到此，你對(duì)FSO可能已經(jīng)有了很好的體會(huì)。讓我們?cè)偕钊胙芯恳徊?，來解決更復(fù)雜的難題。

　　首先，你可能希望對(duì)文件改名。為了跟蹤所有的文檔，你將要重新命名它們以便唯一，這樣就可以被系統(tǒng)容易地區(qū)
別。很不幸，F(xiàn)SO不允許簡(jiǎn)單的文件改名操作，所以我們不得不修改一下。

%
' 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能力的不足在這里卻成了優(yōu)勢(shì)，我們可以一次執(zhí)行2步。首先，打開文件并讀入文件的內(nèi)容。假設(shè)這里要?jiǎng)?chuàng)建一個(gè)
唯一的文件夾和一個(gè)唯一的文件來存儲(chǔ)文章。然而，因?yàn)槲募A的路徑每天都將改變，所以必須首先檢查是否文件夾已經(jīng)
存在，如果不存在，就創(chuàng)建它。這在if not fso.folderexists代碼段完成。然后，取得那個(gè)路徑，創(chuàng)建一個(gè)新的文件。新
文件建立完成后，刪除掉舊文件，這通過fso.DeleteFile來完成。

　　這2步就是：對(duì)文件改名，然后移動(dòng)到一個(gè)更合適的目錄下。注意，在這里還可以對(duì)文件進(jìn)行更多地操作，比如在寫
入新文件前進(jìn)行一下內(nèi)容的編輯。

標(biāo)簽：通遼楚雄清遠(yuǎn) 涼山上海邢臺(tái) 赤峰南京

巨人網(wǎng)絡(luò)通訊聲明：本文標(biāo)題《ASP中FSO的神奇功能 - 用FSO進(jìn)行內(nèi)容管理》，本文關(guān)鍵詞 ASP,中,FSO,的,神奇,功能,；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題，煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們，我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò)，涉及言論、版權(quán)與本站無關(guān)。