都有什么财神爷:asp 如何调用fso组件生成TXT文件的内容?

来源:百度文库 编辑:高考问答 时间:2024/04/28 15:21:03
在数据库里取出新闻的内容来,新闻内容存储的是纯文字类型的.
然后再调用FSO组件生成.TXT格式的文件
恳请高手指点思路,或者给一段源代码,谢谢.

set rs=server.createobject("adodb.recordset")
sql="select * from article where id="+request("id")
rs.open sql,conn,1,3
content=rs("content")
rs.close
Set fso = Server.CreateObject("Scripting.FileSystemObject")
filePath=request.ServerVariables("APPL_PHYSICAL_PATH")
Set f = fso.CreateTextFile(filePath& "\" & yourfilenames.txt)
f.WriteLine content
f.close
'生成页面程序结束