%option explicit%> <% Dim cn dim no_langue 'Connection à la BD. set cn = Server.CreateObject("ADODB.Connection") cn.ConnectionString = (ConnectionString) cn.Open no_langue = 1 dim section section= 6 '---------------------------------------------------------------------------------------------------------------------- %>
|
|
<% afficher_banniere "", "", section, no_langue, 1, "", cn %>
|
|||||||||||
|
|
|