title: Exporting exchange mails to Excel using lotusscript agent or Java agent or Javascript language
body: <p>i want to export mails on exchnage server (subject line and body content) to Excel using lotusscript agent or Java agent or Javascript language. How can I acheive this? Any idea, suggestion or sample code is appreciable.</p>
  
  <hr>
  
  <p>After doing reasearch found code to download mails from POP3 server. I used below code but got stuck at <strong>var oServer = new ActiveXObject("EAGetMailObj.MailServer");</strong> with error - "<strong>Automation server can't create object</strong>". Then I put the host url in trusted sites and enabled active x control settings of IE, but then also getting the same error. Any idea, why?</p>
  
  <p>The following code demonstrates how to receive email from a POP3 mail account. This sample downloads emails from POP3 server and deletes the email after the email is retrieved.</p>
  
  <p>Code:</p>
  
  <pre><code>MailServerPop3 = 0;
  MailServerImap4 = 1;
  
  try
  {
  var oServer = new ActiveXObject("EAGetMailObj.MailServer");
  // please change the server, user, password to yours
  oServer.Server = "pop3.adminsystem.com"
  oServer.Protocol = MailServerPop3;
  
  oServer.User = "testx";
  oServer.Password = "testpassword";
  
  // If your server requires SSL connection, 
  // Please add the following codes.
  oServer.SSLConnection = true;
  oServer.Port = 995;
  
  var oClient = new ActiveXObject("EAGetMailObj.MailClient");
  oClient.LicenseCode = "TryIt";
  
  // Connect POP3 server.
  oClient.Connect(oServer);
  
  var infos = new VBArray(oClient.GetMailInfos()).toArray();
  for (var i = 0; i &lt; infos.length; i++) {
      var info = infos[i];
  
      // Receive email from POP3 server
      var oMail = oClient.GetMail(info);
  
  
      // Save email to local disk
      oMail.SaveAs("d:\\" + i + "_test.eml", true);
  
      // Mark email as deleted on server.
      oClient.Delete(info);
  }
  
  // Quit and pure emails marked as deleted from POP3 server.
  oClient.Quit
  }
  catch( err )
  {
  
   WScript.Echo( err.description );
  }
  </code></pre>