在线订购完了会生成订单,我想把订单的内容通过点击"保存"然后就另存为文本文档,这如何实现
谢谢.

Dim fileso,wfile
Set fileso=CreateObject("Scripting.FileSystemObject")'创建文件对象
dim pathstr'文件夹路径
pathstr=server.mappath("/")&"/user/"'返回文件夹的绝对路径
fileso.GetFolder(pathstr)'转到上一句代码返回的文件夹
m_filename=pathstr&"1.txt"'在转到的文件夹内设置文本文件名
Set wfile=fileso.CreateTextFile(m_filename,True)'创建文本文文件对象
wfile.WriteLine("returnvalue")'向文本文件内写入信息
wfile.Close'关闭文本文件。
set wfile=nothing'清空内存中的文本文件对象

[此贴子已经被作者于2006-12-25 10:45:12编辑过]