数据不显示?
<%
set rs = Server.CreateObject("ADODB.RecordSet")
dim strSql
strSql="select count(*) as number,st.studykind as studykinds,fdz.fdzname as fdznames,sum(case when signstate=0 then 1 else 0 end) as internet,sum(case when signstate=1 then 1 else 0 end) as paper"
strSql=strSql+" from stusignsys as stu,fdzlist as fdz,studykindlist as st"
strSql=strSql+" where stu.studykindID=st.studykindID"
strSql=strSql+" and fdz.fdzname='" & fdzname & "' and stu.stu_level='" & stu_level & "' and stu.signdate between '" & SYear & "' and '" & EYear & "'"
strSql=strSql+" group by st.studykind,fdz.fdzname"
response.Write strSql
response.Write "你好"
response.Write rs("number")
rs.Open strSql,conn,1,1
%>
<tr>
<%do while not rs.eof %>
<td style="width: 95px"><%=rs("fdznames") %></td>
<td><%=rs("number") %></td>
<td><%=rs("internet") %></td>
<td><%=rs("paper") %></td>
<td style="width: 82px"><%=rs("number") %></td>
<td style="width: 77px"><%=rs("number") %></td>
<td style="width: 81px"><%=rs("number") %></td>
<td style="width: 69px"><%=rs("number") %></td>
<td style="width: 68px"><%=rs("number") %></td>
<%
rs.MoveNext
loop
%>
</tr>
数据怎么没有显示出来?