mail durch MS Exchange verschicken

[dey]

Servus

Mit der unten angeführten Funktion kann man mit CGI-Perl und Linux-Mailserver eine Email direkt durch entsprechenden Funktion vom Webserver aus verschicken.

$mail_prog = '/var/qmail/bin/qmail-inject' ;
$datafail ='guestbook.dat';
$viewperpage = '20';
$sendtosigner = '0';
$sendtoadmin = '1';
$adminemail = '[e-mail]';

if ($sendtoadmin) {
        $recip = $adminemail ;
        open (MAIL, "|$mail_prog -t") || &CgiDie ("Cannot open MAIL Program");
        print MAIL "To: $recip\n";
        print MAIL "From: $guestbookname\n";
        print MAIL "Subject: You have new entry in you guestbook\n";
        print MAIL "\n\n";
        print MAIL "You have new entry in you guestbook.\n" ;
        print MAIL "\n" ;
        print MAIL "Name : ".$nama."\n" ;
        print MAIL "Email : ".$email."\n" ;
        print MAIL "Homepage Name : ".$hp."\n" ;
        print MAIL "Homepage URL : ".$urlhp."\n" ;
        print MAIL "Location : ".$lokasi."\n" ;
        print MAIL "Komem : ".$komen."\n" ;
        print MAIL "\n\n";
        close (MAIL);
}

Ich möchte dies nun so umprogrammieren, dass die Funktionalität mit einem MSExchange-Server erreicht wird.
Kann mir jemand eine Quelle nennen, die mir die notwendigen Änderungen erläutert?

bydey

[Erwin]

hi,

das PERL Modul Net::SMTP ist eine mögliche Grundlage für dein CGI

http://i-netlab.de/cgi-bin/index.cgi?vi=Mail_Clients

Bau dir einen MailClient damit und schicke die Mails an den SMTP-Host (MS ExchangeServer).

Erwin

[Danke]

Servus Erwin

Hat lange gedauert, bis ich mit dem Script klar kam, aber jetzt rennts. Zumindest als test.

bydey