ciao a tutti
sto creando una pagina asp, la mia prima pagina, funziona tutto che è una meraviglia
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title>TrenoManiaFoto - Il portale dei treni reali di TrenoMania Network</title>
<link href="stilevideo.css" rel="stylesheet" type="text/css">
</head>
<body>
<%
Const adOpenForwardOnly = 0
Const adLockReadOnly = 1
Const adCmdTableDirect = &H0200
Const adUseClient = 3
%>
<%
connStr = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("/mdb-database/TMF2004.mdb")
set conn = Server.CreateObject("ADODB.Connection")
conn.open connStr
SQL = "SELECT * FROM video order by ID desc"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.PageSize = 6
rs.CacheSize = 6
rs.CursorLocation = adUseClient
rs.open SQL, conn
If Len(Request("pagenum")) = 0 Then
rs.AbsolutePage = 1
Else
If CInt(Request("pagenum")) <= rs.PageCount Then
rs.AbsolutePage = Request("pagenum")
Else
rs.AbsolutePage = 1
End If
End If
Dim abspage, pagecnt
abspage = rs.AbsolutePage
pagecnt = rs.PageCount
If Not rs.EOF Then
%>
<%
np = request("pagenum")
if np = "" then
np = "1"
else
np = request("pagenum")
end if
%>
<div id="contenitore">
Video:<%=rs.RecordCount%>
<%
End If
%>
<%
For intRec=1 To rs.PageSize
If Not rs.EOF Then
%>
<div id="contenuto">
<div id="immagine">
</div>
<div id="testo">
<p><a href="<%=rs.Fields("url")%>" style="font-variant: small-caps;"><%=rs.Fields("nome")%></a> <br>
<%=rs.Fields("autore")%> - <%=rs.Fields("dimensione")%></p>
</div>
</div>
<%
rs.MoveNext
End If
Next
%>
<%If abspage = 1 Then
Response.Write "<span style=""color:silver; font-variant: small-caps; text-decoration: none;"">«Pagina Precedente</span>"
Else
Response.Write "<a href=video.asp?catid="&cat&"&pagenum="&abspage - 1&" style=""font-variant: small-caps; text-decoration: none; color: #0066CC""><b>«Pagina Precedente</b></a>"
End If
Response.Write " - "
If abspage < pagecnt Then
Response.Write "<a href=video.asp?catid="&cat&"&pagenum="&abspage + 1&" style=""font-variant: small-caps; text-decoration: none; color: #0066CC""><b>Pagina Successiva»</b></a>"
Else
Response.Write "<span style=""color:silver; font-variant: small-caps; text-decoration: none;"">Pagina Successiva»</span>"
End If
%>
</div>
<%
rs.close
set rs = NOTHING
conn.close
%>
</body>Ora vorrei aggiungere una immagine nel div id immagine che sia uguale per tutti i collegamenti, e che sia collegata al file da scaricare in modo che passando o sulla immagine o sul link per scaricare il file l'immagine cambi esempio da grigia a colorata.... cosa devo fare?
Forse ho sbagliato anche sezione se è così chiedo scusa in anticipo
Luca
