asp网页到处excel只导出表头
使用asp,从access数据库中读出数据,列成table的形式,然后用application/vnd.ms-excel 导出到excel中,但是为什么导出的excel文件,中只有表头,从数据库中读的内容却一点都没有显示呢,希望大家知道一二,急用!!!感激不尽。
<!--#include file= conn.asp-->
<%
dim rs,sql
dim types
types= request("types")
set rs= server.CreateObject("ADODB.recordset")
sql= " select * from simpleinfo where types = '"&types&"' "
rs.open sql,conn,3,3
Response.ContentType= "application/vnd.ms-excel "
response.AddHeader "content-disposition", "inline; filename=输出.xls"
%>
<html>
<title>
<head>excel</head>
</title>
<body>
<table border="1">
<tr>
<th>项目名称</th>
<th>提交人</th>
<th>提交日期</th>
</tr>
<% i=0
do while not rs.eof
%>
<tr>
<td><%=rs("contractname")%></td>
<td><%=rs("principal1")%></td>
<td><%=rs("signdate")%></td>
</tr>
<%
i= i+1
rs.MoveNext
loop
%>
</table>
</body>
</html>