<% accessdb="/sondages/votestan.mdb" cn="driver={Microsoft Access Driver (*.mdb)};" cn=cn & "dbq=" & server.mappath(accessdb) Set db = Server.CreateObject("ADODB.Connection") db.Open cn,"","" ' Là je teste si l'internaute a voté pour un des deux formulaires IF request.Form("VOTE1")<>"" OR request.Form("VOTE2")<>"" Then ' Il a voté ' Maintenant on va tester si il a déjà voté pour la question (en question) accessdb="/sondages/votestan" set rs = server.createobject("ADODB.Recordset") sql = "select ip from VOTES" sql = sql + " where ip ='" & Request.ServerVariables("REMOTE_ADDR") & "' and IDQUESTION=" & Request.Form("question") rs.Open sql, db if rs.eof then rs.close Set rs=Nothing ' Il n'a pas encore voté pour cette question ' donc on va mettre à jour les deux tables (QUESTIONS et VOTES) 'On commence par la Table VOTES sql = "insert into VOTES (IDQUESTION,IP,SELECTION,DATEVOTE) " sql = sql & "values (" & Request.Form("QUESTION") & ",'" & Request.ServerVariables("REMOTE_ADDR") & "'," sql = sql & Request.Form("a_input") & ",#" & DATE() & "#)" db.execute(sql) 'Puis par la table QUESTIONS sql = "UPDATE QUESTIONS SET SELECTION" & REQUEST.FORM("a_input") & "=SELECTION" & REQUEST.FORM("a_input") & "+ 1" sql = sql & " Where IDQUESTION=" & Request.Form("question") db.execute(sql) Else rs.close Set rs=Nothing END IF END IF %>

Menu

A la Une
La Guadeloupe épargnée par les cyclones depuis le début de la saison

Alors que les prévisions du Pr. Gray laissaient attendre une saison active, aucun phénomène marquant n'a touché directement l'archipel Guadeloupéen. Seules quelques ondes tropicales de plus ou moins forte intensité sont passées au voisinage ou directement sur la Guadeloupe. Actuellement, ce sont les grandes manoeuvres dans les mairies pour revoir et mettre en place le plan ORSEC (ORganisation des SECours). Météo France et la Préfecture de Région de sont pas de reste et nous devrions être prêts si un phénomène devait nous concerner.
Un regrêt quand même... Certaines municipalités n'ont pas jugé utile de nous communiquer la liste de leurs abris sûrs sur leur territoire.

Présentation Générale

Océan:	Atlantique
Coordonnées:	16°1 N 61°5 W
Situation:	Archipel des Petites Antilles, bordée par la Mer des Antilles à l'Ouest, et par l'Océan Atlantique à l'Est. Elle fait partie des Iles du Vent, entre la Dominique (au sud) et Antigue (au nord)
Distances:	Paris 6 756 km, New York 2 969 km, Cayenne 1 636 km, Fort-de-France 196 km.
Superficie:	1709 km²
Capitale:	Basse Terre.
Cap. Econ:	Pointe à Pitre
Population:	426.000 hab (1999)

Description:

La Guadeloupe est formée de deux îles principales, Basse Terre et Grande Terre, séparées par un bras de mer, la Rivière Salée et de plusieurs petites iles.
Malgré son nom, la Basse Terre est la plus élevée (volcan de la Soufrière, 1467 m); Grande Terre est un plateau qui dépasse à peine 100m.
Plusieurs îles complètent l'archipel: La Désirade, Marie Galante, les Saintes, Saint Barthélémy et la moitié nord de Saint Martin.

A la Une
La Guadeloupe épargnée par les cyclones depuis le début de la saison

Alors que les prévisions du Pr. Gray laissaient attendre une saison active, aucun phénomène marquant n'a touché directement l'archipel Guadeloupéen. Seules quelques ondes tropicales de plus ou moins forte intensité sont passées au voisinage ou directement sur la Guadeloupe. Actuellement, ce sont les grandes manoeuvres dans les mairies pour revoir et mettre en place le plan ORSEC (ORganisation des SECours). Météo France et la Préfecture de Région de sont pas de reste et nous devrions être prêts si un phénomène devait nous concerner.
Un regrêt quand même... Certaines municipalités n'ont pas jugé utile de nous communiquer la liste de leurs abris sûrs sur leur territoire.

Présentation Générale

Océan:	Atlantique
Coordonnées:	16°1 N 61°5 W
Situation:	Archipel des Petites Antilles, bordée par la Mer des Antilles à l'Ouest, et par l'Océan Atlantique à l'Est. Elle fait partie des Iles du Vent, entre la Dominique (au sud) et Antigue (au nord)
Distances:	Paris 6 756 km, New York 2 969 km, Cayenne 1 636 km, Fort-de-France 196 km.
Superficie:	1709 km²
Capitale:	Basse Terre.
Cap. Econ:	Pointe à Pitre
Population:	426.000 hab (1999)

Shopping

Abris Sûrs


	Recherchez l'abri cyclonique le plus proche de chez vous! Recherche par: Entrez votre sélection:

Pronostics


	<%LENUMERODEMAQUESTION=1 ' (par exemple) set rs = server.createobject("ADODB.Recordset") sql = "select question from questions Where IDQUESTION=" & LENUMERODEMAQUESTION ' LENUMERODEMAQUESTION est le numéro que tu auras choisi rs.Open sql, db QUESTION=rs("question") rs.Close Set rs=Nothing ' Maintenant tu formates ton formulaire %> "> <%= question %> : Aucun 1 à 2 3 4 5 ou plus <% ' Si tu veux utiliser le même script plusieurs fois sur ta page, nomme la balise suivante avec 1 nom différent ' . Là g mis VOTE1 %>

Archives


	Recherchez un cyclone par