HTMLEncode et ORACLE

:aie: (Oracle 9i)
Bonjour à tous :

Savez vous s'il exitste une fonction "native" sous ORACLE qui convertit une chaine de caractère avec les accents en code HTML
exemple

Code:

---

"é" ==> é

---

ou

Code:

---

"è" ==> è

---

Merci de votre aide
@argoet

Tu as vu ça ?

http://helyos.developpez.com/htp/

Correctif (Pris dans la doc du package UTL_I18N) :

Code:

---

1 2	UTL_I18N.ESCAPE_REFERENCE('hello < '||chr(229),'us7ascii') This returns 'hello &lt; &#xe5;'.

---

UTL_I18N semble etre avec Oracle 10g : je suis en 9i (comme préciser en début de Post)

Concernant le package sys.htp :aie:
:aie:

Code:

---

1 2 3 4 5 6 7 8 9

BEGIN htp.print('<table>'); END;   * ERROR at line 1: ORA-06502: PL/SQL: numeric or value error ORA-06512: at "SYS.OWA_UTIL", line 323 ORA-06512: at "SYS.HTP", line 860 ORA-06512: at "SYS.HTP", line 975 ORA-06512: at line 1

---

Donc pour l'instant : c'est pas gagné :oops:

Sinon, vous ecrivez votre propre fonction.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105

