Error se esperaba una instrucción

[RossanaIsabel]

Buenas
El siguiente código me da el error 'se esperaba una instrucción' en la parte de =RS("nombre"), no entiendo por qué, pues, aparentemente está bien, si alguien puede ver lo que pasa se lo agradezco

<%
dim conexion, sql, RS
Set conexion = Server.CreateObject("ADODB.Connection")
conexion.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("base_datos.mdb"))
sql = "SELECT * FROM usuario"
Set RS = conexion.Execute(sql)

RS.movefirst
Do while not RS.EOF %>
<br>
<br>
<B>Nombre:</B><% =RS("nombre") %><BR>
<B>Apellido:</B><% =RS("apellido")
RS.movenext
Loop
conexion.close
set conexion = nothing
set RS = nothing
%>

Saludos

[pcarvajal]

<% =RS("apellido") %><%
RS.movenext
Loop
conexion.close
set conexion = nothing
set RS = nothing
%>

[AlZuwaga]

Mmmm.... estás segura que lo da en <% =RS("nombre") en lugar de <% =RS("apellido")?

Pasa que sólo se puede usar el signo "=" en lugar de response.write cuando lo único que contiene los tags de apertura y cierre de secuencias ASP es esa instrucción. A ver... cualquiera de las siguientes instrucciones son correctas:

Código:

<% = "hola" %>

<%
= "hola" %>

<% = "hola"
%>

<%

= "hola"


%>

Pero lo siguiente ya no es correcto:

Código:

<% = "hola"

'esto ya no funciona y da error de 'se esperaba una instrucción' aunque esto sea un comentario
%>

Entonces, tu código quedaría así:

Código:

<% 
dim conexion, sql, RS
Set conexion = Server.CreateObject("ADODB.Connection")
conexion.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("base_datos.mdb")) 
sql = "SELECT * FROM usuario" 
Set RS = conexion.Execute(sql)

RS.movefirst
Do while not RS.EOF %>
<br>
<br>
<B>Nombre:</B><% =RS("nombre") %><BR>
<B>Apellido:</B><% Response.Write RS("apellido") 
RS.movenext
Loop
conexion.close
set conexion = nothing
set RS = nothing
%>

[RossanaIsabel]

Gracias!. No lo veía.

Saludos