No reconoce las Propiedades de Recordset
Publicado por Luis (6 intervenciones) el 07/11/2001 11:46:36
Buenos días a tod@s, tengo el siguiente código:
<%
dim objProMngr
dim rsRecord
dim intError
set objProMngr = server.createobject("Pedidos.ProductMngr")
set rsRecord= server.createobject("adodb.recordset")
set rsRecord=objProMngr.ListAllProducts(intError)
%>
<table>
<%
if intResponse = 0 then
do while not rsRecord.EOF
%><!tr><%
response.write("<td>Artículo: " & rsRecord("DES_ART") & "</td>")
response.write("<td>Precio: " & rsRecord("PVP_ART") & "</td>")
%><!/tr><%
rsRecord.movenext
loop
else
response.write("No podemos atenderle.")
end if
rsRecord.Close
%>
</table>
Lo que pretendo es mostrar los registros de un recordset en una tabla y el problema que tengo es que no me reconoce las propiedades del recordset, por ejemplo, me da error en rsRecord.eof, me dice que no reconoce esa propiedad. ¿Sabéis por qué? Muchas gracias por vuestra atención:
Luis
<%
dim objProMngr
dim rsRecord
dim intError
set objProMngr = server.createobject("Pedidos.ProductMngr")
set rsRecord= server.createobject("adodb.recordset")
set rsRecord=objProMngr.ListAllProducts(intError)
%>
<table>
<%
if intResponse = 0 then
do while not rsRecord.EOF
%><!tr><%
response.write("<td>Artículo: " & rsRecord("DES_ART") & "</td>")
response.write("<td>Precio: " & rsRecord("PVP_ART") & "</td>")
%><!/tr><%
rsRecord.movenext
loop
else
response.write("No podemos atenderle.")
end if
rsRecord.Close
%>
</table>
Lo que pretendo es mostrar los registros de un recordset en una tabla y el problema que tengo es que no me reconoce las propiedades del recordset, por ejemplo, me da error en rsRecord.eof, me dice que no reconoce esa propiedad. ¿Sabéis por qué? Muchas gracias por vuestra atención:
Luis
Valora esta pregunta
0