<% Flag = request.form("Flag") If IsEmpty(Flag) or Flag = "" then %>
  Die Preise unserer Ferienwohnungen liegen zwischen 45 und 75 Euro pro Tag für Wohnungen für 2 bis 4 Personen. Für Preise und Angebote, auch für die Schwaige auf der Seiser Alm, welche wir von Mitte Juni is Mitte Sptember vermieten, schicken Sie uns doch einfach eine das Anfrageformular und wir freuen uns schon jetzt, Ihnen ein Angebot unterbreiten zu können.
Familie Rabanser.
ANFRAGE
  Zeitraum von bis  
Erwachsene Kinder
Unterkunft:
 
Anmelder Frau Herr
Vorname:
Nachname:
Anschrift:
PLZ / Ort:
-
Land / Provinz:    
e-Mail:
Telefon / Fax: -
Notiz:
Flag: <%= Flag %>
               
 
 
<% end if If Flag = 2 then If IsEmpty(request.form("Personen")) or request.form("Personen")="" then response.write "
" response.write "


Sie müssen die Personenanzahl eingeben.
" response.write "

" response.write "" response.write "
" response.end Else Personen = request.form("Personen") End If If IsEmpty(request.form("Nachname")) or request.form("Nachname")="" or request.form("Nachname")=" " then response.write "
" response.write "


Sie müssen einen Nachnamen eingeben.
" response.write "

" response.write "" response.write "
" response.end Else Nachname = request.form("Nachname") End If If IsEmpty(request.form("Vorname")) or request.form("Vorname")="" or request.form("Vorname")=" " then response.write "
" response.write "


Sie müssen einen Vornamen eingeben!" response.write "

" response.write "" response.write "
" response.end Else Vorname = request.form("Vorname") End If Flag = request.form("Flag") Anschrift = request.form("Anschrift") PLZ = request.form("PLZ") Ort = request.form("Ort") Nation = request.form("Nation") Provinz = request.form("Provinz") Email = request.form("Email") Telefon = request.form("Telefon") Fax = request.form("Fax") Nachricht = request.form("Nachricht") Kinder = request.form("Kinder") ZeitVon = request.form("ZeitVon") ZeitBis = request.form("ZeitBis") Unterkunft = request.form("Unterkunft") Geschlecht = request.form("Geschlecht") Set Mail = CreateObject("CDONTS.Newmail") Mail.From = "info@stampfeterhof.com" Mail.To = "info@stampfeterhof.com" Mail.Subject = "Neue Anfrage" Msg = "Anfrage von: " & request("Geschlecht") & " " & request("Vorname") & " " & request("Nachname") & vbcrlf Msg = Msg & "Ort: " & request("Nation") & "-" & request("PLZ") & " " & request("Ort") & " " & request("Provinz") & vbcrlf Msg = Msg & "Anschrift: " & request("Anschrift") & vbcrlf Msg = Msg & "Telefon: " & request("Telefon") & vbcrlf Msg = Msg & "Fax: " & request("Fax") & vbcrlf Msg = Msg & "E-Mail: " & request("EMail") & vbcrlf Msg = Msg & "Termin: " & request("ZeitVon") & " - " & request("ZeitBis") & vbcrlf Msg = Msg & "Erwachsene: " & request("Personen") & vbcrlf Msg = Msg & "Kinder: " & request("Kinder") & vbcrlf Msg = Msg & "Unterkunft: " & request("Unterkunft") & vbcrlf Msg = Msg & "Nachricht: " & request("Nachricht") & vbcrlf Mail.Body = Msg Mail.Send Set Mail = Nothing %>
IHRE BUCHUNG WURDE ABGESENDET
UND WIRD VON UNS SO SCHNELL WIE MÖGLICH BEARBEITET !
<% end if %>