no sale nada un error en la conexion de la tabla muchas gracias ya encontre un codigo para esto
<body bgcolor="#FFFFFF" text="#000000">
<%
strConnection = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("afiliados.mdb")
Set adoDataConn = Server.CreateObject("ADODB.Connection")
adoDataConn.Open strConnection
strQuery = "SELECT * FROM afiliados"
set rs = adoDataConn.Execute(strQuery)
%>
<table border=0 cellpadding=1>
<tr bgcolor="336699"><td><b>Direccion:</b></td><td><b>Telefono:</b></td><td><b>Correo:</b></td><td><b>Requisitos</b></td></tr>
<%
Do While Not rs.eof
direccion = rs("direccion")
telefono = rs("telefono")
correo = rs("correo")
requisitos = rs("requisitos")
rs.MoveNext
If c = 1 Then
Response.Write ("<tr>")
c = 2
Else
Response.Write ("<tr bgcolor=""#F1F1F1"">")
c = 1
End If
%>
<td><% Response.Write direccion %></td>
<td><% Response.Write telefono %></td>
<td><% Response.Write correo %></td>
<td><% Response.Write requisitos %></td>
<% Loop %>
</table>
muchas gracias
haora lo que quiero hacer es que me las muestre como el eejmplo que tenia yo de por filas
muchas gracias te agradesco