title image


Smiley Re: mails verschicken ohne mail() zu verwenden
Hi,

So geht das:

<?

function Mailnachricht($abs,$empf,$su,$na)

{

#Setzten der eingehenden Varíablen:

$subject = "$su";

$Nachricht ="$na";

#Header wird gebastelt:

$hdr = "From: $abs \r\n";

$hdr .= "To: $empf\r\n";

$hdr .= "Reply-To: $abs\r\n";

$hdr .= "Subject: $subject\r\n";

$hdr .= "\r\n";

# Socket oeffnen:

$fp = fsockopen("mailsrv", 25);#Dein Mailserver... zur Not irgend wo einer im Netz

$banner = fgets($fp, 1024);

# HELO:

fputs($fp, "HELO $abs\r\n");

$result = fgets($fp, 1024);

if ($result+0 != 250)

die("HELO Statuscode falsch: $result");

# MAIL FROM:

fputs($fp, "MAIL FROM: $abs\r\n");

$result = fgets($fp, 1024);

if ($result+0 != 250)

die("MAIL FROM Statuscode falsch: $result");

# RCPT TO:

fputs($fp, "RCPT TO: $empf\r\n");

$result = fgets($fp, 1024);

if ($result+0 != 250)

die("RCPT TO: Statuscode falsch: $result");

# DATA:

fputs($fp, "DATA\r\n");

$result = fgets($fp, 1024);

if ($result+0 != 354)

die("DATA: Statuscode falsch: $result");

# Header senden:

fputs($fp, $hdr);

# Text senden:

fputs($fp, "$Nachricht\r\n");

# . Ende

fputs($fp, ".\r\n");

$result = fgets($fp, 1024);

if ($result+0 != 250)

die("DATA(end): Statuscode falsch: $result");

# QUIT:

fputs($fp, "QUIT\r\n");

$result = fgets($fp, 1024);

}



?>

Fragen?



Test It



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: