<% 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

La Table de Conversion

un kilomètre (km):
0.62 mile
0.54 mile nautique

un mile (m):
1.609 kilomètre
0.87 mile nautique

un mile nautique (nm):
1/60 de degré de latitude
1.852 kilomètre
1.15 mile

un nœud (kt):
un mile nautique par heure
1.852 kilomètre heure (km/h)
1.15 mile par heure (mph)

Utilisez le tableau suivant pour établir une estimation rapide de la distance qui vous sépare de la prochaine perturbation.

Un degré de longitude équivaut à:

à une latitude de miles nautiques miles kilomètres

0° N 60 69 111

15° N 50.1 57.6 92.7

17.5° N 48.4 55.7 89.6

20° N 46.8 53.8 86.6

Par exemple: Supposons que le centre d'une tempête tropicale est situé par 15° N, 40° W, se déplace à 29 km/h.
La plupart des Iles du Vent (Leeward Islands - de la Dominique aux Iles Vierges) sont aux alentours de 61° W. La distance est donc de 61-40=21° de longitude. À 15° N, ça équivaut à 21x92.7 = 1947 km. Donc la tempête prendra approximativement 1947/29= 67 heures, soit près de 3 jours pour atteindre les îles. C'est une estimation large car le centre de la tempête doit rester à la même latitude et se déplacer à une vitesse constante.

Calculateur de distance

Saisissez les coordonnées d'un cyclone tropical, et les coordonnées de votre lieu de résidence, et vous obtiendrez la distance à parcourir, et le cap à suivre. Vous pourrez ainsi comparer ces chiffres aux prévisions du NHC.

Latitude 1

Longitude1

Latitude 2

Longitude 2

Trajectoire 1->2

Trajectoire 2->1

Distance

Résultat

Unités: Modèle de calcul:

Mesures d'angle et direction

Angle Direction

0°

N

22.5°

NNE

45°

NE

67.5°

ENE

90°

E

112.5°

ESE

135°

SE

157.5°

SSE

180°

S

202.5°

SSW

225°

SW

247.5°

WSW

270°

W

292.5°

WNW

315°

NW

337.5°

NNW

Annuaire


	Recherche d'une société par son nom, son numéro de téléphone, son adresse ou par secteur d'activité.

Abris Sûrs


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

Sondage


	<%LENUMERODEMAQUESTION=2 ' (par exemple) set rs = server.createobject("ADODB.Recordset") sql = "select question from questions Where IDQUESTION=" & LENUMERODEMAQUESTION rs.Open sql, db QUESTION=rs("question") rs.Close Set rs=Nothing %> "> <%= question %> : Sans avis Inutile Un peu utile Utile Nécessaire

Archives


	Recherchez un cyclone par