Recordset con solo un record

[ambar]

Hola amigos:

Tengo un recordset con un solo record, resultado de una consulta y quiero mostrar los campos del recordset en la pagina web, dicho resultado. Al tener un solo record tanto RS.BOF y RS.EOF son ciertas. Lo he intentado de varias formas, pero no he podido, el error que recibo es el siguiente:

ADODB.Recordset error '800a0bcd'

Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.

Podrian ayudarme?

Saludos. :(

[AlZuwaga]

umm... una de dos. O no te está trayendo ningún registro o efectivamente te lo trae e intentás hacer un movenext cuando estás posicionado al final del recordset... en todo caso, podrías poner tu código para estar mas seguro?

saludps

[g_susdaniel]

efectivamente, como dice diego, de todas maneras las sentencia sql basta asi...

SELECT * FROM tutabla;

Facilitanos tu codigo ;)

<div align=right><embed src="http://www.jesusdaniel.venezuela.com/jd.swf" height=25 width=200 wmode="transparent"></embed><br>Usuario # 3359 en los foros</div>

[ambar]

Aqui les pongo el codigo ...

&lt;%
Dim SQL, oConn, RS, opcion
opcion = Request.QueryString(&quot;opcion&quot;)
Response.Write opcion

Set oConn = Server.CreateObject(&quot;ADODB.Connection&quot;)
oConn.Open (&quot;DRIVER={Microsoft Access Driver (*.mdb)}; DBQ= &quot;&amp; Server.MapPath (&quot;datos.mdb&quot;))
SQL = &quot; Select * From datos1 Where (nombre = '&quot;&amp;opcion&amp;&quot;') &quot;
Set RS = oConn.Execute(SQL)
%&gt;

codigo html
&lt;table&gt;
&lt;%
IF RS. EOF
Response.Write (&quot; Opcion no valida &quot;)
else
Response.Write(&quot;&lt;tr&gt;&lt;tdcolspan=&quot ;&quot;3&quot;&quot;&gt;&quot;&amp;RS(&quot;nombre &quot;)&amp;&quot;&lt;/td&gt;&lt;/tr&gt;&quot;)
Response.Write (&quot;&lt;tr&gt;&lt;td colspan=&quot;&quot;3&quot;&quot;&gt;&amp;nbsp;&lt ;/td&gt;&lt;/tr&gt;&quot;)
Response.Write (&quot;&lt;tr&gt;&quot;)
Response.Write(&quot;&lt;td class=&quot;&quot;texto&quot;&quot;&gt;&lt;img src=&quot;&amp; RS(&quot;fotog&quot;) &amp;&quot;&gt;&lt;/td&gt;&quot;)
Response.Write(&quot;&lt;td&gt;&amp;nbsp;&lt;/td&gt;&quot;)
Response.Write(&quot;&lt;td class=&quot;&quot;texto&quot;&quot;&gt;&quot; &amp; RS(&quot;texto1&quot;)&amp;&quot;&lt;/td&gt;&quot;)
Response.Write (&quot;&lt;/tr&gt;&quot;)
Response.Write(&quot;&lt;tr&gt;&quot;)
Response.Write(&quot;&lt;td colspan=3 class=&quot;&quot;texto&quot;&quot;&gt;&quot; &amp; RS(&quot;texto2&quot;)&amp; &quot;&lt;/td&gt;&quot;)
Response.Write(&quot;&lt;/tr&gt;&quot;)
RS.MoveNext
End If
oConn.Close
Set RS = nothing
Set oConn = nothing

%&gt;
&lt;/table&gt;

[AlZuwaga]

...intentás hacer un movenext cuando estás posicionado al final del recordset...

'... bla, bla
Response.Write(&quot;&lt;/tr&gt;&quot;)
RS.MoveNext
End If
'... bla, bla

quitalo! Si decís que tenés un recordset con un solo record , adonde pretendés moverte con un movenext?? A un registro que no existe?

saludos

[g_susdaniel]

Daz no seas tan duro, no leiste la parte de &quot;principiante&quot; ? :P

<div align=right><embed src="http://www.jesusdaniel.venezuela.com/jd.swf" height=25 width=200 wmode="transparent"></embed><br>Usuario # 3359 en los foros</div>

[ambar]

Muchas gracias por la ayuda.

Ademas de eliminar RS.MoveNext, porque obviamente solo hay un registro en el recordset; he quitado la condicion que hacia con el While porque RS.EOF siempre es cierta. Tambien he afinado la consulta a la BBDD y todo funciona bien.

Saludos
PD: Todos empezamos algun dia.
;)

[AlZuwaga]

Ves g_susdaniel? un samarreo y un par de golpes y las cosas se ponen en orden... hay que tenerlos cortitos para que salgan buenos <img src='images/tongue.gif' width=15 height=15 align=middle>

mas vale que es una broma

salud

[g_susdaniel]

Sip, eres de los anticua-pedagogia ;)

<div align=right><embed src="http://www.jesusdaniel.venezuela.com/jd.swf" height=25 width=200 wmode="transparent"></embed><br>Usuario # 3359 en los foros</div>