2.8w+
社区成员
请各位帮忙一下~~
<!--#include file="conn.asp"-->
<head>
<title>修改总页面</title>
<head>
<body>
<p>
<%
dim page_size,catid,cat
set rs=server.CreateObject("Adodb.recordset")
sql="select * from news order by id desc"
rs.open sql,conn,1,1
%>
<%if rs.eof or rs.bof then%>
</p>
<table width="710" border="0" align="center" >
<tr>
<td height="50" colspan="6" align="center" ><font size="30" color="#CCCC333">对不起，没有相关的信息！</font><a href="admin.asp ">点击返回管理首页</a></td>
</tr>
</table>
<%else%>
<p> </p>
<h1 align="center"><font color="#663399" >新闻修改总页面</font></h1>
<table width="651" height="141" border="1" align="center" cellspacing="0" bordercolor="#FF9933">
<tr>
<th width="48" height="37" scope="col">编号</th>
<th width="224" scope="col">标题</th>
<th width="237" scope="col">录入日期</th>
<th width="67" scope="col">修改</th>
</tr>
<%
if not rs.bof and not rs.eof then
dim page_zise,page_now,page_total
page_size=20
if request.QueryString("page_now")="" then
page_now=1
else
page_now=cint(request.QueryString("page_now"))
end if
rs.pagesize=page_size
page_total=rs.pagecount
rs.absolutepage=page_now
dim i
i=page_size
do while not rs.eof and i>0
i=i-1
%>
<tr>
<td align="center"><%=rs("id")%></td>
<td align="center"><%=rs("title")%></td>
<td align="center"><%=rs("dd")%></td>
<td align="center"><a href="xgnewadd.asp?id=<%=rs("id")%>">修改</a></td>
</tr>
<tr>
<td colspan="4" align="center">共有<%=rs.recordcount%></span>个新闻 每页<span class="red"><%=page_size%></span>个 页码:<%=page_now%>/<span class="style2"><%=rs.pagecount%></td>
</tr>
</table>
<%end if%>
</body>
</html>
调试时说:
缺少语句
/xgnew.asp, line 69
end if
但是最后我不是有一个<%END IF%>了吗?不是完了吗?怎么还是说没有完成呢?
<head>
<title>修改总页面</title>
<head>
<body>
<p>
<%
dim page_size,catid,cat
set rs=server.CreateObject("Adodb.recordset")
sql="select * from news order by id desc"
rs.open sql,conn,1,1
%>
<%if rs.eof or rs.bof then%>
</p>
<table width="710" border="0" align="center" >
<tr>
<td height="50" colspan="6" align="center" ><font size="30" color="#CCCC333">对不起，没有相关的信息！</font><a href="admin.asp ">点击返回管理首页</a></td>
</tr>
</table>
<%else%>
<p> </p>
<h1 align="center"><font color="#663399" >新闻修改总页面</font></h1>
<table width="651" height="141" border="1" align="center" cellspacing="0" bordercolor="#FF9933">
<tr>
<th width="48" height="37" scope="col">编号</th>
<th width="224" scope="col">标题</th>
<th width="237" scope="col">录入日期</th>
<th width="67" scope="col">修改</th>
</tr>
<%
if not rs.bof and not rs.eof then
dim page_zise,page_now,page_total
page_size=20
if request.QueryString("page_now")="" then
page_now=1
else
page_now=cint(request.QueryString("page_now"))
end if
rs.pagesize=page_size
page_total=rs.pagecount
rs.absolutepage=page_now
dim i
i=page_size
do while not rs.eof and i>0
i=i-1
%>
<tr>
<td align="center"><%=rs("id")%></td>
<td align="center"><%=rs("title")%></td>
<td align="center"><%=rs("dd")%></td>
<td align="center"><a href="xgnewadd.asp?id=<%=rs("id")%>">修改</a></td>
</tr>
<tr>
<td colspan="4" align="center">共有<%=rs.recordcount%></span>个新闻 每页<span class="red"><%=page_size%></span>个 页码:<%=page_now%>/<span class="style2"><%=rs.pagecount%></td>
</tr>
</table>
<%end if%>
</body>
</html>
调试时说:
缺少语句
/xgnew.asp, line 69
end if
但是最后我不是有一个<%END IF%>了吗?不是完了吗?怎么还是说没有完成呢?
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
kikomao123 2008-04-21
送点分
No_Data_Found 2008-04-19
总结经验 吸取教训 避免再次出现类似问题
No_Data_Found 2008-04-19
ok了 就结贴吧
kikomao123 2008-04-19
呵呵,OK了
求各位大神帮忙 使用c#编写模拟银行AMT存取款机的控制台程序，实现以下功能 1.注册 a)输入账号 b)输入密码 c)重复密码 d)验证密码账号是否符合规范，验证两次输入是否一致，给...2.登录 ...3.主界面可以选择以下功能 a)查询余额 ...a)用户自
各位大侠帮忙答下~~~~填空 各位大侠帮忙答下~~~~填空 Delphi / Windows SDK/APIhttp://www.delphi2007.net/DelphiBase/html/delphi_20061208133825223.html 某程序中有如下的对窗口fmXX的操作 if not Assigned(fmXX) then ...
关于应付款问题，请各位大侠帮忙，谢谢！~ 关于应付款问题，请各位大侠帮忙，谢谢！~ Delphi / Windows SDK/API... 在下正在做一个进销存系统，因为是第一次做进销存系统，所以有个问题，一直搞不清楚，请各位大侠帮忙； 问题1：应付款模块分析，大家说说看；...
求助！！请大神帮忙~~Pyinstaller将python程序打包成exe之后无法正确执行 目前遇到一个问题，但查不出原因在哪，请各位大神帮忙： 我简单写了一个python的程序，目的是监测VPN的连接状态，当VPN出现中断时，就发送邮件。代码如下： import smtplib #smtp服务器 from email.mime.text ...
ajax status 12030,xmlHttp.Status的状态值是12030！~~各位兄台请帮忙解决一下！！~ //在这测试的值是12030，各位兄台能否帮一下！~~ if (xmlObj.status==200) { if (xmlObj.responseText == "Ok") { location.href = 'Index.aspx'; } else { alert(xmlObj.responseText); } } } } xmlObj.send(param)...
进销存管理系统调试故障请各位帮忙解决 我是一个VBA新手，昐各位能帮忙解决！，在下感激不尽！！！ 进销存管理系统：用户名：Administrtor 密码：admin 现在遇到下面的这些问题： 1、权限管理调试有问题。 2、出库统计调试也出问题。 3、能不能再添加一个...
LeetCode刷题（109）～整数的各位积和之差 给你一个整数 n，请你帮忙计算并返回该整数「各位数字之积」与「各位数字之和」的差。 示例 1： 输入：n = 234 输出：15 解释： 各位数之积 = 2 * 3 * 4 = 24 各位数之和 = 2 + 3 + 4 = 9 结果 = 24 - 9 = 15 ...
搭建Keras模型出现了一个错误，希望各位大佬帮忙解答一下 搭建Keras模型出现了一个错误，希望各位大佬帮忙解答一下。 百度找了好久，没有一样的错误，类似的也解决不了。 [[{{node embedding_1/embedding_lookup}}]]`Train on 108 samples, validate on 12 samples model....
请各位高手帮忙解释两个实物电路 以上是一个遥控电动玩具车的遥控器电路板，请各位高手帮忙解释一下它的电路结构，最好能画出电路图，然后解释一下电路板上的元件都是什么元件、叫什么名字、有什么功能。 以上是遥控电动玩具车车上的电路控制...
Android面试题整理 然后可能使用Handler，没错，往主线程的消息池（Message Queue）发送消息，只有主线程的Handler可以分发处理它，广播发送的内容是一个Intent对象，我们可以直接用Message封装一下，留一个和sendBroadcast一样的接口...
