Le Gîte l'Aubergelle

Photos supplémentaires du gîte L'Aubergelle et nos liens Internet

<% If Request("Submit") = "Envoyer" Then res1=request.form("pers1")&request.form("ch1")&request.form("nuit1") res2=request.form("pers2")&request.form("ch2")&request.form("nuit2") res3=request.form("pers3")&request.form("ch3")&request.form("nuit3") res4=request.form("pers4")&request.form("ch4")&request.form("nuit4") strHost = "mail.sogetel.net" Set Mail = Server.CreateObject("Persits.MailSender") ' enter valid SMTP host Mail.Host = strHost if request.form("courriel")<>"" then Mail.From = request.form("courriel") end if Mail.FromName = request.form("nom") Mail.AddAddress "mario.v@cgocable.ca" ' message subject Mail.Subject = "RŽservations, Demande d'information envoyŽs ˆ partir du site VŽlozone" ' message body Mail.IsHTML = False strBody ="RŽservations, Demande d'information envoyŽs ˆ partir du site VŽlozone"& chr(13) strBody = strBody & " " & chr(13) strBody =strBody & " Nom : " & request.form("nom")& chr(13) strBody = strBody & " " & chr(13) strBody = strBody & " Adresse : "& request.form("adresse")& chr(13) strBody = strBody & " TŽlŽphone : "& request.form("tel")& chr(13) strBody = strBody & " TŽlŽcopieur : "& request.form("fax")& chr(13) if request.form("courriel")<>"" then strBody = strBody & " Courriel : "& request.form("courriel")& chr(13) end if strBody = strBody & " " & chr(13) if request.form("message")<>"" then strBody = strBody & "--------------------------------" & chr(13) strBody = strBody & "Demande d'informations | Remarques: "& request.form("message")& chr(13) end if strBody = strBody & " " & chr(13) strBody = strBody & "--------------------------------" & chr(13) strBody = strBody & "Demande de rŽservation : "& chr(13) if request.form("p_arrivee")<>"" then strBody = strBody & " Date d'arrivŽe : "&request.form("p_arrivee")& chr(13) end if if request.form("p_arrivee")<>"" then strBody = strBody & " Date de dŽpart : "&request.form("p_depart")& chr(13) end if if res1<>"" then strBody = strBody & " "& chr(13) strBody = strBody & "RŽservation 1 : "& chr(13) strBody = strBody & " - Nombre de personne(s) : "&request.form("pers1")&" personne(s)"& chr(13) strBody = strBody & " - Nombre de chambre(s) : "&request.form("ch1")&" chambre(s)"& chr(13) strBody = strBody & " - Nombre de nuit(s) : "&request.form("nuit1")&" nuit(s)"& chr(13) end if if res2<>"" then strBody = strBody & " "& chr(13) strBody = strBody & "RŽservation 2 : "& chr(13) strBody = strBody & " - Nombre de personne(s) : "&request.form("pers2")&" personne(s)"& chr(13) strBody = strBody & " - Nombre de chambre(s) : "&request.form("ch2")&" chambre(s)"& chr(13) strBody = strBody & " - Nombre de nuit(s) : "&request.form("nuit2")&" nuit(s)"& chr(13) end if if res3<>"" then strBody = strBody & " "& chr(13) strBody = strBody & "RŽservation 3 : "& chr(13) strBody = strBody & " - Nombre de personne(s) : "&request.form("pers3")&" personne(s)"& chr(13) strBody = strBody & " - Nombre de chambre(s) : "&request.form("ch3")&" chambre(s)"& chr(13) strBody = strBody & " - Nombre de nuit(s) : "&request.form("nuit3")&" nuit(s)"& chr(13) end if if res4<>"" then strBody = strBody & " "& chr(13) strBody = strBody & "RŽservation 4 : "& chr(13) strBody = strBody & " - Nombre de personne(s) : "&request.form("pers4")&" personne(s)"& chr(13) strBody = strBody & " - Nombre de chambre(s) : "&request.form("ch4")&" chambre(s)"& chr(13) strBody = strBody & " - Nombre de nuit(s) : "&request.form("nuit4")&" nuit(s)"& chr(13) end if strBody = strBody & " "& chr(13) strBody = strBody & request.form("cycliste")& chr(13) Mail.Body = strBody Mail.Send ' send message end if %> Le Gîte l'Aubergelle

RÉSERVATIONS, DEMANDE D'INFORMATION

GÎTE L'AUBERGELLE
445, rang Saint-Alexis
Nicolet, (Québec)
J3T 1T5

Rose-Aimée Bédard et Francine Lalonde
Tél. : (819) 293-6215
Téléc. : (819) 293-5689