ASP中ACCESS查询同字段的两个值
表是AA,字段是XMDACJID姓名(xm)时间(da)成绩(cj)1张三2007-4-2972李四2008-4-2993张三2008-3-6914王六2009-2-96...
表是AA,字段是XM DA CJ
ID 姓名(xm) 时间(da) 成绩(cj)
1 张三 2007-4-2 97
2 李四 2008-4-2 99
3 张三 2008-3-6 91
4 王六 2009-2-9 60
5 张七 2008-3-4 84
.....
我要列出连续两年成绩90分以上的人...
要怎么写呀..
急. 展开
ID 姓名(xm) 时间(da) 成绩(cj)
1 张三 2007-4-2 97
2 李四 2008-4-2 99
3 张三 2008-3-6 91
4 王六 2009-2-9 60
5 张七 2008-3-4 84
.....
我要列出连续两年成绩90分以上的人...
要怎么写呀..
急. 展开
1个回答
展开全部
<% '用双重循环语句.
'====================================省略
set rst=server.createobject("adodb.recordset")
sql="select [xm],[cj] from AA order by id"
rst.open sql,conn,1,1
if not(rst.bof and rst.eof) then
do while not rst.eof
xm=rst("xm")
set rs=server.createobject("adodb.recordset")
sql="select [xm],[cj] from AA where xm='" & xm & "'"
rs.open sql,conn,1,1
do while not rs.eof
if rs("cj") >= 90 then
t=t+1
end if
loop
if t>=2 then
Response.Write(rst("xm")) '列出成绩大于90两次以上的人名
end if
loop
else
Response.Write("没有任何人")
end if
'======================================省略
%>
'====================================省略
set rst=server.createobject("adodb.recordset")
sql="select [xm],[cj] from AA order by id"
rst.open sql,conn,1,1
if not(rst.bof and rst.eof) then
do while not rst.eof
xm=rst("xm")
set rs=server.createobject("adodb.recordset")
sql="select [xm],[cj] from AA where xm='" & xm & "'"
rs.open sql,conn,1,1
do while not rs.eof
if rs("cj") >= 90 then
t=t+1
end if
loop
if t>=2 then
Response.Write(rst("xm")) '列出成绩大于90两次以上的人名
end if
loop
else
Response.Write("没有任何人")
end if
'======================================省略
%>
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询