小弟我的 WEB 打印报表错在哪里-ASP教程-爱易网页

小弟我的 WEB 打印报表错在哪里

日期：2014-05-17　浏览次数：21010 次

我的 WEB 打印报表错在哪里？

<%
sql = "Select department,count(department) From personnel group by department "
Set Rs = Server.CreateObject( "ADODB.Recordset ")
Rs.Open sql,conn,1,1
If Rs.EOF Then
Response.End
End If

%>

<html>

 公司员工统计表 
<div align= "center ">

<table id= "data " border= "1 " width= "606 " height= "53 " cellpadding= "0 " cellspacing= "0 " style= "border-collapse: collapse " bordercolor= "#111111 ">
<tr>
<td width= "93 " height= "24 ">
 部门 </td>
<td width= "78 " height= "24 ">
 合计 </td>
<td width= "413 " height= "24 ">
 员工姓名 </td>
</tr> <%

hj=0
while (not rs.eof)
departmenttmp=rs( "department ")
sqlstr= "select * from personnel where department= ' "&departmenttmp& " ' "
Set rss = Server.CreateObject( "ADODB.Recordset ")
rss.Open sqlstr, conn ,1,1
number=0
while(not rss.eof)
rss.movenext
number=number+1
wend
hj=hj+number
rss.movefirst
flag=0
while(not rss.eof)%>
<tr>
<%if (flag=0) then%>
<td width= "93 " height= "24 "> <%=departmenttmp%> </td>
<td width= "78 " height= "24 "> <%=number%> </td>
<%else%>
<td width= "93 " height= "24 "> </td>
<td width= "78 " height= "24 "> </td>
<%end if%>
<td width= "413 " height= "24 "> <%=rss( "name ")%> </td>
<% rss.movenext
flag=flag+1
wend%>
</tr>
<%rs.movenext
wend%>
<tr>
<td w

免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。

小弟我的 WEB 打印报表错在哪里

相关资料更多>

推荐阅读更多>

小弟我的 WEB 打印 报表 错在哪里

相关资料更多>

推荐阅读更多>

小弟我的 WEB 打印报表错在哪里