FUNCTION Translate_Html( PC$Chaine IN VARCHAR2 ) RETURN VARCHAR2 IS LC$Chaine VARCHAR2(32000) := PC$Chaine ; BEGIN LC$Chaine := REPLACE( LC$Chaine,'¡','¡'); LC$Chaine := REPLACE( LC$Chaine,'¢','¢'); LC$Chaine := REPLACE( LC$Chaine,'£','£'); LC$Chaine := REPLACE( LC$Chaine,'¤','¤'); LC$Chaine := REPLACE( LC$Chaine,'¥','¥'); LC$Chaine := REPLACE( LC$Chaine,'¦','¦'); LC$Chaine := REPLACE( LC$Chaine,'§','§'); LC$Chaine := REPLACE( LC$Chaine,'¨','¨'); LC$Chaine := REPLACE( LC$Chaine,'©','©'); LC$Chaine := REPLACE( LC$Chaine,'ª','ª'); LC$Chaine := REPLACE( LC$Chaine,'«','«'); LC$Chaine := REPLACE( LC$Chaine,'¬','¬'); LC$Chaine := REPLACE( LC$Chaine,'*','­'); LC$Chaine := REPLACE( LC$Chaine,'®','®'); LC$Chaine := REPLACE( LC$Chaine,'¯','¯'); LC$Chaine := REPLACE( LC$Chaine,'°','°'); LC$Chaine := REPLACE( LC$Chaine,'±','±'); LC$Chaine := REPLACE( LC$Chaine,'²','²'); LC$Chaine := REPLACE( LC$Chaine,'³','³'); LC$Chaine := REPLACE( LC$Chaine,'´','´'); LC$Chaine := REPLACE( LC$Chaine,'’','´'); LC$Chaine := REPLACE( LC$Chaine,'µ','µ'); LC$Chaine := REPLACE( LC$Chaine,'¶','¶'); LC$Chaine := REPLACE( LC$Chaine,'·','·'); LC$Chaine := REPLACE( LC$Chaine,'¸','¸'); LC$Chaine := REPLACE( LC$Chaine,'¹','¹'); LC$Chaine := REPLACE( LC$Chaine,'º','º'); LC$Chaine := REPLACE( LC$Chaine,'»','»'); LC$Chaine := REPLACE( LC$Chaine,'¼','¼'); LC$Chaine := REPLACE( LC$Chaine,'½','½'); LC$Chaine := REPLACE( LC$Chaine,'¾','¾'); LC$Chaine := REPLACE( LC$Chaine,'¿','¿'); LC$Chaine := REPLACE( LC$Chaine,'À','À'); LC$Chaine := REPLACE( LC$Chaine,'Á','Á'); LC$Chaine := REPLACE( LC$Chaine,'Â','Â'); LC$Chaine := REPLACE( LC$Chaine,'Ã','Ã'); LC$Chaine := REPLACE( LC$Chaine,'Ä','Ä'); LC$Chaine := REPLACE( LC$Chaine,'Å','Å'); LC$Chaine := REPLACE( LC$Chaine,'Æ','Æ'); LC$Chaine := REPLACE( LC$Chaine,'Ç','Ç'); LC$Chaine := REPLACE( LC$Chaine,'È','È'); LC$Chaine := REPLACE( LC$Chaine,'É','É'); LC$Chaine := REPLACE( LC$Chaine,'Ê','Ê'); LC$Chaine := REPLACE( LC$Chaine,'Ë','Ë'); LC$Chaine := REPLACE( LC$Chaine,'Ì','Ì'); LC$Chaine := REPLACE( LC$Chaine,'Í','Í'); LC$Chaine := REPLACE( LC$Chaine,'Î','Î'); LC$Chaine := REPLACE( LC$Chaine,'Ï','Ï'); LC$Chaine := REPLACE( LC$Chaine,'Ð','Ð'); LC$Chaine := REPLACE( LC$Chaine,'Ñ','Ñ'); LC$Chaine := REPLACE( LC$Chaine,'Ò','Ò'); LC$Chaine := REPLACE( LC$Chaine,'Ó','Ó'); LC$Chaine := REPLACE( LC$Chaine,'Ô','Ô'); LC$Chaine := REPLACE( LC$Chaine,'Õ','Õ'); LC$Chaine := REPLACE( LC$Chaine,'Ö','Ö'); LC$Chaine := REPLACE( LC$Chaine,'Œ','Œ'); LC$Chaine := REPLACE( LC$Chaine,'œ','œ'); LC$Chaine := REPLACE( LC$Chaine,'×','×'); LC$Chaine := REPLACE( LC$Chaine,'Ø','Ø'); LC$Chaine := REPLACE( LC$Chaine,'Ù','Ù'); LC$Chaine := REPLACE( LC$Chaine,'Ú','Ú'); LC$Chaine := REPLACE( LC$Chaine,'Û','Û'); LC$Chaine := REPLACE( LC$Chaine,'Ü','Ü'); LC$Chaine := REPLACE( LC$Chaine,'Ý','Ý'); LC$Chaine := REPLACE( LC$Chaine,'Þ','Þ'); LC$Chaine := REPLACE( LC$Chaine,'ß','ß'); LC$Chaine := REPLACE( LC$Chaine,'à','à'); LC$Chaine := REPLACE( LC$Chaine,'á','á'); LC$Chaine := REPLACE( LC$Chaine,'â','â'); LC$Chaine := REPLACE( LC$Chaine,'ã','ã'); LC$Chaine := REPLACE( LC$Chaine,'ä','ä'); LC$Chaine := REPLACE( LC$Chaine,'å','å'); LC$Chaine := REPLACE( LC$Chaine,'æ','æ'); LC$Chaine := REPLACE( LC$Chaine,'ç','ç'); LC$Chaine := REPLACE( LC$Chaine,'è','è'); LC$Chaine := REPLACE( LC$Chaine,'é','é'); LC$Chaine := REPLACE( LC$Chaine,'ê','ê'); LC$Chaine := REPLACE( LC$Chaine,'ë','ë'); LC$Chaine := REPLACE( LC$Chaine,'ì','ì'); LC$Chaine := REPLACE( LC$Chaine,'í','í'); LC$Chaine := REPLACE( LC$Chaine,'î','î'); LC$Chaine := REPLACE( LC$Chaine,'ï','ï'); LC$Chaine := REPLACE( LC$Chaine,'ð','ð'); LC$Chaine := REPLACE( LC$Chaine,'ñ','ñ'); LC$Chaine := REPLACE( LC$Chaine,'ò','ò'); LC$Chaine := REPLACE( LC$Chaine,'ó','ó'); LC$Chaine := REPLACE( LC$Chaine,'ô','ô'); LC$Chaine := REPLACE( LC$Chaine,'õ','õ'); LC$Chaine := REPLACE( LC$Chaine,'ö','ö'); LC$Chaine := REPLACE( LC$Chaine,'÷','÷'); LC$Chaine := REPLACE( LC$Chaine,'ø','ø'); LC$Chaine := REPLACE( LC$Chaine,'ù','ù'); LC$Chaine := REPLACE( LC$Chaine,'ú','ú'); LC$Chaine := REPLACE( LC$Chaine,'û','û'); LC$Chaine := REPLACE( LC$Chaine,'ü','ü'); LC$Chaine := REPLACE( LC$Chaine,'ý','ý'); LC$Chaine := REPLACE( LC$Chaine,'þ','þ'); LC$Chaine := REPLACE( LC$Chaine,'ÿ','ÿ'); RETURN LC$Chaine ; END Translate_Html ;

---

Je pense que ceci pourras t'aider : http://www.developpez.net/forums/new...te=1&p=3283530