Llamada encuesta asp

[Jhon Silver]

He creado una encuesta asp.
La podeis ver online http://www.fotoviaje.net/public/encuesta/encuesta.asp
El directorio public es donde se debe ubicar la aplicacion y esta funciona ok.
El problema que tengo que realizo la llamada desde otro directorio a traves del siguiente código:
<!--#include virtual="public/encuesta/encuesta.asp"-->
El include lo he incluido a modo de prueba en la siguiente url http://www.fotoviaje.net/index2.asp abajo en la derecha
Al pulsar el boton enviar me aparece el siguiente error:

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Microsoft Access Driver] Could not find file '(unknown)'.

/public/encuesta/encuesta.asp, line 32

[juanmi321]

Pues dos observaciones:
1. Creo que el sitio ahun no es dinamico, por que siempre pone que ahun hay solo 62 votos, es eso correcto???,

2. Por que no intentas mejor con un iframe.

Pero para q sea mas preciso el comentario por q no colocas tu codigo??

[Jhon Silver]

Aqui esta el codigo
<%

u_input=request.form("u_input")
u_ip=request.servervariables("remote_addr")


if u_input = "" then
%>
<form method="post" action="<%= request.servervariables("script_name") %>">
<p class="izquierda">¿Que te parece la web?<br>
<input type="radio" value="1" name="u_input" checked >Buena<br>
<input type="radio" value="2" name="u_input">Regular<br>
<input type="radio" value="3" name="u_input">Mala<br>
<input type="submit" value="Submit" ></p>
</form>
<%
else

accessdb="encuesta"
cn="driver={Microsoft Access Driver (*.mdb)};"
cn=cn & "dbq=" & server.mappath(accessdb)
set rs = server.createobject("ADODB.Recordset")
sql = "select ip from ballot where ip ='" & u_ip & "'"

rs.Open sql, cn
if rs.eof then

been_here_before="No"
end if
rs.close

if been_here_before = "No" then

sql = "insert into ballot (ip, selection" & u_input &") "
sql = sql & "values ('" & u_ip & "',1)"
rs.Open sql, cn
end if


sql= "select distinctrow "
sql= sql & "sum(selection1) as sum_selection1, "
sql= sql & "sum(selection2) as sum_selection2, "
sql= sql & "sum(selection3) as sum_selection3, "
sql= sql & "count(*) AS total_votes "
sql= sql & "FROM ballot;"
rs.Open sql, cn

total1=rs ("sum_selection1")
total2=rs ("sum_selection2")
total3=rs ("sum_selection3")
count=rs ("total_votes") %>
<p class="izquierda">
¿Que te parece la web?<br>
<img src="green.jpg" height="10" width="<%= formatnumber((total1/count)*100,0) %>">
<%= formatnumber((total1/count)*100,1) %>%<br> Buena <br>
<img src="blue.jpg" height="10" width="<%= formatnumber((total2/count)*100,0) %>">
<%= formatnumber((total2/count)*100,1) %>%<br> Regular <br>
<img src="red.jpg" height="10" width="<%= formatnumber((total3/count)*100,0) %>">
<%= formatnumber((total3/count)*100,1) %>%<br> Mala <br>
Total Votos: <%= formatnumber(count,0,0) %><br> <% end if %> </p>