%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<%
dim waserror,strerror
strerror="Bitte geben Sie ins Feld eine gueltige Leistung ein:"
waserror=false
if request.form("Submit")<>"" then
if request.form("name")="" then : strerror=strerror & "\r\n Vorname" : waserror=true : end if
if request.form("lastname")="" then : strerror=strerror & "\r\n Nachname" : waserror=true : end if
if request.form("email")="" or inStr(request.form("email"),"@")<1 then : strerror=strerror & "\r\n Email" : waserror=true : end if
if waserror=false then
server.transfer("contactsend.asp")
end if
end if
%>
Golden Beach Hotel Apartments in Hersonissos Accommodation in Hersonissos Hotels in Hersonissos