%@LANGUAGE="VBSCRIPT" CODEPAGE=65001 %> <% Session.LCID = 1036 %> <% set maConn1 = Server.createObject("ADODB.Connection") maConn1.open "musicopera" set maConn2 = Server.createObject("ADODB.Connection") maConn2.open "vieMO" ' on publie les spectacle pendant une semaine, dans un mois (si on est le 14 mars, on publie du 14 au 21 avril) laDateDeb = date() + 30 laDateFin = date() + 37 sqlVieMO = "SELECT * FROM tAnnonces WHERE tAnnonces.annonceValide = true" set rVieMO = Server.CreateObject("ADODB.Recordset") rVieMO.open sqlVieMO, maConn2 sqlActu7 = "SELECT * FROM Ensemble WHERE (Ensemble.laDate > #"&laDateDeb&"# AND Ensemble.laDate <= #"&laDateFin&"# and Ensemble.tempsFort = true) ORDER BY Ensemble.laville ASC, Ensemble.leNumero ASC, Ensemble.laDate ASC, Ensemble.operaConcert DESC, Ensemble.leCompositeur ASC;" set rActu7 = Server.createObject("ADODB.Recordset") rActu7.open sqlActu7, maConn1 leMsg = "" if rActu7.EOF = false and rActu7.BOF = false then rActu7.MoveFirst else leMsg = "Désolé, il n'y a rien pour aujourd'hui, revenez demain, ou consulter tous les programmes sur notre page de recherche !!! " end if %>
Aide
Quelques conseils pour optimiser votre recherche. |
||
Le flux RSS de music-opera.com Cliquez sur les logos RSS, pour affichez le flux de music-opera.com. |
||
L'actualité de music-opera.com se divise en deux parties : - L'actualité de Music-Opera.com : vous renseigne sur l'activité du site de music-opera.com.
La seconde sélection vous présente également une période de 7 jours mais cette fois-ci dans deux mois.
Le calendrier situé sur la page d’accueil, vous permet d’accéder rapidement aux programmes du jour sélectionné sur une période de deux mois.
|
||