利用ASP将HTML格式数据传输给Excel(2)

建立HTML表格
首先建立ASP主页,将该主页添加到Visual InterDev项目中,文件名为ContentType.asp, 如同图 A
。然后将代码A所显示的代码添加到主页中,第一行代码可以将所涉及主页的mime type转变为Excel mime type。下面几行代码将启动我们早先建立的组件以获取ADOR记录区的数据。 这些代码如同ListingA中所显示将在记录区循环处理并建立一个HTML表格, 该表格包括雇员表中每行的记录。


代码 A:Code for adding new ASP page to Visual InterDev Project

1@ Language=VBScript 
1Response.ContentType = "application/vnd.ms-excel"
1   
2Dim objEmployee, rs   
3  
4set objEmployee=server.CreateObject("EmpReport.Employee")   
5  
6Set rs = objEmployee.GetEmployee()   
7  
8'Draw a Table   
9  
 1<table>
 2<tr>
 3<td><strong><font face="" size="4">Employee   
 4Report</font></strong></td>
 5</tr>
 6<tr>
 7<td>Employee Id</td>
 8<td>First Name</td>
 9<td>Last Name</td>
10<td>Title</td>
11</tr>   

Do while not rs.eof

1<tr>
2<td>   

=rs("EmployeeId")

1<td>   

=rs("LastName")

1<td>   

=rs("FirstName")

1<td>   

=rs("Title")

1</tr>   

rs.movenext
loop

完成输入代码后, 保存并浏览该主页。该主页如同图 B 。注意该电子表格中的所有行并未实行任何格式化处理。当我们使用Excel VBA组件创立工作表格时,我们可以利用VBA方式对表格加以调整。 但是,在使用HTML方式下对表格加以通常的格式化处理是比较困难的,除非你能方便地显示和读取HTML表格的有关数据。利用ASP主页技术我们能够做到这一点,而且可以实现目前Microsoft Excel所支持的所有功能, 其中包括SUM功能。需要注意的是,利用HTML创立的工作表格中没有包括一些标准的标示符号,例如

1<html> 及<body>。当我们建立与Excel工作表格互换数据的HTML表格时,尽量不要在ASP主页中使用<html>,<body>,<head>等标示符号,因为Excel工作表格通常无法正确这些标示符号。   
2  
3![](http://www.zdnet.com.cn/developer/coding/graphics/2000-7-6-1/figure_b.gif)</head></body></html></body></html>
Published At
Categories with Web编程
Tagged with
comments powered by Disqus