20日英文:do while 用法,帮帮看这段程序哪有问题,为什么重复列出第一条记录

来源:百度文库 编辑:查人人中国名人网 时间:2024/05/10 08:07:21
<!--#include file="conn.asp" -->
<!--#include file="top.asp"-->
<%dname=trim(session("dname"))%>
<html><meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>工作日志 >> 查看员工考核</title>
<link href="css/css.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body {
background-image: url(images/Inbg.gif);
}
.style5 {color: #990000}
-->
</style>
</head><body>

<center><table width="778" border=3 align="center" cellpadding="0" cellspacing="0" class="style5">
<tr>
<td>
<div align="center" style="font-weight: bold; color: #0000FF;">姓名
</div></td>
<td>
<div align="center" style="font-weight: bold; color: #0000FF;">岗位名称
</div></td>
<td>
<div align="center" style="font-weight: bold; color: #0000FF;">工作要求
</div></td>
<td>
<div align="center" style="font-weight: bold; color: #0000FF;">津贴基数
</div></td>
<td>
<div align="center" style="font-weight: bold; color: #0000FF;">创新
</div></td>
<td>
<div align="center" style="font-weight: bold; color: #0000FF;">奖励
</div></td>
<td>
<div align="center" style="font-weight: bold; color: #0000FF;">计算标准
</div></td>
<td width=20%>
<div align="center" style="font-weight: bold; color: #0000FF;">说明
</div></td>
</tr>
<%
set rs=Server.CreateObject("Adodb.recordset")
strsql="select * from work"
rs.Open strsql,conn,1,3
if rs.eof then
response.write"没查到"
response.end
else
name=rs("name")
gangwei=rs("gangwei")
zhize=rs("zhize")
yaoqiu=rs("yaoqiu")
jishu=rs("jishu")
chuangxin=rs("chuangxin")
jiangli=rs("jiangli")
biaozhun=rs("biaozhun")
shuoming=rs("shuoming")
dim i
i=0
do while not rs.eof
i=i+1
%>
<tr>
<td>
<div align="center" style="color: #000000"><%=name%>
</div></td>
<td>
<div align="center" style="color: #000000"><%=gangwei%>
</div></td>
<td>
<div align="center" style="color: #000000"><%=yaoqiu%>
</div></td>
<td>
<div align="center" style="color: #000000"><%=jishu%>
</div></td>
<td>
<div align="center" style="color: #000000"><%=chuangxin%>
</div></td>
<td>
<div align="center" style="color: #000000"><%=jiangli%>
</div></td>
<td>
<div align="center" style="color: #000000"><%=biaozhun%>
</div></td>
<td>
<div align="center" style="color: #000000"><%=shuoming%>
</div></td>
</tr>
<%
rs.movenext
loop
%>

</table>
</center>
<%end if%>
</body></html>
<!--#include file="end.asp" -->

晕,你的变量的值一直没有改变过啊!!
改正:

<%
set rs=Server.CreateObject("Adodb.recordset")
strsql="select * from work"
rs.Open strsql,conn,1,3
if rs.eof then
response.write"没查到"
response.end
else
dim i
i=0
do while not rs.eof
i=i+1
name=rs("name")
gangwei=rs("gangwei")
zhize=rs("zhize")
yaoqiu=rs("yaoqiu")
jishu=rs("jishu")
chuangxin=rs("chuangxin")
jiangli=rs("jiangli")
biaozhun=rs("biaozhun")
shuoming=rs("shuoming")
%>
<tr>
<td>
<div align="center" style="color: #000000"><%=name%>
</div></td>
<td>
<div align="center" style="color: #000000"><%=gangwei%>
</div></td>
<td>
<div align="center" style="color: #000000"><%=yaoqiu%>
</div></td>
<td>
<div align="center" style="color: #000000"><%=jishu%>
</div></td>
<td>
<div align="center" style="color: #000000"><%=chuangxin%>
</div></td>
<td>
<div align="center" style="color: #000000"><%=jiangli%>
</div></td>
<td>
<div align="center" style="color: #000000"><%=biaozhun%>
</div></td>
<td>
<div align="center" style="color: #000000"><%=shuoming%>
</div></td>
</tr>
<%
rs.movenext
loop
%>