以下步骤说明了如何使用此方法向浏览器写入一个 Excel 文件：
| 1. |
创建一个新的 ASP 页并粘贴以下代码：
<%
'Set the content type to the specific type that you are sending.
Response.ContentType = "application/x-msexcel"
Const adTypeBinary = 1
Dim strFilePath
strFilePath = "C:\ExcelFiles\Excel1.xls" 'This is the path to the file on disk.
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = adTypeBinary
objStream.LoadFromFile strFilePath
Response.BinaryWrite objStream.Read
objStream.Close
Set objStream = Nothing
%>
|
| 2. |
将该文件保存到 Web 服务器。 |
| 3. |
在浏览器中，浏览到该文件。 |
posted on 2007-11-17 08:54
汪杰 阅读(449)
评论(0) 编辑 收藏 引用 所属分类:
asp(javascrpt)