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

Témoignages

 

Nous sommes assez nombreux dans le monde à avoir vécu un ouragan ou un cyclone; mais peu d'entre nous osent raconter ce qu'ils ont vécu, tant il s'agit d'un événement douloureux. Il marque les esprits et les corps, blesse la nature et la défigure, mais très souvent les mots manquent ou la mémoire vacille.

Toutefois, comme pour vaincre leur peur, certains ont souhaité faire partager leur expérience en relatant comment ils ont vécu le passage d'un cyclone, en faisant passer aux lecteurs leurs émotions, leurs sensations.

Vous avez vécu un cyclone, un ouragan? Vous voulez en parler? Ecrivez votre texte et envoyez le à temoins@ouragans.com.

Voici les récits de ceux qui ont osé:

Hugo (Guadeloupe - 1989)

 • Histoire 1

 • Histoire 2

 • Histoire 3

 • Histoire 4

Firinga (Réunion - 1989)

 • Histoire 1

 • Histoire 2

Georges (Saint Kitts - 1998)

 • Histoire 1

Lenny (Saint Martin - 1999)

 • Histoire 1

Merci à ceux qui ont participé, merci à ceux qui ont lu ces histoires, merci à ceux qui en ajouteront...

 

 


Shopping
 
 
 


 
Abris Sûrs
 

Recherchez l'abri cyclonique le plus proche de chez vous!

  Recherche par:

  Entrez votre sélection:

 
 
 
Archives
 

Recherchez un cyclone par