
ASP调用过程时出错了,说是调用子过程时不能使用括号?
ASP调用过程时出错了,说是调用子过程时不能使用括号?去掉括号出现错误:"NaN"提示.代码如下:<%subGHL_Newinfo(ntype,listnum,zinum...
ASP调用过程时出错了,说是调用子过程时不能使用括号?去掉括号出现错误:"NaN"提示.
代码如下:
<%
sub GHL_Newinfo(ntype,listnum,zinum,listpic)
%>
<table width="219" cellspacing="0" cellpadding="0">
<%
'response.Write(listnum)
'response.End()
dim sql,rs
sql="select top "&listnum&" from webInfo where ntype="&ntype
set rs=server.CreateObject("ADODB.RecordSet")
rs.open sql,conn,1,1
if rs.bof and rs.eof then
response.Write("没有信息!")
end if
do while not rs.eof
%>
<tr bgcolor="EDF5FB" class="kuan">
<td height="22">
<%if listpic=true then%>
·
<%end if%>
<a href="#" class="z"> <%=gotTopic(rs("title"),zinum)%></a> </td>
</tr>
<%
rs.movenext
loop
%>
</table>
调用时代码:
<%call GHL_Newinfo(1,20,13,false)%> 展开
代码如下:
<%
sub GHL_Newinfo(ntype,listnum,zinum,listpic)
%>
<table width="219" cellspacing="0" cellpadding="0">
<%
'response.Write(listnum)
'response.End()
dim sql,rs
sql="select top "&listnum&" from webInfo where ntype="&ntype
set rs=server.CreateObject("ADODB.RecordSet")
rs.open sql,conn,1,1
if rs.bof and rs.eof then
response.Write("没有信息!")
end if
do while not rs.eof
%>
<tr bgcolor="EDF5FB" class="kuan">
<td height="22">
<%if listpic=true then%>
·
<%end if%>
<a href="#" class="z"> <%=gotTopic(rs("title"),zinum)%></a> </td>
</tr>
<%
rs.movenext
loop
%>
</table>
调用时代码:
<%call GHL_Newinfo(1,20,13,false)%> 展开
1个回答
展开全部
<%call GHL_Newinfo(1,20,13,false)%>的
false
换成0看看
false
换成0看看
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询