利用ASP将HTML格式数据传输给Excel 的技巧
来源:不详 时间:07-05-06 点击: 点击这里收藏本文
完成输入代码后， 保存并浏览该主页。该主页如同图 B 。注意该电子表格中的所有行并未实行任何格式化处理。当我们使用Excel VBA组件创立工作表格时，我们可以利用VBA方式对表格加以调整。 但是，在使用HTML方式下对表格加以通常的格式化处理是比较困难的，除非你能方便地显示和读取HTML表格的有关数据。利用ASP主页技术我们能够做到这一点，而且可以实现目前Microsoft Excel所支持的所有功能， 其中包括SUM功能。需要注意的是，利用HTML创立的工作表格中没有包括一些标准的标示符号，例如<HTML> 及<BODY>。当我们建立与Excel工作表格互换数据的HTML表格时，尽量不要在ASP主页中使用<HTML>,<BODY>,<HEAD>等标示符号，因为Excel工作表格通常无法正确这些标示符号。
<%@ Language=VBScript %>
<%Response.ContentType = "application/vnd.ms-excel"%>
<%
Dim objEmployee, rs
set objEmployee=server.CreateObject("EmpReport.Employee")
Set rs = objEmployee.GetEmployee()
'Draw a Table
%>
<TABLE>
<TR>
<TD><STRONG><FONT FACE="" size=4>Employee
Report</FONT></STRONG></TD>
</TR>
<TR>
<TD>Employee Id</TD>
<TD>First Name</TD>
<TD>Last Name</TD>
<TD>Title</TD>
</TR>
<%
Do while not rs.eof
%>
<TR>
<TD>
<%=rs("EmployeeId")%></TD>
<TD>
<%=rs("LastName")%></TD>
<TD>
<%=rs("FirstName")%></TD>
<TD>
<%=rs("Title")%></TD>
</TR>
<%
rs.movenext
loop
%></TABLE>
把此文章收藏到：
