🚀 go-pugleaf

Jeg har fundet ud af hvad der gentager mailen

JMail.Execute

efter jeg har fjernet den, kommer der kun en mail
men hvad bruger man den s� til ????


mvh Erik







> JMail.Logging = True
> JMail.Silent = True
>
> JMail.ServerAddress = "websmtp.dch-haslev.dk"
>
> JMail.Charset = "iso-8859-1"
> JMail.ContentTransferEncoding = "8bit"
> ' JMail.Message.ReplyTo = "dch-haslev@dch-haslev.dk"
>
> JMail.Message.ReplyTo = strEmail
> JMail.Sender = "dch-haslev@dch-haslev.dk"
> JMail.Subject = "Indmeldelse fra hjemmesiden"
> JMail.AddRecipient strModtager
> JMail.AddRecipientBCC strEmailBCC1
> ' JMail.AddRecipientBCC strEmailBCC2
> ' JMail.AddRecipientBCC strEmailBCC3
> JMail.Priority = 3
> JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
>
>
>
>
>
> ' ********** Her starter selve email-en
> JMail.Body = body_text
> ' ********** Her slutter selve email-en
> JMail.Execute
>
> ' test stop efter Execute
> ' response.write "ReplyTo " & strEmail & "<br>"
> ' response.write "Mail er netop afsendt " & strModtager & "<br>"
> ' response.end
> ' test stop efter Execute slut
>
>
> If Not JMail.Execute Then
> Response.Write "ERROR MESSAGE: " & JMail.ErrorMessage & "<br>" & vbCrLf
> Response.Write "ERROR SOURCE: " & JMail.ErrorSource & "<br>" & vbCrLf
> Response.Write "LOG: <pre>" & JMail.Log & "</pre>" & vbCrLf
> Else
> Response.Write "<html><body>Emailen er sendt igen !</body></html>"
>
> ' response.end
> ' test stop efter Execute slut
> End If
>
> Set JMail = Nothing
>
> Response.Redirect ("tak.asp?hunden=" & strHundnavn)
> %>