busqueda en db

[AngelW]

Hola, talvez pueda ayudarte.

Por cierto disculpame, pero tu codigo esta medio extraño y no logro entenderlo bien, pero te dire como lo haría y tu decides si adaptarlo o dejarlo asi:

Dim oConn
Dim oRs
Dim sSql
Dim iContador
Set oConn = Server.CreateObject("ADOdb.Connection")
oConn.Open "String de conexion a la BD"
sSql = "select * from cyb_student_profile_mast"
Set oRs = oConn.Execute(sSql)
If Not oRs.Eof Then
iContador = 1
Do While Not oRs.Eof
Response.write(oRs("cyb_profile_last_name&quo t;) & "<br>")
oRs.MoveNext
Loop
End If


Buenos esto es todo y segun mis calculos no puede fallar, pero si surge algo me dices para ayudarte