|
|
|
|
 |
|
채영이 / 2001-10-21 / 오후 8:21:18 / 203.255.3.190
조회수 : 134
|
| [질문] 도와 주세요. |
> 아랫글 3625 남겼었는데 도와 주세요.
>
> db(액세스)의 scores 테이블에서 점수필드를 불러와
> 점수가 높은 순서대로 번호를 매겨 순위를 정했는데
> 그만 동점자 처리가 되지가 않네요.
>
> 점수가 같을경우 순위를 같게 하고 그 다음 점수자에게는
> 동점자 많큼 순위가 뒤로 밀리게 하고 싶은데 어떻게
> 해야할지 모르겠어요.
>
> 예)
> 학번: A01, A02, A03, A04, ...
> 점수: 90,80,80,70, ...
> 순위: 1등,2등,2등,4등, ...
>
> <%
> Set Conn = Server.CreateObject("ADODB.Connection")
> Conn.Open "ASPCBT"
> SQL3 = "SELECT * FROM scores ORDER BY 점수 DESC"
> Set RS = Conn.Execute (SQL3)
>
> rank = 0
> %>
> <table width=200 border=1>
> <td align=center width=50 BGCOLOR=#800000>
> <FONT COLOR=#ffffff SIZE=2><b>등 수</b></font></td>
> <td align=center width=100 BGCOLOR=#800000>
> <FONT COLOR=#ffffff SIZE=2><b>이 름</b></font>
> <td align=center width=50 BGCOLOR=#800000>
> <FONT COLOR=#ffffff SIZE=2><b>점 수</b></font>
> </td></tr>
>
> <%
> do until rs.eof
> response.write "<tr>"
> rank = rank + 1
>
> response.write "<td align=center>" & rank & "</td>"
> response.write "<td align=center>" & rs("이름") & "</td>"
> response.write "<td align=center>" & rs("점수") & "</td>"
>
> rs.movenext
>
> response.write "</tr>"
> loop
> response.write "</table>"
>
> %>
-----------------------------------------------------------
점수를 비교해서 이전 점수와 다를때만 등수를 올리면 되겠죠...
previousScore = -1
do until rs.eof
response.write "<tr>"
nowScore=CInt(rs("점수"))
if previousScore <> nowScore then
nowRank = rank + 1
end if
rank = rank + 1
response.write "<td align=center>" & nowRank & "</td>"
response.write "<td align=center>" & rs("이름") & "</td>"
response.write "<td align=center>" & rs("점수") & "</td>"
previousScore = nowScore
rs.movenext
response.write "</tr>"
loop
그럼....
|
|
|
|