Error en un IF

[JaviM]

Hola,estoy intentando comparar el resultado de 2 sentencias SQL con tal de mostrarlas en una tabla y que me cambien los colores de las celdas en función del resultado de la comparación,lo que pasa es que me da error,aqui os pongo parte del codigo:

'recogo datos de un combo
var250=request.form("lala")
var251=request.form("lala1")
SQL = "SELECT * FROM tabla WHERE corredor = '" & var250 & "' AND carrera IN (SELECT carrera FROM tabla WHERE corredor = '" & var251 & "') ORDER BY Fecha"
rs250.Open SQL, cn250, 3, 3
While not rs250.EOF
Set rs251 = Server.CreateObject ("ADODB.RecordSet")
var2501=request.form("lala")
var2511=request.form("lala1")
SQL1 = "SELECT * FROM tabla WHERE corredor = '" & var2511 & "' AND carrera IN (SELECT carrera FROM tabla WHERE corredor = '" & var2501 & "') ORDER BY Fecha"
rs251.Open SQL1, cn250, 3, 3
While not rs251.EOF
Dim color,color1,tabla1,tabla,A,B
If rs250("Pos")="DNF" then
rs250("Pos")=110
'con esto quiero pasar el texto que aparece en la tabla a una constante en este caso 110 para conseguir un numero con el que comparar
ElseIf rs250("Pos")="DNS" THEN
rs250("Pos")=140
ElseIf rs250("Pos")="DQ" THEN
rs250("Pos")=120
ElseIf rs250("Pos")="NC" THEN
rs250("Pos")=100
ElseIf rs250("Pos")="DNQ" THEN
rs250("Pos")=130
ElseIf rs250("Pos")="DNA" THEN
rs250("Pos")=160
ElseIf rs250("Pos")="WD" THEN
rs250("Pos")=150

If rs251("Pos")="DNF" THEN
rs251("Pos")=110
ElseIf rs251("Pos")="DNS" THEN
rs251("Pos")=140
ElseIf rs251("Pos")="DQ" THEN
rs251("Pos")=120
ElseIf rs251("Pos")="NC" THEN
rs251("Pos")=100
ElseIf rs251("Pos")="DNQ" THEN
rs251("Pos")=130
ElseIf rs251("Pos")="DNA" THEN
rs251("Pos")=160
ElseIf rs251("Pos")="WD" THEN
rs251("Pos")=150
A=CInt(rs250("Pos"))
B=CInt(rs251("Pos"))
If (A<B) THEN
tabla="#990000"
color="#FFFFFF"
else
tabla="#CCCCCC"
color="#000000"
%>

despues en la tabla hago los tipicos <%=tabla> y <%=color>

y finalmente cierro con

<% End If
End If
End If
End If
End If
rs250.MoveNext
rs251.MoveNext
Wend
Wend
rs250.close
rs251.close
Set rs250 = Nothing
Set rs251 = Nothing
cn250.Close
Set cn250 = Nothing
%>


el error me lo da en esta linea
If rs250("Pos")="DNF" then <------es decir la primera dentro de los If

cualquier ayuda será bienvenida
un saludo