读书人

ASP 一个table里分条件插入查询语句是

发布时间: 2012-06-08 12:55:24 作者: rapoo

ASP 一个table里分条件插入查询语句是否算严重语法错误?求助~
因为画了一个表格,要根据不同的条件把数据显示出来,所以我就这么写了。但是好像是语法错误,我不知道要怎么改。求助~



<table width="48%" border="1" align="left" cellpadding="0" cellSpacing="0" bordercolor="#000000" class="tbsub">
<tr>
<td height="33" colspan="11"><div align="center"><strong>应收账款</strong></div></td>
</tr>
<tr style="line-height:27px">
<td width="11%">余额末期</td>
<td width="12%">打勾确认</td>
<td width="17%">日期</td>
<td width="15%">单据号</td>
<td width="16%">摘要</td>
<td width="15%">借方</td>
<td width="14%">贷方</td>
</tr>
<%
Sql = "Select * from tsupplier_dzd where DZDType='期末余额' and DZDCode = " & DZDCode & " order by BUDAT"
Set Rs = DBConn.Execute(Sql)
i = 1
Do While Not Rs.Eof
%>
<tr>
<td height="28"><Font Size="3"> </Font></td>
<td ><%if ISZERO=1 then%> <input name="ISZERO" type="checkbox" value="" checked>
<%else%> <input name="ISZERO" type="checkbox" value="" >
<%end if%></td>
<td><Font Size="3"><%=Rs("BUDAT")%></Font></td>
<td><Font Size="3"><%=Rs("SupplierDZDCode")%> </Font></td>
<td><Font Size="3"><%=Rs("SGTXT")%> </Font></td>
<td><Font Size="3"><%=Rs("SKZG")%> </Font></td>
<td><Font Size="3"><%=Rs("HKZG")%> </Font></td>
</tr>
<tr>
<td><Font Size="3">未达账项</Font></td>
<td height="33" colspan="11"><div align="center"><strong>前期未处理差异</strong></div></td>
</tr>
<%
Sql = "Select * from tsupplier_dzd where DZDType='前期未处理差异' and DZDCode = " & DZDCode & " order by BUDAT"
Set Rs = DBConn.Execute(Sql)
i = 1
Do While Not Rs.Eof
%>
<tr>
<td height="26"> </td>
<td ><%if ISZERO=1 then%> <input name="ISZERO" type="checkbox" value="" checked>
<%else%> <input name="ISZERO" type="checkbox" value="" >
<%end if%></td>
<td><Font Size="3"><%=Rs("BUDAT")%></Font></td>
<td><Font Size="3"><%=Rs("SupplierDZDCode")%> </Font></td>
<td><Font Size="3"><%=Rs("SGTXT")%> </Font></td>
<td><Font Size="3"><%=Rs("SKZG")%> </Font></td>
<td><Font Size="3"><%=Rs("HKZG")%> </Font></td>
</tr>
<tr>
<td height="28"> </td>
<td>小计:</td>
<td><Font Size="3"> </Font></td>
<td><Font Size="3">  </Font></td>
<td><Font Size="3">  </Font></td>


<td><Font Size="3">  </Font></td>
<td><Font Size="3"><%=Rs("HSJE")%> </Font></td>
</tr>
<tr>
<td height="25"> </td>
<td height="33" colspan="11"><div align="center"><strong>本期发生</strong></div></td>
</tr>
<%
Sql = "Select * from tsupplier_dzd where DZDType='本期发生额' and DZDCode = " & DZDCode & " order by BUDAT"

'response.write Sql
Set Rs = DBConn.Execute(Sql)
i = 1
Do While Not Rs.Eof
%>
<tr>
<td height="25"> </td>
<td ><%if ISZERO=1 then%> <input name="ISZERO" type="checkbox" value="" checked>
<%else%> <input name="ISZERO" type="checkbox" value="" >
<%end if%></td>
<td><Font Size="3"><%=Rs("BUDAT")%></Font></td>
<td><Font Size="3"><%=Rs("SupplierDZDCode")%> </Font></td>
<td><Font Size="3"><%=Rs("SGTXT")%> </Font></td>
<td><Font Size="3"><%=Rs("SKZG")%> </Font></td>
<td><Font Size="3"><%=Rs("HKZG")%> </Font></td>
</tr>
<tr>
<td height="28"> </td>
<td>小计:</td>
<td><Font Size="3"> </Font></td>
<td><Font Size="3">  </Font></td>
<td><Font Size="3">  </Font></td>
<td><Font Size="3">  </Font></td>
<td><Font Size="3"><%=Rs("HSJE")%> </Font></td>
</tr>
<tr>
<td height="28">调整</td>
<td> </td>
<td><Font Size="3"> </Font></td>
<td><Font Size="3">  </Font></td>
<td><Font Size="3">  </Font></td>
<td><Font Size="3">  </Font></td>
<td><Font Size="3"><%=Rs("HSJE")%> </Font></td>
</tr>
<tr>
<td height="22"><Font Size="3"> 余额 </Font></td>
<%
ZWRBTR=round(cdbl(YHSJE)+cdbl(HSZRJE)+cdbl(HSJEWC),2)
%>
<td><input name="ZWRBTR" type="text" value="<%=ZWRBTR%>" size="10" maxlength="13" style="background:#E6EEFF" readonly></td>
<td><Font Size="3">  </Font></td>
<td> </td>
<td><Font Size="3">  </Font></td>
<td><Font Size="3">调整后余额 </Font></td>
<td><Font Size="3">  </Font></td>
</tr>

</table>

[解决办法]
浏览器 http友好 去掉
------解决方案--------------------


你没有显示 500 错误详细信息么~~ 额~~ IIS默认的都是被改过的错误页面了~ 最好是你把500的详细错误信息弄出来,这样就一目了然了~~ 度娘 500.100.asp吧

读书人网 >ASP

热点推荐