求如何导出EXCEL表，并保存在服务器上指定地址文件中。
我有一个导出EXCEL文件程序，是直接通过浏览器导出保存的。

本人想修改为保存为EXCEL文件形式，

请高手指点：

'导出文件
Response.Clear()
Response.Buffer = True
Response.Charset = "GB2312"
Response.AppendHeader("Content-Disposition", "attachment;filename=" & Now & ".xls")
Response.ContentEncoding = System.Text.Encoding.UTF8
Response.ContentType = "application/ms-excel"
Dim oStringWriter As System.IO.StringWriter = New System.IO.StringWriter
Dim oHtmlTextWriter As System.Web.UI.HtmlTextWriter = New System.Web.UI.HtmlTextWriter(oStringWriter)
Me.ex.RenderControl(oHtmlTextWriter)
Response.Output.Write(oStringWriter.ToString)
Response.Flush()
Response.End()


谢谢

[解决办法]
保存的话，你改成

Dim oStringWriter As System.IO.StringWriter = New System.IO.StringWriter
Dim oHtmlTextWriter As System.Web.UI.HtmlTextWriter = New System.Web.UI.HtmlTextWriter(oStringWriter)
Me.ex.RenderControl(oHtmlTextWriter)
System.IO.WriteAllText(Server.MapPath("~/xx.xls"),oStringWriter.ToString)