Ich habe folgendes Problem:
Ich versende und �berpr�fe Daten aus einem Formular mit folgendem ASP
Code. Aus irgendeinem Grund wir die mail aber immer 2 x versendet. Wei�
einer warum das so ist und wie ich das abstelle?
<html>
<head>
<title></title>
<link rel="stylesheet" href="../esto.css" type="text/css">
</head>
<body bgcolor="#FFFFFF">
<font size="2">
<%
Name = request.form("Name")
Absemail = request.form("email")
Vorname= request.form("Vorname")
Anfrage= request.form("Anfrage")
IF (Name="") THEN
ErrMsg = ErrMsg+"Bitte geben Sie ihren Namen ein!<br>"
end if
IF (Vorname="") THEN
ErrMsg = ErrMsg+"Bitte geben Sie ihren Vornamen ein!<br>"
end if
IF Instr(AbsEmail,"@") = 0 or Instr(AbsEmail,".") = 0 or (Absemail="")
THEN
ErrMsg = ErrMsg+"Bitte geben Sie eine g�ltige e-mail Adresse ein!<br>"
end if
IF (Anfrage="") THEN
ErrMsg = ErrMsg+"Bitte geben Sie eine Anfrage ein!<br>"
End If
if (errmsg="") then
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.utanet.at"
Mail.From = Absemail
Mail.FromName = Name
Mail.AddAddress "[EMAIL PROTECTED]", "Steiner"
Mail.Subject = "Anfrage"
BodyMsg = "Anfrage:" + Chr(10)
BodyMsg = BodyMsg + "Name = " & Name & Chr(10)
BodyMsg = BodyMsg + "Vorname = " & Vorname & Chr(10)
BodyMsg = BodyMsg + "Email = " & Absemail & Chr(10)
BodyMsg = BodyMsg + "Anfrage = " & Anfrage & Chr(10)
Mail.Body = BodyMsg
On Error Resume Next
Mail.Send
If Err <> 0 Then
ErrMsg = "Ihre Anfrage konnt aufgrund folgenden Fehlers nicht gesendet
werden:" & Err.Description
Else
ErrMsg = "Ihre Anfrage wurde erfolgreich gesendet!<BR>"
ErrMsg = ErrMsg + "Danke f�r Ihr Interesse!"
End If
else Meldung()
end if
function Meldung
end function
%>
</font>
<table border="0" cellpadding="0" cellspacing="0" width="100%"
align="center">
<tr>
<td width="100%" align="center">
<hr width="90%">
</td>
</tr>
<tr>
<tr>
<td align="center"><font face="Arial"
size="2"><strong><%=ErrMsg%></strong></font></td>
</tr>
<tr> </tr>
</table>
</body>
</html>
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
