主题:  [求助] 求助啊,将数据库的内容生成WORD文档

Kingstar

职务:普通成员
等级:1
金币:0.0
发贴:15
#12005/12/13 17:15:40
我在网上看到很多关于"将数据库的内容生成WORD文档"的文章,但是我是菜鸟~经过多次努力还是找不到怎么用那代码完成~请各位高手帮帮我看看啊我试过只是普通用FSO创建word可是被我的防火场说是VB.Rated病毒~我汗~代码:
<%
'下面生成文件的代码。
Dim fso, MyFile
'创建FSO对象,有些服务器有可能不支持这个对象,那就没戏了
Set fso = CreateObject("Scripting.FileSystemObject"
'文件名
sFileName = "temp.doc"
'生成新文件文件放在当前目录的word/下,当前测试时必须有这个目录
Set MyFile = fso.CreateTextFile(Server.MapPath("."& "\word\"&sFileName, True)

myString="这里是你预先排好的word文档,要填的地方都空好了,怎么弄底下告诉!"

'将MyString作为新文件的内容写入文件
 MyFile.WriteLine(myString)
 
 MyFile.Close '关闭文件
%>
文件已经生成了。注意在iis里把word目录设置为“写入”。
以下将word文档以数据流写出,不让IE自动打开,防止出错误提示。
请问怎么弄啊~
我在这个网站看到的
http://www.ybfq.net/show.asp?id=1855



Kingstar

职务:普通成员
等级:1
金币:0.0
发贴:15
#22005/12/13 18:13:46
我在 '将MyString作为新文件的内容写入文件
 MyFile.WriteLine(myString)
 
 MyFile.Close '关闭文件
加了这样一句:set fso=nothing这样,他不会再提示为病毒~但是又有另一个问题:
技术信息(用于支持人员)

错误类型:
Microsoft VBScript 编译器错误 (0x800A0408)
无效字符
/word.asp, line 14
 MyFile.WriteLine (myString)


浏览器类型:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; TencentTraveler )

网页:
GET /word.asp
我好郁闷啊~那位大虾可以帮我想想啊~拜托了



萧萧小雨

职务:普通成员
等级:1
金币:0.0
发贴:8
#32005/12/23 21:17:35
应该是myString这个字符串没有弄好,比如中间有双引号啥的,
你用的编辑器显示不出来吗?