
25/12/2002, 11:38
|
| | 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)
%> |