Problema con Recordset.Fields()

[sPaRcO]

Hola, haber si alguien me ayuda por favor,

Do While (AdoJugadores.Recordset.EOF = False)
If (AdoJugadores.Recordset.Fields(0) = txtCod_equipo2.Text)And (AdoJugadores.Recordset.Fields(1) = txtN_dorsal2.Text) Then
MsgBox "Ya existe un jugador con ese dorsal", vbCritical, "Error"
End If
AdoJugadores.Recordset.MoveNext
Loop

Resulta que al ejecutar el programa, nunca entra en el if. Supongo que será porque AdoJugadores.Recordset.Fields(0) e idem(1) son de tipo entero y txtCod_equipo2.text y txtN_dorsal2.text son de tipo carácter.

¿¿Cómo lo puedo solucionar??? Muchas gracias!!!

[sPaRcO]

Puede ser con un Cint(txtCod_equipo2.text) ??? Para pasar de texto a entero?

[hernanmdq]

Código:

Do While Not AdoJugadores.Recordset.EOF
            If (AdoJugadores.Recordset.Fields(0).value = Val(txtCod_equipo2.Text))And (AdoJugadores.Recordset.Fields(1).value = val(txtN_dorsal2.Text)) Then
                   MsgBox "Ya existe un jugador con ese dorsal", vbCritical, "Error"
            End If
            AdoJugadores.Recordset.MoveNext
Loop

Val si son enteros y Csgn si son decimales. Salu2