Ver Mensaje Individual
  #3 (permalink)  
Antiguo 26/08/2010, 17:23
Avatar de JavierMMM
JavierMMM
 
Fecha de Ingreso: agosto-2008
Ubicación: Justito frente a la computadora.
Mensajes: 278
Antigüedad: 16 años, 4 meses
Puntos: 0
Respuesta: Consulta a access

Hola Adler, lo que me has sugerido leer está muy bien, pero ya analizando lo que necesito, creo que mi pregunta simplifidcada es:

¿se puede hacer una consulta dentro de un script e imprimir el resultado?

algo como esto

Código HTML:
<script language="javascript" type="text/javascript">
....
else
{
<%
   Set con=Server.CreateObject("ADODB.Connection")
   Set rs=Server.CreateObject("ADODB.Recordset")
   Set Ors=Server.CreateObject("ADODB.Recordset")
   Con.connectionstring="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("agendavh.mdb")
   Con.open
   f = trim(FormatDateTime(date,2))
   f = CDate(f)
   rs.open "Select Idregistro, tusuario, fechaap From agenda",con
   Do While not rs.eof
	tusuario = trim(rs("tusuario"))
	fechaap = trim(rs("fechaap"))
        Idregistro =trim(rs("Idregistro"))
	if (fechaap >= f) and (tusuario <> "") then
   	   dev = mid(fechaap,1,2)
	   response.Write("fechaap = '"& fechaap &"';")
	   response.Write("registro = '"& Idregistro &"';")
	%>
           matriz[fila][x] = fechaap	
           document.write (matriz[fila][x])
        <%
	end if
   rs.movenext
   Loop
   rs.close
   con.close
%>
...
}
</script>