雅各布致命错误

Question

我想建立一个Java拖放与Outlook电子邮件的作品。我一直在使用雅各布，因为无法使用标准的AWT Event将数据从Outlook传输到Java。也就是说，我从这里或其他网站取得的所有解决方案都导致了Java中的致命性崩溃。下面的代码：

import java.awt.dnd.*; 
import javax.swing.*; 
import java.awt.event.*; 
import java.awt.*; 
import java.awt.datatransfer.*; 
import java.io.*; 
import java.util.List; 
import sun.awt.datatransfer.*; 
import com.jacob.com.*; 
import com.jacob.activeX.*; 
public class D2 extends JFrame 
{ 

private static final String DIR = "FILES"; 

private static void saveSelectedOutlookMails(String directory) { 

    Dispatch xl = new Dispatch("Outlook.Application"); 

    //Dispatch selection = Dispatch.get(xl, "Selection").toDispatch(); 

    System.out.println(xl); 
    System.out.println(xl==null); 
    //PROGRAM CRASHES AFTER THIS LINE 
    Dispatch explorer = Dispatch.get(xl,"ActiveExplorer").toDispatch(); 
    System.out.println("explorer"); 
    Object selection = Dispatch.get(explorer, "Selection").toDispatch(); 
    Variant count = Dispatch.get(selection, "Count"); 

    for (int mailIndex = 1; mailIndex <= count.toInt(); mailIndex++) { 
     Object mailItem = Dispatch.call(selection, "Item", new Variant(mailIndex)).toDispatch(); 

     Variant senderName = Dispatch.get(mailItem, "SenderName"); 
     Variant subject = Dispatch.get(mailItem, "Subject"); 
     Variant body = Dispatch.get(mailItem, "Body"); 

     String emailFileName = subject.toString() +".txt"; 

     String fullPath = directory + "/" + emailFileName; 
     try { 
      File email = new File(fullPath); 
      PrintWriter writer = new PrintWriter(new FileWriter(email)); 
      writer.println("From: "+ senderName); 
      writer.println("Subject: "+ subject); 
      writer.println(""); 
      writer.print(body); 
      writer.close(); 
     } 
     catch (IOException e) { 

      System.out.println(e.getMessage()); 
      //logger.error("IOException writing e-mail with subject: '"+ subject +"'", e); 
      continue; 
     } 

     Object attachments = Dispatch.get(mailItem, "Attachments").toDispatch(); 
     Variant attachmentCount = Dispatch.get(attachments, "Count"); 

     if (attachmentCount.toInt() > 0) { 

      for(int attachmentIndex = 1; attachmentIndex<=attachmentCount.toInt(); attachmentIndex++) { 

       Object attachment = Dispatch.call(attachments, "Item", new Variant(attachmentIndex)).toDispatch(); 
       Variant fileNameVariant = Dispatch.get(attachment, "FileName"); 
       String fileName = fileNameVariant.toString(); 

       Variant saveResult = Dispatch.call(attachment, "SaveAsFile", directory, "/", fileName); 
      } 
     } 
    } 


} 
public D2() throws Exception 
{ 
    this.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE); 
    this.setBounds(0,0,300,300); 
    this.setVisible(true); 

    DropTarget dropTarget=new DropTarget(); 
    dropTarget.setComponent(this); 
    dropTarget.addDropTargetListener(new DropTargetAdapter() 
      { 
       public void drop(DropTargetDropEvent dtde){ 

        saveSelectedOutlookMails(DIR); 

       } 



      }); 
} 


public static void main(String[] args) 

{ 

    try{ 

     new D2(); 
    }catch(Exception e){ 
     e.printStackTrace(); 
    } 
} 

}

Answer 1

好吧，在某种程度上首先，您要创建Outlook.Application之前，我从来没有见过 - 我只见过的Active X组件方式：

eg

    ActiveXComponent xl = new ActiveXComponent("Outlook.Application"); 
    Dispatch explorer = Dispatch.get(xl,"ActiveExplorer").toDispatch(); 
    Dispatch selection = Dispatch.get(explorer, "Selection").toDispatch(); 
    Variant count = Dispatch.get(selection, "Count"); 

    // loop over selected mail items. 
    for (int mailIndex = 1; mailIndex <= count.getInt(); mailIndex++) { 
     Dispatch mailItem = Dispatch.call(selection, "Item", new Variant(mailIndex)).toDispatch(); 
     Variant subject = Dispatch.get(mailItem, "Subject"); 
     // .... and so on 
    } 

其次，你的代码是不节能的邮件，它拉出所有字段和附件，并试图重新创建邮件，这似乎是不准确的，在最好的，只会是的信息是什么样的近似值。

你为什么不只是使用COM对象另存为整个.msg文件到硬盘？那么如果你需要再次访问它，你可以使用类似JDIC的东西来启动Outlook，并以其原始荣耀弹出消息，包括所有附件？

Answer 2

我的猜测是，你正在试图获取属性名称为“ActiveExplorer”，但它是一种方法！这是特定方法https://msdn.microsoft.com/en-us/library/office/ff870017.aspx的文档。尝试使用.call（）Jacob方法来调用MS对象上的方法。