Salve, ho creato una sezione per la gestione delle News del mio sito che preleva i dati da un db di access. Il problema è che il campo "Link" che contiene collegamenti ipertestuali ad altre pagine e che nel db è impostato come campo collegamento, nella pagina asp di dettaglio non mi restituisce il formato "collegamento ipertestuale" ma il formato testo. Ho letto un pò in giro che questo è un problema tipico di questi casi ma non riesco a venirne a capo. Ho anche provato a trasformare nel db il campo "Link" in testo. Sarei grato se mi aiutate a trovare la soluzione. Grazie
Posto il codice:
<%
Dim antal
antal = 0
Dim RecSet
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "SELECT * FROM News order by ID DESC;"
RecordsPerPagina = 5
page = Request("page")
if page="" then page=1
RecSet.open Addera, Connect, 1
RecSet.PageSize = RecordsPerPagina
RecSet.AbsolutePage = page
If RecSet.Eof=True or RecSet.Bof=True then
Response.Write "<p>Nessun risultato trovato</p>"
Else
Response.Write ("<table border=0 with=600 cellspacing=1 align=center>")
For i=1 to RecordsPerPagina
if Not RecSet.EOF then
Response.Write("<tr><th widht=80 bgcolor=#DEDDDC>" & RecSet("Date") & "</th>")
Response.Write("<th width=520 bgcolor=#DEDDDC>" & RecSet("Title") & "</th></tr>")
Response.Write("<tr><td width=600 colspan=2>" & RecSet("Message") & "</td>")
Response.Write("<tr><td width=600 colspan=2>" & RecSet("Link") & "</td></tr>")
RecSet.MoveNext
end if
Next
Response.Write ("</table></center>")
End if
antal = antal + 1
Response.Write "<p><b>Pagine:</b> "
For pag=1 to RecSet.PageCount
Response.Write "<a href='default.asp?page=" & pag & "'>"
Response.Write pag
Response.Write "</a> "
Next
Response.Write "</p>"
RecSet.Close
Set RecSet=Nothing
Connect.Close
Set Connect=Nothing
%>
Modificato da fballet il 01 marzo 2011 15.00 -
