注册 登录
编程论坛 ASP技术论坛

asp网页到处excel只导出表头

走走 发布于 2010-08-22 01:40, 639 次点击
使用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>
3 回复
#2
cnfarer2010-08-22 06:44
從代碼看,似乎沒問題,衹是你的SQL語句的types不知道爲何值,查詢結果有沒有!建議輸出SQL語句看一下。
#3
yms1232010-08-22 13:36
<!--#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"
%>
 <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>
excel只有table
#4
gdk20062010-08-24 12:33
这种导出方式有可能会出问题,就是打开浏览器卡死现象。
1