Ver Mensaje Individual
  #9 (permalink)  
Antiguo 25/12/2002, 11:38
luisgls
 
Fecha de Ingreso: noviembre-2002
Mensajes: 133
Antigüedad: 22 años, 5 meses
Puntos: 0
Hola, lo he intentado de esta forma, sin embargo me da el siguiente error:
Se esperaba un final de instrucción Next field


<%
Option Explicit
Dim mascampos, rsUser, sql, existe

mascampos = "pesca"
%>
<!--#include file="conn.asp"-->
<%
existe = false
sql = "SELECT * from users"
Set rsUser = Server.CreateObject("ADODB.Recordset")
rsUser.Open sql, conn, 3, 3

For Each field In rsUser.Fields
if field.Name=rsUser(mascampos) then
existe = true
end if
Next field

Response.Write (existe)

%>