%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% yearIn = Year(Date) %> <% If request("reset") ="true" Then session("ass.titre") = 0 session("ass.code") = "" session("ass.nom")="" session("ass.prenom")="" session("ass.age") = 0 session("ass.fumeur") = "" session("ass.adresse") = "" session("ass.postal") = "" session("ass.ville") = "" session("ass.mail") = "" session("ass.tel") = "" session("ass.port") = "" session("ass.profession") = 0 session("pret.amortissement")=0 session("pret.diff")=0 session("pret.montant")=0 session("pret.quotite")=100 session("pret.duree")=0 session("pret.taux")=0 session("pret.date")="" session("pret.periodicite")=0 session("pret.mois")=Month(Date)+1 session("pret.annee")=Year(Date) session("garantie.option")=0 session("garantie.franchise")=0 End If path=server.mappath(".") DSN="cabip_simul" Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open DSN %>