Toon posts:

[Perl] HTML-mail via sendmail / windmail

Pagina: 1
Acties:
  • 70 views sinds 30-01-2008

Verwijderd

Topicstarter
Ik wil een in HTML opgemaakt mailtje verzenden via windmail. (de windows variant van de UNIX sendmail, is praktisch gelijk in gebruik) Hoe krijg ik dit voor elkaar? Momenteel gebruik ik iets dergelijks als subroutine om de mail te verzenden.
code:
1
2
3
4
5
6
7
8
9
10
11
sub send_mail {
    $tempfile = &GetTempFileName($tempdir, "FM");
    open(MAIL,">$tempfile") || die("Cannot open $tempfile -- Check Directory Permissions : $!"); 
    print MAIL "To: \"ONTVANGER\" <the-prospector\@email.com>\n";
    print MAIL "From: \"AFZENDER\" <the-prospector@email.com>\n";
    print MAIL "Subject: HET ONDERWERP\n\n";
    print MAIL $message;
    close (MAIL);
    system("C:/windmail/windmail.exe -t -t -n $tempfile") or die("Windmail fout: $!");
    unlink($tempfile);
}

Wat moet ik aan bovenstaande veranderen om dat voor elkaar te krijgen?

  • Mini-me
  • Registratie: November 1999
  • Niet online
Ik ben niet zo'n kenner wat betreft Perl maar misschien werkt dit:
code:
1
2
3
4
5
6
7
8
9
sub send_mail {
    open(MAIL,">C:/windmail/windmail.exe -t -t -n") 
or die("Windmail fout: $!");
    print MAIL "To: \"ONTVANGER\" <the-prospector\@email.com>\n";
    print MAIL "From: \"AFZENDER\" <the-prospector\@email.com>\n";
    print MAIL "Subject: HET ONDERWERP\n\n";
    print MAIL $message;
    close (MAIL);
}

Dus niet via een temp-file schrijven maar gewoon rechtstreeks regel voor regel naar windmail sturen, net zoals je bij sendmail doet..

Verwijderd

Topicstarter
Ahum!! Mijn vraag was dus niet hoe ik de boel werkend kon krijgen, want alles draait wel. Mijn vraag was hoe ik van plain-text, een HTML-mail kan maken...

Iemand?

  • wasigh
  • Registratie: Januari 2001
  • Niet online

wasigh

wasigh.blogspot.com

Zoek eens op google of hiet op GoT deze vraag is de laatste tijd vaker voorbij gekomen

Dit topic is gesloten.