Oh man... Ich hatte zwei Parameter vertauscht... Danke hat sich schon
erledigt. Sorry f�r die Bel�stigung!

Manchmal sieht man den F�rster vor lauter Wald nicht... Oder wie war
das? *G*

Gru�
Sebastian Krebs

> -----Urspr�ngliche Nachricht-----
> Von: Sebastian Krebs - CreativeWebTeam 
> [mailto:[EMAIL PROTECTED]] 
> Gesendet: Mittwoch, 18. September 2002 13:15
> An: '[EMAIL PROTECTED]'
> Betreff: Problem mit JMail
> 
> 
> Hi,
> 
> Warum funktioniert folgende Zeile Code:
> 
> objNewMail.AddRecipient "[EMAIL PROTECTED]"
> 
> Aber diese nicht:
> 
> objNewMail.AddRecipient "" & strRecipients & ""
> 
> Auch wenn in strRecipients die gleiche Emailadresse drin steht???
> 
> 
> ---
> Hier der Code:
> 
> Function 
> sendEmail(theName,theEmail,theSubject,theText,theSenderName,th
> eSenderEmail)
>        
>        'Mail wird vorbereitet
>        Dim Err_Msg
>        Err_Msg = ""
>        
>        Dim strFromName
>        strFromName = "" & theSenderName & ""
>        Dim strSender
>        strSender = "" & theSenderEmail & ""
>        Dim strRecipients
>        strRecipients = "" & theEmail & ""
>        Dim strRecipientsName
>        strRecipientsName = "" & theName & ""
>        Dim strMailServer
>        strMailServer = "" & getMailServer() & ""
>          
>        strSubject = "" & theSubject & ""
>        
>        Dim strMessage
>        strMessage = "" & theText & ""
>        strMessage = replace(strMessage, vbCrLf, "" & chr(13) 
> & chr(10) & "")
>        
>        'Mail wird erzeugt
>        Set objNewMail = Server.CreateObject("Jmail.SMTPMail")
>        objNewMail.ServerAddress = strMailServer
>        objNewMail.AddRecipient "" & strRecipients & ""
>        objNewMail.Sender = strSender
>        objNewMail.Subject = strSubject
>        objNewMail.body = strMessage
>        objNewMail.priority = 3
> 
>        on error resume next '## Ignore Errors
>        objNewMail.execute
>        If Err <> 0 Then 
>               'Fehlermeldung rausschreiben
>               Err_Msg = Err_Msg & "<li>" & Err.Description & "</li>"
>               Response.Write "<p><font color=""#FF0000"">Beim 
> Emailversand ist folgender Fehler aufgetreten:</p>"
>               Response.Write "<p>" & Err_Msg & "</p></font>"
>               Response.Write Err.Source & "<br>"
>               Response.Write Err.HelpContext & "<br>"
>               Response.Write Err.Source & "<br>"
>               Response.Write Err.NativeError & "<br>"
>               sendEmail = false
>        ELSE
>               'Erfolgsmeldung schreiben
>               sendEmail = true
>        End if
>        objNewMail.close
>       
> End Function
> ---
> 
> Die Emailadresse kommt aus einem Formular. Kann es sein, dass 
> die falsch umcodiert wird, sodass Jmail nix mehr mit anfangen kann?
> 
> Gru�
> Sebastian
> 


| 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

Antwort per Email an