$from = 'e_xx@indonesiaport.co.id';

$to = 'frxxxx@indonesiaport.co.id';

$subject = 'Tes ICS';

$cc = '';



$mime_boundary = "----Meeting Booking----".MD5(TIME());

$headers = array('From' => $from,

 'To' => $to,

 'Subject' => $subject,

 'MIME-Version' => '1.0',

 'Content-Type' => "multipart/alternative;boundary=".$mime_boundary,

 'Content-class' => "content-classes:calendarmessage"

 );





$text = '';// text and html versions of email.

$ical .= '

BEGIN:VCALENDAR

VERSION:2.0

PRODID:www.example.com

BEGIN:VEVENT

UID:51df71cc29e81

DTSTAMP;TZID=Europe/Berlin:20130712T050236

DTSTART;TZID=Europe/Berlin;VALUE=DATE:20130712

SEQUENCE:0

TRANSP:OPAQUE

DTEND;TZID=Europe/Berlin;VALUE=DATE:20130715

SUMMARY:Buka Puasa

X-MICROSOFT-CDO-ALLDAYEVENT:TRUE

END:VEVENT

END:VCALENDAR';



 $html .= $ical;



$nama_file = 'invitation.ics';

$attachment = $my_file; // attachment

$name = basename($nama_file);



/* $attachment2 = 'report/pdf_rbm/'.$nama_file_jict; // attachment

$name2 = basename($nama_file); */

$crlf = "\n";



$mime = new Mail_mime($crlf);

//$mime->setTXTBody($text);

$mime->setHTMLBody($html);



//$mime->addAttachment($attachment,'application/ics',$name,true,'base64'); 

/*$mime->addAttachment($attachment2,'application/pdf',$name2,true,'base64'); */



//do not ever try to call these lines in reverse order

$body = $mime->get();

//$headers = array($headers);

$headers = $mime->headers($headers);



$host = "mxx"; // Host Address relay smtp email server yang ada di pelindo - tanpa menggunaka SSL ( Socket Secure Layer )

$username = "frxxx"; // User name SMTP client disamakan dengan user login di email

$password = "frxxx"; // password sama dengan password user ID diemail.Sebaiknya gunakan email user id baru untuk sender dan reply inbox.



$smtp = Mail::factory('smtp', array ('host' => $host, 'auth' => true,

 'username' => $username,'password' => $password));

//echo '6';

$mail = $smtp->send($to.$cc, $headers, $body);

//mail( $to, $subject, $message, $headers );

///echo '7';

/*

if (PEAR::isError($mail)) {

 echo 'failed';

}

else {

 echo 'OK';

}*/



if (PEAR::isError($mail)) {

 echo("<p>" . $mail->getMessage() . "</p>");



}

else {

 echo("OK");

}