5 messaggi dal 25 ottobre 2005
Salve, stavo implementando (termine grosso per me) un sistema per la scrittura degli URL completi di descrizione del contenuto per renderli più "appetitosi" agli occhi dei vari spider, ma la mia poca esperienza mi ha fatto ben presto capitolare. Mi spiego meglio: nel DB ho creato un campo desc che prevede la descrizione del contenuto della pagina da includere nell'URL in questa forma http://www.miosito.it/risorse/contenuto.asp?id=7&i-ristoranti-ed-agriturismo-migliori ma nella riscrittura dell'URL i problemi sono molteplici. Gli spazi possono naturalmente essere sostituiti con la funzione replace per evitare il %20 ma tutti gli altri caratteri speciali come virgole, accenti, lettere accentate, etc. come possono essere convertite? Un replace multiplo? Sarebbe infinito. Ad ogni modo posto il codice per dare un'idea più precisa, puntualizzando che io non sono molto bravo (forse quasi per nulla).
<%
id1=request.querystring("id")

Set Conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("../mdb-database/link.mdb")

Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "select * from risorse ", conn

Do while NOT RS.EOF
id1=rs("id") 
desc=rs("desc")
%>
<a class="links" href="contenuto.asp?id=<% response.write(id1) %>&<% response.write(desc) %>">» <%
link=rs("link")
response.write(link)
%></a>
<br>
<%
RS.MoveNext
Loop
RS.Close
%></td>


Ogni suggerimento é gradito.
Thanks
260 messaggi dal 13 luglio 2005
Ciao Brognaturo,
stai creando una specie di "url rewrite" fatto in casa ...: contento tu ...! ... ti consiglierei di documentarti sul vero url-rewrite se vuoi avere dei risultati piu' efficaci nei motori di ricerca.
A parte il mio giudizio, puoi risolvere il tuo problema semplicemente creando una funzione di replace multiplo. Ovvero puoi scrivere qualcosa del tipo:

Function CorreggiURL(ByVal Stringa)
   Stringa = Replace(Stringa, " ", "-")
   Stringa = Replace(Stringa, ",", "-")
   Stringa = Replace(Stringa, "a'", "a")
   Stringa = Replace(Stringa, "e'", "e")
   Stringa = Replace(Stringa, "i'", "i")
   Stringa = Replace(Stringa, "o'", "o")
   Stringa = Replace(Stringa, "u'", "u")

   CorreggiURL = Stringa
End Function


aggiungendo tutte le sostituzioni che ti servono (io ne ho messa solo qualcuna). Metti questa funzione all'inizio del codice e poi la usi come segue:

%>
<a class="links" href="contenuto.asp?id=<% response.write(id1) %>&<% response.write(CorreggiURL(desc)) %>">» <%
link=rs("link")
response.write(link)
%></a>


Fammi sapere se va, ciao.

Umb

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.
Community
UTENTI ONLINE
In primo piano

I più letti di oggi

Media
In evidenza
MISC