[高分求助]Fso中的WriteLine怎么才可以写入带有换行的文本？ - ASP技术论坛

楼主

问题点数：0 回复次数：9

[高分求助]Fso中的WriteLine怎么才可以写入带有换行的文本？

如：

objFSO.WriteLine "<html> <head> </head> <body>…………………… </html>"

我试着好象引号内的东西不能换行，只能这样写：

objFSO.WriteLine "<html><head></head><body>……………………</html>"

但这样程序以后读起来很麻烦，请问高手有什么好的解决办法吗

搜索更多相关主题的帖子: Fso　WriteLine　高分　文本　

第 2 楼

得分:0

vbcrlf 是换行，最好先组装字符串，然后再用FSO写 Dim strOut,strTitle strTitle="xxx" strOut="<html>" & vbcrlf & _ "<head>" & vbcrlf & strTitle & vbcrlf & "</head>" & vbcrlf & _ "<body>……………………" & vbcrlf & _ "</html>"

objFSO.WriteLine strOut

另外，其实不输出换行符也无所谓，我们看的是网页，不是源代码。

[此贴子已经被作者于2004-11-23 09:09:21编辑过]

天津网站建设 http://www./

第 3 楼

得分:0

版主好象理解错了我的意思啊，我是说怎样才能让fso写入

[QUOTE] <html> <head> </head> <body>…………………… </html>"[/QUOTE]

我带了换行好象写入的时候会出错啊，就是怎样才能让FSO容忍带有换行的模板，而不是写入带有换行的模板

第 4 楼

得分:0

直接把它作为文本写入啊~

最新作品：百货品牌商品资讯第一门户([url]http://www./[/url])，欢迎交流

第 5 楼

得分:0

因为带有换行，写入不成功啊。

第 6 楼

得分:0

模板另存在一个文件里，先用FSO把模板文件内容读到一个变量里。

天津网站建设 http://www./

第 7 楼

得分:0

可在另一个变量里，还是有换行啊，

这么说吧，就是有什么办法可以把模板中的换行和空格去掉吗

第 8 楼

得分:0

倒，去掉干什么。。

用Replace替换掉！

天津网站建设 http://www./

第 9 楼

得分:0

不去掉用objFSO.WriteLine写入的时候会出问题，不信你试试。

用Replace替换我知道怎么替换空格，但怎么替换掉回车啊，回车是哪个

第 10 楼

得分:0

我可真是服了你了，我写个例子：  <% Dim fso,f Dim strTitle,strContent,strOut '创建文件系统对象 Set fso=Server.CreateObject("Scripting.FileSystemObject") '打开网页模板文件，读取模板内容 Set f=fso.OpenTextFile(Server.MapPath("Template.htm")) strOut=f.ReadAll f.close strTitle="这是生成的网页标题" strContent="这是生成的网页内容" '用真实内容替换模板中的标记 strOut=Replace(strOut,"%TITLE%",strTitle) strOut=Replace(strOut,"%CONTENT%",strContent) '创建要生成的静态页 Set f=fso.CreateTextFile(Server.MapPath("New.htm"),true) '写入网页内容 f.WriteLine strOut f.close Response.Write "生成静态页成功！" '释放文件系统对象 set f=Nothing set fso=Nothing %>  <html> <head> <title>%TITLE%</title> </head> <body> %CONTENT% </body> </html>  <html> <head> <title>这是生成的网页标题</title> </head> <body> 这是生成的网页内容 </body> </html>

[此贴子已经被作者于2004-11-23 13:08:50编辑过]

天津网站建设 http://www./