ASP скрипт ПОлОжЕНИЕ/ранга на основе итогов

Question

код работает так, но если R1Tots в галстуке я хочу R1Tie, чтобы отразить это

<% 
Dim R1Tie 
Dim R1Tots 
R1Tots = (TLLB.Fields.Item("TotalSc").Value) 
R1Tie = record.count 
If R1Tots = R1Tots Then 
R1Tie = R1Tie + 1 
end if 
%> 

<%= R1Tie %> 

Пример из мне это нужно смотреть например

::Pos:: ::Name:: ::TotalScore:: 
:: 1 :: ::Joe :: ::100:: 
:: 2 :: ::Jane:: ::90:: 
:: 2 :: ::Jeff:: ::90:: 
:: 4 :: ::Chip:: ::80:: 
:: 5 :: :: Jeb:: ::75:: 

Answer 1

Это не может быть как классический ASP, так и ASP.net. Я предполагаю, что это классический ASP с VBScript, а не ASP.net с VB.net.

Предположительно, код, который вы предоставили, находится внутри цикла, который выполняет итерацию каждого результата. Я думаю, что вам нужно добавить 1 к значению позиции каждого цикла, а затем вычесть 1 из отображаемого значения, если есть связь. Я хотел бы сделать это:

dim R1Position, R1Totalscore 
R1Position = 0 

do while not rs.eof 
R1Position = (R1Position + 1) 
If rs("TotalSc") = R1Totalscore then 
    Response.write (R1Position - 1) & ":: ::" & rs("name") & ":: ::" & rs("TotalSc") & "::<br>" 
Else 
    Response.write R1Position & ":: ::" & rs("name") & ":: ::" & rs("TotalSc") & "::<br>" 
End If 
rs("TotalSc") = R1Totalscore 
rs.movenext 
loop 

Обратите внимание, что последняя строка в цикле присваивает текущее значение РСА («totalsc») в R1Totalscore, для того, чтобы это значение можно сравнить с новым значением в следующем итерация цикла.

Я понимаю, что это не сработает, если у каждого будет оценка нуля. Я предполагаю, что это не сценарий, о котором нам нужно беспокоиться.