Prueba con esto a ver...
strsql ="select * from visitas"
set miconexion = conexion.execute(strsql)
if err.description <> "" then
response.write " <B> error base de datos: " & Err.Description & "</B>"
else
response.write " se han obtenido los datos "%>
<table border="1" width="100%">
<tr>
<td width="50%">
<p align="center"><b>autor</b></td>
<td width="50%">
<p align="center"><b>comentarios&l t;/b></td>
</tr>
<% Do While Not miconexion.Eof %>
<tr>
<td width="50%"><%response.write "<p>" & miConexion("nombre") & "</p>"%></td>
<td width="50%"><%response.write "<p>" & miConexion("comentario") &"</p>"%></td>
</tr>
<%
miconexion.MoveNext loop
end if
miconexion.close
conexion.close
set miconexion = nothing
set conexion= nothing
%>
</table>
<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>