Problema con fixquotes

**jk010469** · 24-08-2004, 17:41

Ciao a tutti. Vi sottopongo un problema che spero sappiate aiutarmi a risolvere:

Aggiungendo una news al db per risolvere il problema degli apici usavo un fixquotes che funzionava perfettamente

Successivamente è nata la necessità di sistema il problema delle vocali accentate. Adesso la situazione di codice è la seguente:

codice:

% @Language=VBScript %>
<% Session.LCID = 1040 %>
<% Response.Buffer=TRUE%>
<% FUNCTION fixQuotes (theString)
fixQuotes = Replace (theString, "'", "''")
END FUNCTION
FUNCTION fixQuotes1 (theString)
fixQuotes1 = Replace (theString, "à", "a''")
END FUNCTION 
FUNCTION fixQuotes2 (theString)
fixQuotes2 = Replace (theString, "è", "e''")
END FUNCTION 
FUNCTION fixQuotes3 (theString)
fixQuotes3 = Replace (theString, "ì", "i''")
END FUNCTION 
FUNCTION fixQuotes4 (theString)
fixQuotes4 = Replace (theString, "ù", "u''")
END FUNCTION 
FUNCTION fixQuotes5 (theString)
fixQuotes5 = Replace (theString, "ò", "o''")
END FUNCTION 

%>


<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Amministra: action --&gt; aggiungi notizia</title>
</head>

<body>
<% dim strdata
titolo = fixQuotes(Request.form("titolo"))
titolo = fixQuotes1(Request.form("titolo"))
titolo = fixQuotes2(Request.form("titolo"))
titolo = fixQuotes3(Request.form("titolo"))
titolo = fixQuotes4(Request.form("titolo"))
titolo = fixQuotes5(Request.form("titolo"))

Il problema è che risolvo il problema degli accenti ma non quello dell'apice...

Qualche suggerimento?

Grazie in anticipo

JK

**weppos** · 24-08-2004, 17:46

Ma che fastidio davano le vocali accettate lasciarle come erano? :master:

**jk010469** · 24-08-2004, 17:49

con te se non per il fatto che mi davano errore... e dopo averle fissate tutto procede per il verso giusto tranne che l'apice.

JK

**vaargard** · 24-08-2004, 17:50

se il testo viene visualizzato in html ma gli accenti ti danno fastidio per qualche tipo di interazione con l'xml sostituisci le vocali accenjtate con il loro codice

esempio

à = à

le altre non le ricordo (grazie a dio!!!)

**vaargard** · 24-08-2004, 17:50

iops ...

à = ecommercialecancelletto224;

altrimenti la trasforma eheheheh

codice:

&#224;

**jk010469** · 24-08-2004, 17:52

Grazie mille a tutti... adesso provo

JK

**weppos** · 24-08-2004, 17:53

A questo punto per risolvere il problema degli accenti è sufficiente codificare la stringa.

codice:

stringa = Server.HTMLEncode(stringa)

Tutte le lettere accentate saranno convertite in codice HTML.

**jk010469** · 24-08-2004, 18:03

interessante suggerimento weppos... grazie

JK

**weppos** · 24-08-2004, 18:06

Tra parentesi ho appena scoperto che questa codifica accetta sia il charset ISO-8859 che UTF-8.

In caso di cambiamento del charset avrai un lavoro in meno da fare.

Discussione: Problema con fixquotes

Strumenti discussione

Ricerca discussione

Visualizza

Problema con fixquotes

Sarei stato d'accordo...

Permessi di invio