为什么显示不出来???
飞扬残月 2004-05-06 05:40:32 <!--#include file="default.asp" --><table><tr><td><form method=post action=viewoldxxdepsql.asp name=form1 id=form1 >
</select></font>
选择查询日期段:<input type=text name=riqi1 id=riqi1 size=10 class="FormText" value=2004-4-15>—<input type=text name=riqi2 id=riqi2 size=10 class="FormText" value=<%=date()-1%>>
<input type=image src=images\search.gif class="FormText" ></form></td></tr></table><%
set conn=server.createobject("adodb.connection")
conn.open "provider=sqloledb.1;data source=myserver;"&_
"user id=sa;password=lili789;initial catalog=my2651"
'strCnn="driver={SQL Server};server=myserver;uid=sa;pwd=lili789;database=my2651;"
'set objCnn=server.CreateObject("ADODB.Connection")
'objCnn.OPen strCnn%>
<% dim riqi1,riqi2
riqi1=request.form("riqi1")
riqi2=request.form("riqi2")
sql = "SELECT f1,f2,sum(amount)/100 as y FROM taskview1 WHERE riqi>='"&riqi1&"' and riqi<='"&riqi2&"' group by f1,f2 "
set rs = server.createobject("adodb.recordset")
rs.open sql,conn,1,1
if rs.eof then
response.write"<center>查询结果:数据库中没有 <font color=blue> "&riqi1&" 到 "&riqi2&" 的销售记录</font> "
else
%> <%
sql1 = "SELECT f1,sum(premount) as pretotal FROM taskview2 WHERE riqi>='"&riqi1&"' and riqi<='"&riqi2&"' and f1="&rs("f1")&" group by f1 "
set rs1 = server.createobject("adodb.recordset")
rs1.open sql1,conn,1,1
%>
<table width=100% border="1"><tr>
<td bgcolor="#CCCCCC">部类</td>
<td bgcolor="#CCCCCC">部类描述</td>
<td bgcolor="#CCCCCC">销售金额</td>
<td bgcolor="#CCCCCC">计划任务</td>
<td bgcolor="#CCCCCC">销售完成率</td>
</tr><%do while not rs.eof%>
<tr> <td bgcolor="#CCCCCC"><%=rs("f1")%></td>
<td bgcolor="#CCCCCC"><%=rs("f2")%></td>
<td bgcolor="#CCCCCC"><%=rs("y")%></td>
<td bgcolor="#CCCCCC"><%=rs1("pretotal")%></td>
<td bgcolor="#CCCCCC"></td>
</tr>
<%
rs.movenext
loop
%></table><%end if%><%conn.close
set conn=nothing%>
为什么<%=rs1("pretotal")%>总是显示为零