
30/08/2008, 15:37
|
| | Fecha de Ingreso: octubre-2007
Mensajes: 36
Antigüedad: 17 años, 6 meses Puntos: 0 | |
Archivo conexion B.datos para pag ASP Hola!!! El caso es que quiero cargar una pagina en asp llamada fotografias.asp.
Dicha pagina mostraría una serie de fotos pero para mostrarlas coje sus Id-s de una base de datos q se llama neguri.mdb q se encuentra en una carpeta llamada "basededatos".
Lo q yo creo q se encuentra mal es el archivo de conexión a dicha base de datos...
Es la siguiente:
<%
'************************************************* ************************
'*Conexion a Fotografías
'************************************************* ************************
sub neguri(conn)
strconn = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("../basesdedatos/neguri.mdb")
set conn = Server.CreateObject("ADODB.Connection")
conn.Open application "igv-proil.com.fotografias"
end sub
'************************************************* ************************
%>
Luego en la pagina de fotografias.asp el codigo hace lo siguiente:
<!--#include file="conexion.asp"-->
<%
neguri conn
Set rs = Server.CreateObject ("ADODB.RecordSet")
sql="select id,link,link2 from neguri Where id<>656 Order by Id desc"
rs.Open sql,conn,3,1
mostrar = 12
rs.PageSize = mostrar
rs.CacheSize = mostrar
CantidadRegistros = rs.RecordCount
if Request.Querystring("pagina")="" then
pag_actual=1
else
pag_actual=CInt(Request.Querystring("pagina"))
end if
pag_totales = rs.PageCount
if pag_actual < 1 then
pag_actual = 1
end if
if pag_actual > pag_totales then
pag_actual = pag_totales
end if
if pag_totales=0 then
Response.Write("<span class='texto'>No existe ningún archivo</span>")
else
rs.AbsolutePage = pag_actual
cant_registros = 0
%>
Alguien sabría decirme q hago mal??? GRACIAS |