Select

[Pilly]

Hola a todos.
Tengo un pequeño problema con un select que como uds. saben se debe prevenir cualquier tipo de ingreso al formulario por parte de los usuarios, por ejemplo si en este select se elige ----Listado---- a pesar de que este vale 0 me envia a una pantalla de error.

este es el select:

<select name="buscarc" class="cmb" id="buscarc">

<option value="0">---Listado---</option>
<%

DO WHILE NOT Tabla.Eof
apellidos = Tabla ("pn_apellidos")
nombres = Tabla ("pn_nombres")
codigo = Tabla ("pn_no_doc_identidad")
If (buscarc = codigo) Then
Response.Write "<option value='"&codigo&"' selected>"&nombres&" "&apellidos&"</option>"
else
Response.Write "<option value='"&codigo&"'>"&nombres&" "&apellidos&"</option>"
end If
Tabla.MoveNext
LOOP

%>
</select>

y el mesaje de error es el siguiente:

Tipo de error:
ADODB.Field (0x80020009)
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
/gp/report_hojaruta_pn_fact.asp


Por favor podrian recomendarme que hacer con esta situación

Muchas gracias