 Rédiger
<%
if Request.Querystring("P") <> "" then
Session("ForumPageEnCours") = Request.Querystring("P")
end if
Call AfficherDiscussions(Session("ForumPageEnCours"))
%>
 Discussions récentes
|
<%
Response.Write("![]() ")
Response.Write(" Forum de discussion - ")
Response.Write("")
'bleu violet #8080FF
'vert #299429 -->
Response.Write("")
Response.Write("")
if Request.Querystring("S") <> "" then
Session("ForumSujetEnCours") = Request.Querystring("S")
end if
if Session("ForumSujetEnCours") = 0 then
Response.Write("Bienvenue")
else
Response.Write(GetElement("Sujet",Session("ForumSujetEnCours")))
Response.Write("
")
Response.Write("")
Response.Write("créé le " & GetElement("DateDepot",Session("ForumSujetEnCours")) & " - " & GetNbMsg(Session("ForumSujetEnCours")) & " message")
if GetNbMsg(Session("ForumSujetEnCours"))>1 then Response.Write("s")
Response.Write("")
end if
Response.Write("")
Response.Write("")
%>
|
|
<%
if Session("ForumSujetEnCours") = 0 then
Response.Write("![]() ")
else
Call AfficherMessages(Session("ForumSujetEnCours"))
end if
%>
|
