2.8w+
社区成员
怎样让记录两列后自动转入下一行?
怎样让记录两列后自动转入下一行?下面是这页的代码:
<!--#include file="../include/bkconn.asp"-->
<%
dim rs,sql
dim page,maxPerPage
maxPerPage=18 '每页显示的记录数
page=Request("page")
if (page="" or isempty(page)) then page=1
thisUrl="seccessList.asp?true=1"
session("adminOldUrl")=thisUrl&"&page="&page
set rs=server.createobject("adodb.recordset")
sql="select * from faq where 1=1"
sql=sql&" order by id desc"
'response.write sql
'response.End
rs.open sql,conn,1,1
rs.pagesize=MaxPerPage
%>
<html>
<head>
<title>案例</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../main.css" type="text/css">
<script language=Javascript>
<!--
function jumpTo(i){
if(i==1){
this.document.location="<%=thisUrl%>";}
if(i==2){
this.document.location="<%=thisUrl%>&page=<%=page-1%>";}
if(i==3){
this.document.location="<%=thisUrl%>&page=<%=page+1%>";}
if(i==4){
this.document.location="<%=thisUrl%>&page=<%=rs.pageCount%>";}
}
function deleteMe(i){
if (confirm("确定删除？可是恢复不了的啊。")==1){
window.location="saveFaqDel.asp?id="+i;
}
}
//-->
</script>
</head>
<body text="#000000" leftmargin="0" topmargin="0">
<div align="center"><br>
</div>
<div align="center">
<table width="100%" border="0" cellspacing="0" cellpadding="2">
<tr>
<form method="post" action="newsList.asp" name="form1">
<td colspan="2">
<div align="center">
<div align="center">
<table cellSpacing="0" cellPadding="5" width="100%" bgColor="#ffffff" border="0">
<tr>
<td class="news_date" align="middle" width="100%" colSpan="2">
<b><font color="#000080">部分客户单位名称</font><font color="#d9d9d9">(排名不分先后)</font></b></td>
</tr>
</table>
</div>
</div>
</td>
</form>
</tr>
<tr>
<td width="50%" >
<div align="left"><b>客户名称</b></div>
</td>
<td width="50%" >
</td>
</tr>
<%
dim rsID
i=1
if not (rs.eof or err) then rs.move (page-1)*maxPerPage
do while not (rs.eof or err)
rsID=rs("id")
%>
<tr>
<td width="488" title="成功案例">· <%=rs("question")%> </td>
<td width="489">
</td>
</tr>
<%
i=i+1
if i>maxPerPage then exit do
rs.moveNext
loop
%>
<tr>
<td colspan="2">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="12%">
</td>
<td width="88%">
<div align="right"><%=rs.recordCount%>项 第<%=page%>/<%=rs.pageCount%> 页
<%if page>1 then%>
<input type="button" name="Submit3" value="首页" onClick="Javascript:jumpTo(1)">
<input type="submit" name="Submit4" value="上页" onClick="Javascript:jumpTo(2)">
<%else%>
<input type="button" name="Submit3" value="首页" disabled>
<input type="submit" name="Submit4" value="上页" disabled>
<%end if
if rs.recordCount>page*maxPerPage then%>
<input type="submit" name="Submit5" value="下页" onClick="Javascript:jumpTo(3)">
<input type="submit" name="Submit6" value="末页" onClick="Javascript:jumpTo(4)">
<%else%>
<input type="submit" name="Submit5" value="下页" disabled>
<input type="submit" name="Submit6" value="末页" disabled>
<%end if%>
</div>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
</body>
</html>
<!--#include file="../include/bkconn.asp"-->
<%
dim rs,sql
dim page,maxPerPage
maxPerPage=18 '每页显示的记录数
page=Request("page")
if (page="" or isempty(page)) then page=1
thisUrl="seccessList.asp?true=1"
session("adminOldUrl")=thisUrl&"&page="&page
set rs=server.createobject("adodb.recordset")
sql="select * from faq where 1=1"
sql=sql&" order by id desc"
'response.write sql
'response.End
rs.open sql,conn,1,1
rs.pagesize=MaxPerPage
%>
<html>
<head>
<title>案例</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../main.css" type="text/css">
<script language=Javascript>
<!--
function jumpTo(i){
if(i==1){
this.document.location="<%=thisUrl%>";}
if(i==2){
this.document.location="<%=thisUrl%>&page=<%=page-1%>";}
if(i==3){
this.document.location="<%=thisUrl%>&page=<%=page+1%>";}
if(i==4){
this.document.location="<%=thisUrl%>&page=<%=rs.pageCount%>";}
}
function deleteMe(i){
if (confirm("确定删除？可是恢复不了的啊。")==1){
window.location="saveFaqDel.asp?id="+i;
}
}
//-->
</script>
</head>
<body text="#000000" leftmargin="0" topmargin="0">
<div align="center"><br>
</div>
<div align="center">
<table width="100%" border="0" cellspacing="0" cellpadding="2">
<tr>
<form method="post" action="newsList.asp" name="form1">
<td colspan="2">
<div align="center">
<div align="center">
<table cellSpacing="0" cellPadding="5" width="100%" bgColor="#ffffff" border="0">
<tr>
<td class="news_date" align="middle" width="100%" colSpan="2">
<b><font color="#000080">部分客户单位名称</font><font color="#d9d9d9">(排名不分先后)</font></b></td>
</tr>
</table>
</div>
</div>
</td>
</form>
</tr>
<tr>
<td width="50%" >
<div align="left"><b>客户名称</b></div>
</td>
<td width="50%" >
</td>
</tr>
<%
dim rsID
i=1
if not (rs.eof or err) then rs.move (page-1)*maxPerPage
do while not (rs.eof or err)
rsID=rs("id")
%>
<tr>
<td width="488" title="成功案例">· <%=rs("question")%> </td>
<td width="489">
</td>
</tr>
<%
i=i+1
if i>maxPerPage then exit do
rs.moveNext
loop
%>
<tr>
<td colspan="2">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="12%">
</td>
<td width="88%">
<div align="right"><%=rs.recordCount%>项 第<%=page%>/<%=rs.pageCount%> 页
<%if page>1 then%>
<input type="button" name="Submit3" value="首页" onClick="Javascript:jumpTo(1)">
<input type="submit" name="Submit4" value="上页" onClick="Javascript:jumpTo(2)">
<%else%>
<input type="button" name="Submit3" value="首页" disabled>
<input type="submit" name="Submit4" value="上页" disabled>
<%end if
if rs.recordCount>page*maxPerPage then%>
<input type="submit" name="Submit5" value="下页" onClick="Javascript:jumpTo(3)">
<input type="submit" name="Submit6" value="末页" onClick="Javascript:jumpTo(4)">
<%else%>
<input type="submit" name="Submit5" value="下页" disabled>
<input type="submit" name="Submit6" value="末页" disabled>
<%end if%>
</div>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
</body>
</html>
...全文
当前发帖距今超过3年，不再开放新的回复
发表回复
wenxiuyun10000 2004-08-09
这句要加到哪里?
孟子E章 2004-08-08
i=0
While not rs.EOF
Response.Write rs(0)
if i Mod 2 = 0 Then Response.Write "<br>"
i = i+1
Rs.MoveNext
Wend
While not rs.EOF
Response.Write rs(0)
if i Mod 2 = 0 Then Response.Write "<br>"
i = i+1
Rs.MoveNext
Wend
cdsun 2004-08-08
你的意图是什么
我不大明白你的意思哦
是不是标题长了你让他转行？
我不大明白你的意思哦
是不是标题长了你让他转行？
db2数据的转入转出 这样导出的结果与ASC格式的文件非常类似，只是每一行的前后多出了一对双引号，对此我们可以使用文本工具（如写字板、记事本等）把双引号删除掉，也可以置之不理，在以后导入的时候直接控制格式（忽略双引号） ...
传智博客(JavaWeb方面的所有知识)听课记录(经典) 一、 JavaWeb基础 第一天： 1．Eclipse详解： (1).Bad versionnumber in .class file：编译器版本和运行(JRE)版本不符合。高的JRE版本兼容低版本的编译器版本。 (2).当程序有错误的时候，使用...
Java8 面试基础知识宝典【主要以问题的形式记录，SE，EE，锁机制，框架，数据库等】 Q17：讲一讲组合模式 Q18：讲一讲享元模式 Q19：讲一讲策略模式 Q20：讲一讲模板方法模式 Q21：讲一讲观察者模式 Q22：讲一讲迭代器模式 Q23：讲一讲责任链模式 Q24：讲一讲命令模式 Q25：讲一讲备忘录模式 Q26：讲...
JAVA 面试题 合辑（一） JAVA 面试题 合辑（一）https://blog.csdn.net/haponchang/article/details/92741553 JAVA 面试题 合辑（二）https://blog.csdn.net/haponchang/article/details/92829739 JAVA 面试题 合辑（三）...
Linux下Shell常用命令与工具 # cat > a.txt << eof \> 123 \> abc \> eof 5、tac 功能：连接文件和倒序打印文件 常用选项： 示例： 倒序打印每一行： [root@ chenc01 ~]# tac a.txt 6 、rev 功能：反向打印每一行 常用选项： 示例： [root@ chen...
Java中的多线程【一篇就够】 转载请注明出处http://blog.csdn.net/evankaka 写在前面的话：此文只能说是java多线程的一个入门，其实Java里头线程完全可以写一本书了，但是如果最基本的你都学掌握好，又怎么能更上一个台阶呢？如果你觉得此文很...
经典笔试面试题总结(一) C、每个类都必须有一个拷贝初始化构造函数，如果类中没有说明拷贝构造函数，则编译器系统会自动生成一个缺省拷贝构造函数，作为该类的保护成员 D 、拷贝初始化构造函数的作用是将一个已知对象的数据成员值拷贝给...
第一章 | 加州房价数据集 | 端到端的机器学习 | 回归问题 | tensorflow2.6+sklearn | 学习笔记 选择加州房价数据集，基于1990年加州人口普查的数据，出于教学的目的，添加了一个分类属性，并且移除了一些特征。 模型需要从这个数据中学习，从而能够根据所有其他指标，预测任意区域的房价中位数 2. 数据集展示 ...
NPOI使用手册 的兄弟表示感谢，让我们共同完善 NPOI 。 前一节中我们讲解了如何创建一个新的 Workbook ，但在此过程中大家也许会发现一个细节，这些文件没有包括 DocummentSummaryInformation 和 ...
来吧！带你玩转 Excel VBA 下一个单元格： Next89 4.3.6 屏幕坐标下的单元格： RangeFromPoint89 4.3.7 选区： Selection 、 RangeSelection90 4.3.8 已用区域： UsedRange92 4.3.9 当前区域： CurrentRegion94 ...
BAT机器学习面试1000题系列（第1~305题） 本系列会尽量让考察同一个部分（比如同是模型/算法相关的）、同一个方向（比如同是属于最优化的算法）的题整理到一块，为的是让大家做到举一反三、构建完整知识体系，在准备笔试面试的过程中，通过懂一题懂一片。...
来吧 带你玩转 Excel VBA 下一个单元格： Next89 4.3.6 屏幕坐标下的单元格： RangeFromPoint89 4.3.7 选区： Selection 、 RangeSelection90 4.3.8 已用区域： UsedRange92 4.3.9 当前区域： CurrentRegion94 4.3.10 当前数组区域： Current...
Linux系统命令与网络、磁盘参数和日志监控 C/C++Linux服务器开发/后台架构师知识体系整理 C/C++Linux服务器开发/后台架构师视频学习地址 Linux服务器开发/后台架构师学习群：960994558 1 基础命令和工具 grep搜索字符 grep 命令用于在文件中执行...打印匹配行
微软面试题 1、求函数返回值，输入x=9999;intfunc(x){intcountx=0;while(x){countx++;x=x&(x-1);}returncountx;}【试题解析】解这道题的时候，如果拿出一个二进制数来分析就会容易的多了，x=x&(x-1)实际...
运维面试题 运维面试题 NETWORK 1 请描述TCP/IP协议中主机与主机之间通信的三要素 ...2 请描述IP地址的分类及每一类的范围 参考答案 A类1-26 B类128-191 C类192-223 D类224-239组播(多播) E类240-254科研 3 请描述A、B...
秋招面试题总结 1、Hashmap是怎么实现的，底层原理？ HashMap的底层使用数组+链表/红黑树实现。 transient Node<K,V>[] table;这表示HashMap是Node数组构成，其中Node类的实现如下，可以看出这其实就是个链表，链表...
