Que hago mal?

[wood204]

Estoy intentando que me cargen todos los registros que reunan una característica determinada dentro de BD Access. Utilizo lo siguiente, no me produce ningun error pero no se generan esos registros.
Set registros = conexion.Execute("SELECT * FROM nombretabla WHERE Continente=""& Africa &"" ORDER BY nombretabla.Nombre")

[g_susdaniel]

tal vez si muestras un pokito mas el codigo te echamos un cable, por lo menos como haces los llamados a los campos, algo mas...

<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>

[wood204]

Les incluyo todo:

&lt;HTML&gt;
&lt;HEAD&gt;&lt;TITLE&gt;Leyendo una base de datos de Access con ASP&lt;/TITLE&gt;&lt;/HEAD&gt;
&lt;BODY bgcolor=&quot;#006666&quot; text=&quot;#bbcccc&quot;&gt;
&lt;TABLE BORDER=&quot;0&quot; bgcolor=&quot;#333399&quot; width=&quot;760&quot;&gt;
&lt;%
Dim conexion, registros, basedatos

basedatos = Server.MapPath(&quot;\usuario\db\prueba.mdb&quot;)


Set conexion = Server.CreateObject(&quot;ADODB.Connection&quot;)


conexion.Open &quot;Provider=Microsoft.Jet.OLEDB.4.0;Data Source=&quot; &amp; basedatos &amp; &quot;;&quot;

Set registros = conexion.Execute(&quot;SELECT * FROM nombretabla WHERE Continente=&quot;&quot;&amp; Africa &amp;&quot;&quot; ORDER BY nombretabla.Nombre&quot;)

Do While Not registros.EOF

%&gt;
&lt;TR&gt;
&lt;TD width=&quot;17&quot; height=&quot;36&quot;&gt;&lt;%= registros.Fields(&quot;Nombre&quot;).Value %&gt;&lt;/TD&gt;
&lt;TD width=&quot;32&quot;&gt;&lt;IMG SRC=&quot;&lt;%=registros.Fields(&quot;Continente& quot;).Value %&gt;&quot; width=&quot;80&quot; height=&quot;50&quot;&gt;&lt;/TD&gt;
&lt;TD width=&quot;18&quot;&gt;&lt;A HREF=&quot;&lt;%= registros.Fields(&quot;Web Principal&quot;).Value %&gt;&quot;&gt;&lt;%= registros.Fields(&quot;Web Principal&quot;).Value %&gt;&lt;/A&gt;&lt;/TD&gt;
&lt;TD width=&quot;18&quot;&gt;&lt;A HREF=&quot;&lt;%= registros.Fields(&quot;Perfíl&quot;).Value %&gt;&quot;&gt;&lt;%= registros.Fields(&quot;Perfíl&quot;).Value %&gt;&lt;/A&gt;&lt;/TD&gt;
&lt;/TR&gt;
&lt;%
registros.MoveNext
Loop


registros.Close
Set registros = Nothing
conexion.Close
Set conexion = Nothing
%&gt;
&lt;/TABLE&gt;
&lt;/BODY&gt;
&lt;/HTML&gt;