Avatar billede malte Nybegynder
12. februar 2003 - 22:38 Der er 1 kommentar og
1 løsning

persists kan ikke sende?

hvorfor kan denne ikke sende mine mails??

set mail     = server.CreateObject("Persits.MailSender")
        mail.Host     = RSBODY("SMTP")
        mail.From     = rsBody("From_Email")
        mail.FromName     = rsBody("From_Email")
        mail.AddAddress = rsPassword("U_EMAIL")
        mail.Subject     = "Your User Name and Password"
        mail.Body     = "Your user name and password are below as requested:" & vbCrLf
            mail.Body = mail.Body& "User Name  : " &(rsPassword.Fields.Item("U_ID").Value) & vbCrLf
            mail.Body= mail.Body & "Password    : " &(rsPassword.Fields.Item("U_Password").Value) & vbCrLf & vbCrLf
            Mail.Body = mail.Body & "You may now use these to log on"

        on error resume next
        mail.Send
        var_done = "1"
       
    elseif RSBODY("Component") = "ASPmail" then
Avatar billede hastek22 Nybegynder
12. februar 2003 - 22:55 #1
Hej jer er ikke umiddelbart kendt med Persist (jeg anvender Jmail og ServerObjects SMTPsvg.Mailer), men det springer mig i øjet at du ikke angiver en gyldig mail server (eks. mail.host = mail.ditdoæne.dk) og en gyldig afsender adresse i domænet (eks. navn@ditdomæne.dk) disse skal normalt ligge i samme domæne, da mail komponenten ellers kan anvendes af alle til eks. spam.
Derudover kan der være web-hoteller, der kræver at de adr. der anvendes ifm. mail komponenter skal have et specielt SMTP-override for at kunne anvende mailkomponenten. Start med at prøve med dine egne konti.

Jeg har vedhæftet Persists egen vejledning herunder.

http://www.aspemail.com/codesample.html

<%
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "smtp.smtp-server.com" ' Specify a valid SMTP server
Mail.From = "sales@veryhotcakes.com" ' Specify sender's address
Mail.FromName = "VeryHotCakes Sales" ' Specify sender's name

Mail.AddAddress "andy@andrewscompany.net", "Andrew Johnson, Jr."
Mail.AddAddress "paul@paulscompany.com" ' Name is optional
Mail.AddReplyTo "info@veryhotcakes.com"
Mail.AddAttachment "c:\images\cakes.gif"

Mail.Subject = "Thanks for ordering our hot cakes!"
Mail.Body = "Dear Sir:" & Chr(13) & Chr(10) & _
    "Thank you for your business."

On Error Resume Next
Mail.Send
If Err <> 0 Then
  Response.Write "Error encountered: " & Err.Description
End If
%>
Avatar billede malte Nybegynder
17. januar 2004 - 19:36 #2
lukker
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester