%
' ----------------------------------------------------
' Non bufferisation de la page dans le cache du client
' ----------------------------------------------------
'
Response.buffer=true
Response.Expires = -1
Jour = string(2-len(Day(Date)),"0")&Day(Date)
Mois = string(2-len(Month(Date)),"0")&Month(Date)
Annee = Year(Date)
madate = Jour & "/" & Mois & "/" & Annee
heure = string(2-len(Hour(Now)),"0")&Hour(Now)
minute2 = string(2-len(minute(Now)),"0")&minute(Now)
secondes = string(2-len(Second(Now)),"0")&Second(Now)
sql = "select * FROM lexique"
select case ChoixLettre
Case A
sql = sql & " Where libelle = 'psychiatrie' "
end select
sql = sql & " order by libelle desc"
set rs=conn.execute(sql)
%>
Publication des Achats du Centre Hospitalier Henri Ey
| Lexique |