<% 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 %> Archives sud de l'Océan Indien 1989
Menu
Infos pratiquesInfos ScientifiquesArchives de l'océan Indien Nord (en cours de constitution) Archives du Pacifique Est La boutique des TempêtesLa Foire Aux Questions © C. LandseaLes liens utilesEn cours de rénovation Les organismes de référenceLes contributeurs à ce site...Les grandes figures de la météo cyclonique

Les Données Cycloniques de 1989


Résumé Individuel des Tempêtes
N.B: Les cyclones tropicaux ou tempêtes ayant affecté l'île de la Réunion ou la Nouvelle Calédonie sont en rouge.

Vents en noeuds, pression en millibars, catégorie Saffir-Simpson.

#
Noms
Dates
Vent
Pres
Cat
1
 Cyclone #1
30 OCT- 8 NOV
75
-
1
2
 Cyclone #2
5-20 NOV
100
-
3
3
 Cyclone #3
12-18 DEC
85
-
2
4
 Tempête tropicale #4
29 DEC- 4 JAN
60
-
-
5
 Tempête tropicale #5
6-10 JAN
45
-
-
6
 Cyclone #6
6-15 JAN
75
-
1
7
 Cyclone #7
17-26 JAN
115
-
4
8
 Cyclone #8 Firinga
24 JAN- 1 FEV
90
-
2
9
 Cyclone #9
5-10 FEV
75
-
1
10
 Cyclone #10
6-22 FEV
130
-
4
11
 Cyclone #11
14 FEV- 1 MAR
125
-
4
12
 Cyclone #12
17-22 FEV
65
-
1
13
 Cyclone #13
22 FEV- 2 MAR
100
-
3
14
 Cyclone #14
23 FEV- 1 MAR
90
-
2
15
 Cyclone #15
23-27 FEV
90
-
2
16
 Tempête tropicale #16
23-25 FEV
45
-
-
17
 Tempête tropicale #17
28 FEV- 5 MAR
35
-
-
18
 Tempête tropicale #18
7-11 MAR
35
-
-
19
 Cyclone #19
21-31 MAR
65
-
1
20
 Cyclone #20
24 MAR- 1 AVR
100
-
3
21
 Cyclone #21
26 MAR- 9 AVR
105
-
3
22
 Tempête tropicale #22
30 MAR- 3 AVR
50
-
-
23
 Cyclone #23
29 MAR- 5 AVR
120
-
4
24
 Tempête tropicale #24
4- 9 AVR
45
-
-
25
 Cyclone #25
6-13 AVR
110
-
3
26
 Cyclone #26
16-23 AVR
140
-
5
27
 Tempête tropicale #27
1-11 MAI
50
-
-
28
 Tempête tropicale #28
6-13 MAI
35
-
-

Détails Individuels des Tempêtes
N.B: Les cyclones tropicaux ou tempêtes ayant affecté l'île de la Réunion ou la Nouvelle Calédonie sont en rouge.

Track

Cyclone #1
(30 OCT-08 NOV)

Vents maxi: 75
Catégorie: 1

Cyclone #2
 (05-20 NOV)

Vents maxi: 100
Catégorie: 3

Track

Cyclone #3
(12-18 DEC)

Vents maxi: 85
Catégorie: 2

Tempête tropicale #4
(29 DEC-04 JAN)

Vents maxi: 60

Tempête tropicale #5
(06-10 JAN)

Vents maxi: 45

Cyclone #6
 (06-15 JAN)

Vents maxi: 75
Catégorie: 1

Cyclone #7
 (17-26 JAN)

Vents maxi: 115
Catégorie: 4

Cyclone #8 (Firinga)
(24 JAN-01 FEV)

Vents maxi: 90
Catégorie: 2
Passage sur l'île de la Réunion le 29 janvier d'est en ouest
4 morts, 52 blessés

Cyclone #9
 (05-10 FEV)

Vents maxi: 75
Catégorie: 1

Cyclone #10
 (06-22 FEV)

Vents maxi: 130
Catégorie: 4

Cyclone #11
(14 FEV-01 MAR)

Vents maxi: 125
Catégorie: 4

Cyclone #12
(17-22 FEV)

Vents maxi: 65
Catégorie: 1

Cyclone #13
(22 FEV-02 MAR)

Vents maxi: 100
Catégorie: 3

Cyclone #14
 (23 FEV-01 MAR)

Vents maxi: 90
Catégorie: 2

Cyclone #15
 (23-27 FEV)

Vents maxi: 90
Catégorie: 2

Tempête tropicale #16
 (23-25 FEV)

Vents maxi: 45

Tempête tropicale #17
 (28 FEV-05 MAR)

Vents maxi: 35

Tempête tropicale #18
(07-11 MAR)

Vents maxi: 35

Cyclone #19
 (21-31 MAR)

Vents maxi: 65
Catégorie: 1

Cyclone #20
 (24 MAR-01 AVR)

Vents maxi: 100
Catégorie: 3

Cyclone #21
 (26 MAR-09 AVR)

Vents maxi: 105
Catégorie: 3

Tempête tropicale #22
 (30 MAR-03 AVR)

Vents maxi: 50

Cyclone #23
(29 MAR-05 AVR)

Vents maxi: 120
Catégorie: 4

Tempête tropicale #24
(04-09 AVR)

Vents maxi: 45

Cyclone #25
(06-13 AVR)

Vents maxi: 110
Catégorie: 3

Cyclone #26
 (16-23 AVR)

Vents maxi: 140
Catégorie: 5

Tempête tropicale #27
 (01-11 MAI)

Vents maxi: 50

Tempête tropicale #28
 (06-13 MAI)

Vents maxi: 35

Document original fourni par , traduit par le webmaster
Shopping
  Cassettes Vidéo
Livres en français
Livres en anglais		  
 
 
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