Error En Consulta Bd

[acutillas]

Siento mucho molestar tanto pero me gustaria resolver este asunto.

<%sqltxt="select * from foros order by foro"
Set Conn = Server.CreateObject("ADODB.Connection")

Conn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\asp\bd\foros.mdb"))

set rs=createobject("ADODB.Recordset")
rs.open sqltxt,conn
if rs.eof then%>
<tr><td colspan="2" width="565" bgcolor="#0099CC">No hay foros disponibles</td></tr>
<%else
do while not rs.eof%>

<td width="470" style="border-width:2; border-style:dotted;"><font face="Verdana" size="1"><%=rs("foro")%></font></td>

<%rs.movenext
loop
rs.close
end if%>


Me sale la página de foros sin ningún foro.
Estoy seguro de que hay ya que he trabajado en local con la bd y tiene 2 foros creados.
Tendría que compartir en el ISP algún directorio igual que en mi IIS6.?¿

La página la muestra, pero sin datos.