網站首頁 個人文檔 個人總結 工作總結 述職報告 心得體會 演講稿 講話致辭 實用文 教學資源 企業文化 公文 論文

如何做一個文本書寫器?

欄目: 素材及寫作指導 / 發佈於: / 人氣:1.13W

如何做一個文本href="https://mtfww.com/tags-3jlr-0.html" target="_blank" >書寫器?

如何做一個文本書寫器?

我們有下面的的函數,可做“文本書寫器”:

<%

function WriteToFile(FileName, Contents, Append)

on error resume next

if Append = true then

iMode = 8

else

iMode = 2

end if

set oFs = teobject("SystemObject")

set oTextFile = TextFile(FileName, iMode, True)

e Contents

e

set oTextFile = nothing

set oFS = nothing

end function

%>

<HTML>

<BODY>

<%

WriteToFile "C:", "中國水利水電出版社()——全國優秀出版社", True

WriteToFile "C:", "中國水利水電出版社()——全國優秀出版社", false

WriteToFile "C:", chr(13) & chr(10) & "隨風起舞()——時尚諮詢的個人網站", true

WriteToFile "C:", chr(13) & chr(10) & "隨風起舞()——時尚諮詢的個人網站", false

' contains:

'中國水利水電出版社()——全國優秀出版社 '隨風起舞()——時尚諮詢的個人網站

' contains:

'隨風起舞()——時尚諮詢的個人網站

%>

Write to File test is complete

</BODY>

</HTML>

Tags:書寫器 文本