Site officiel de Lacaune-Les-Bains

<%@LANGUAGE="VBSCRIPT"%> <% Dim rsEcoles__MMColParam rsEcoles__MMColParam = "Ecoles" if (Request("MM_EmptyValue") <> "") then rsEcoles__MMColParam = Request("MM_EmptyValue") %> <% set rsEcoles = Server.CreateObject("ADODB.Recordset") rsEcoles.ActiveConnection = MM_vieScolaire_STRING rsEcoles.Source = "SELECT * FROM vieScolaire WHERE Champ1 = '" + Replace(rsEcoles__MMColParam, "'", "''") + "'" rsEcoles.CursorType = 0 rsEcoles.CursorLocation = 2 rsEcoles.LockType = 3 rsEcoles.Open() rsEcoles_numRows = 0 %> <% Dim rsPeriScolaire__MMColParam rsPeriScolaire__MMColParam = "Activités péri-scolaires" if (Request("MM_EmptyValue") <> "") then rsPeriScolaire__MMColParam = Request("MM_EmptyValue") %> <% set rsPeriScolaire = Server.CreateObject("ADODB.Recordset") rsPeriScolaire.ActiveConnection = MM_vieScolaire_STRING rsPeriScolaire.Source = "SELECT * FROM vieScolaire WHERE Champ1 = '" + Replace(rsPeriScolaire__MMColParam, "'", "''") + "'" rsPeriScolaire.CursorType = 0 rsPeriScolaire.CursorLocation = 2 rsPeriScolaire.LockType = 3 rsPeriScolaire.Open() rsPeriScolaire_numRows = 0 %> Site officiel de Lacaune-Les-Bains