这里能搜索到更多你想要的范文→
当前位置:好范文网 > 实用范文 > 素材及写作指导 >

如何做一个文本书写器?

发布时间:2014-07-31 17:22:44 审核编辑:本站小编下载该Word文档收藏本文

如何做一个文本书写器?

我们有下面的的函数,可做“文本书写器”:

<%

function WriteToFile(FileName, Contents, Append)

on error resume next

if Append = true then

iMode = 8

else

iMode = 2

end if

set oFs = server.createobject("Scripting.FileSystemObject")

set oTextFile = oFs.OpenTextFile(FileName, iMode, True)

oTextFile.Write Contents

oTextFile.Close

set oTextFile = nothing

set oFS = nothing

end function

%>

<HTML>

<BODY>

<%

WriteToFile "C:intelsTest1.txt", "中国水利水电出版社(.cn)——全国优秀出版社", True

WriteToFile "C:intelsTest2.txt", "中国水利水电出版社(.cn)——全国优秀出版社", false

WriteToFile "C:intelsTest1.txt", chr(13) & chr(10) & "随风起舞()——时尚咨询的个人网站", true

WriteToFile "C:intelsTest2.txt", chr(13) & chr(10) & "随风起舞()——时尚咨询的个人网站", false

'Test1.txt contains:

'中国水利水电出版社(.cn)——全国优秀出版社 '随风起舞()——时尚咨询的个人网站

'Test2.text contains:

'随风起舞()——时尚咨询的个人网站

%>

Write to File test is complete

</BODY>

</HTML>

word该篇DOC格式如何做一个文本书写器?范文,共有979个字。好范文网为全国范文类知名网站,下载本文稍作修改便可使用,即刻完成写稿任务。立即下载:
如何做一个文本书写器?下载
如何做一个文本书写器?.doc
下载Word文档到电脑,方便编辑和打印
编辑推荐: 星级推荐 星级推荐 星级推荐 星级推荐 星级推荐
下载该Word文档
好范文在线客服
  • 问题咨询 QQ
  • 投诉建议 QQ
  • 常见帮助 QQ
  • 13057850505