当前位置: 首页 > 图文教程 > 网络编程 > ASP > 利用ASP将HTML格式数据传输给Excel(2)

ASP
BytesToBstr获取的源码转换为中文的代码
PostHttpPage用asp是实现模拟登录效果的代码
asp下实现UrlEncoding转换编码的代码
GetBody asp实现截取字符串的代码
asp之GetArray提取链接地址,以$Array$分隔的代码
DefiniteUrl asp将相对地址转换为绝对地址的代码
ReplaceSaveRemoteFile 替换、保存远程图片 的代码
ReSaveRemoteFile函数之asp实现查找文件保存替换的代码
FormatRemoteUrl函数之asp实现格式化成当前网站完整的URL-将相对地址转换为绝对地址的代码
ReplaceTrim 函数之asp实现过滤掉字符中所有的tab和回车和换行的代码
CheckFile函数之asp实现检查某一文件是否存在的代码
SaveRemoteFile函数之asp实现保存远程的文件到本地的代码
FpHtmlEnCode 函数之标题过滤特殊符号的代码
GetPaing 函数之asp采集函数中用到的获取分页的代码
ScriptHtml 函数之过滤html标记的asp代码
asp实现检查目录是否存在与建立目录的函数
ShowPage 显示“上一页 下一页”等信息的封装代码
JoinChar 向地址中加入 ? 或 & 用于实现传参
CreateKeyWord asp实现的由给定的字符串生成关键字的代码
Server.Execute方法执行指定的ASP程序

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 218 ::
收藏到网摘: n/a

  建立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 
<%@ 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>

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