FIX: Automation Object Not Being Released After Call To ComLib.release() (218595)

MORE INFORMATION

Steps to Reproduce Behavior

• Compile and run the code listed below.
• Check the running processes list in the Task Manager by pressing CTRL+ALT+DEL.
• If the problem occurs, there will still be an Excel.exe process listed after the Java application has exited.
• Note that you will either need to add a COM wrapper in Visual J++ 6.0, or run JactiveX on the Excel object library to generate the wrapper classes required to run this sample. For more information on automating Excel, see the following article in the Microsoft Knowledge Base:

  169796 HOWTO: Automate Excel from Java

import excel8.*;
import com.ms.com.*;
import com.ms.win32.*;

public class JExcel
{
  _Application app = null;
  _Global global = null;
  Workbooks workbooks = null;
  _Workbook workbook = null;
  Sheets sheets = null;
  _Worksheet worksheet = null;
  String name = null;
  Variant vNoParam = null;
  Range range = null;
  
  int index = 0;

  public static void main(String args[])
  {
    new JExcel().go();
  }

  public void go()
  {
    try 
    {
      global = (_Global) new Global();	
      app = (_Application)global.getApplication();
      app.setVisible(0, true);

      workbooks = app.getWorkbooks();
      
      vNoParam = new Variant();
      vNoParam.noParam();
      workbook = workbooks.Add(vNoParam, 0);

      name = workbook.getName();
      User32.MessageBox(0, "Workbook Name:  " + name,
                        "Application Message" , 
                        0);
      
      sheets = workbook.getWorksheets();
      
      index = sheets.getCount();
      User32.MessageBox(0, 
                        "Number of sheets:  " + index, 
                        "Application Message" , 
                        0);
      
      for (int i = 1; i <= index; i++)
      {
        worksheet = (_Worksheet)sheets.getItem(new Variant(i));
        worksheet.Activate(0);
        worksheet.setName("Bob's Sheet "+ i);
      }
      
      User32.MessageBox(0, 
                        "Changed sheets' names.", 
                        "Application Message" , 
                        0);
      
      range = worksheet.getColumns();
      range.setColumnWidth(new Variant(40));
      
      User32.MessageBox(0, 
                        "Set column width to 40.", 
                        "Application Message" , 
                        0);
      
      range = worksheet.getCells();
      
      range.setItem(new Variant(1), 
                    new Variant(1), 
                    new Variant("This is a result of a call to Range.setItem"));
      
      User32.MessageBox(0, 
                        "Set the value of cell 1:A.", 
                        "Application Message" , 
                        0);
      
      User32.MessageBox(0, 
                        "Closing Excel Application.", 
                        "Application Message" , 
                        0);
      app.Quit();

      ComLib.release(app);
      ComLib.release(global);
      ComLib.release(workbooks);
      ComLib.release(workbook);
      ComLib.release(sheets);
      ComLib.release(worksheet);
      ComLib.release(name);
      ComLib.release(range);
      //      System.gc();
      //      Thread.currentThread().sleep(1000);
    }
    
    catch(Throwable t)
    {
      User32.MessageBox(0, 
                        t.toString(), 
                        "Exception", 
                        0);
    }
  }
}