Discussion :

[Invité]

Bonjour à tous,

Sur la page d'accueil de mon Intranet, j'ai le récapitulatif de la dernière question posée sur le forum !

Je récupère ces données avec :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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
<%
Response.expiresAbsolute=now()-1
 
dim conn
dim LibDerTitre
dim LibDerQuest
dim rs
dim sql
Dim ChaineConnexion
Dim LoginConnexion
Dim MotDePasseConnexion
 
ChaineConnexion="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("forum/forum.mdb") 
LoginConnexion=""
MotDePasseConnexion=""
 
Set conn = Server.CreateObject("ADODB.Connection")
conn.open ChaineConnexion, LoginConnexion, MotDePasseConnexion
 
sql = "SELECT titre, description, date FROM questions ORDER BY date DESC ;"
set rs=conn.execute(sql)
rs.movefirst
LibDerTitre=rs("titre")
LibDerQuest=rs("description")
rs.close
set rs=nothing
conn.close
set conn=nothing
%>

Malheureusement, lorsque la question contient des caractères accentués, la restitution de cette question n'est pas bonne !

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
<% response.write("<font color='#008000' size='2' face='Tahoma'><b><i>" _
& LibDerQuest & "</font></b></i>") %>

J'ai par exemple un "ŕ" au lieu d'un "à", "accčs" au lieu de "accès", etc ..., comment faire pour avoir les bons caractères !

Cordialement.

[dragonfly]

Salut essaye de mettre ca comme code ASP en haut de page

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Response.Charset = "ISO8859-1"

Sinon tu peut faire un truc du genre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
<% response.write("<font color='#008000' size='2' face='Tahoma'><b><i>" _
& server.HTMLEncode(LibDerQuest) & "</font></b></i>") %>

[Invité]

Dragonfly

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Response.Charset = "ISO8859-1"

marche à merveille

Désolé pour le retard dans ma réponse