Go Premium for a chance to win a PS4. Enter to Win

x
?
Solved

OLE-automation for Excel97

Posted on 1998-04-03
3
Medium Priority
?
301 Views
Last Modified: 2013-11-25
I have used OLE-automation to control Excel95 from Visual C++. Therefore I generated via the class-wizard with the Excel5-OLB-file the 4 classes Application, Workbooks, Worksheet and Range. The approach is described in Inside Visual C++ from MS-Press (Ch. 24) and worked fine.  Now I want to do the same with Excel97. The previously approach did not work. Some class names differ by a prefixed underscore, some methods I used are no more available (Workbooks of Application) and I always get an exception when trying to start up Excel.

Has somebody successfully implemented an Excel97-OLE-Automation-Server and can give me help??
0
Comment
Question by:penschke
  • 2
3 Comments
 
LVL 15

Accepted Solution

by:
Tommy Hui earned 240 total points
ID: 1184047
Yes, take a look at the sample in vc\samples\COM\COMEXCEL. Compile that and run it to see it in action.


0
 

Author Comment

by:penschke
ID: 1184048
Thank you very much!
That was exactly what I wanted.
I have registered asa an expert as well.
Would You like to have an email-conversation?

Regards,
Walter

0
 

Author Comment

by:penschke
ID: 1184049
Well sorry, I have found an other problem. What works is the following source-code compiled in DEBUG-mode. In RELEASE-mode the Excel does not start-up properly:
// NOTE: This example will only work with Excel8 in Office97
// Compile with cl /GX comexcel.cpp
// TO DO: Edit the #import paths

#import <mso97.dll> no_namespace rename("DocumentProperties", "DocumentPropertiesXL")  
#import <vbeext1.olb> no_namespace  
#import <excel8.olb> rename("DialogBox", "DialogBoxXL") rename("RGB", "RBGXL") rename("DocumentProperties", "DocumentPropertiesXL") no_dual_interfaces

#include <stdio.h>
#include <iostream.h>
#include <tchar.h>

void dump_com_error(_com_error &e)
{
    _tprintf(_T("Oops - hit an error!\\n"));
    _tprintf(_T("\\a\\tCode = %08lx\\n"), e.Error());
    _tprintf(_T("\\a\\tCode meaning = %s\\n"), e.ErrorMessage());
    _bstr_t bstrSource(e.Source());
    _bstr_t bstrDescription(e.Description());
    _tprintf(_T("\\a\\tSource = %s\\n"), (LPCTSTR) bstrSource);
    _tprintf(_T("\\a\\tDescription = %s\\n"), (LPCTSTR) bstrDescription);
}

// If this is placed in the scope of the smart pointers, they must be
// explicitly Release(d) before CoUninitialize() is called.  If any reference
// count is non-zero, a protection fault will occur.
struct StartOle {
    StartOle() {
            CoInitialize(NULL);
      }
    ~StartOle(){
            CoUninitialize();
      }
// };
} _inst_StartOle;

void main()
{
//      StartOle Excel97;
    using namespace Excel;

    _ApplicationPtr pXL;

    try {
         pXL.CreateInstance(L"Excel.Application.8");

            pXL->Visible = VARIANT_TRUE;

            // Open sample Excel-Sheet
            char excelFilename[1024] = "d:\\projects\\msvcpp5\\excel97_driver\\test_files\\sample_excel97.xls";

          WorkbooksPtr  pBooks = pXL->Workbooks;
            _WorkbookPtr  pBook  = pBooks->Open((char*)excelFilename);
            _WorksheetPtr pSheet = pXL->ActiveSheet;

            char x;
            char y[8] = ""; int iy;
            char xy[9];

            float fnum;
            for (x='C';x<='P';x++)
            {
                  for (iy=2; iy<=50; iy++)
                  {
                        sprintf(y, "%d", iy);
                        strcpy (xy ,&x);
                        strcat (xy, y);

                        fnum = pSheet->Range[xy]->Value;
//                        fnum = Vnum->getFloatRef();
                        fnum++;
//                        Vnum.putFloatRef(fnum);
                        pSheet->Range[xy]->Value = fnum;
                  }
            }

            Sleep(3000);

            // Close sheet
            pBook->Save();
//            delete pSheet;
//            delete pBook;
//            delete pBooks;
            pXL->Quit();
    }

      // catch exceptions if raised
      catch(_com_error &e)
      {
            dump_com_error(e);
    }

}


Both compile-version behave differently. Might that be a Microsoft-Bug?
0

Featured Post

Nothing ever in the clear!

This technical paper will help you implement VMware’s VM encryption as well as implement Veeam encryption which together will achieve the nothing ever in the clear goal. If a bad guy steals VMs, backups or traffic they get nothing.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Introduction This article is a continuation of the C/C++ Visual Studio Express debugger series. Part 1 provided a quick start guide in using the debugger. Part 2 focused on additional topics in breakpoints. As your assignments become a little more …
Basic understanding on "OO- Object Orientation" is needed for designing a logical solution to solve a problem. Basic OOAD is a prerequisite for a coder to ensure that they follow the basic design of OO. This would help developers to understand the b…
The goal of the video will be to teach the user the concept of local variables and scope. An example of a locally defined variable will be given as well as an explanation of what scope is in C++. The local variable and concept of scope will be relat…
The viewer will learn additional member functions of the vector class. Specifically, the capacity and swap member functions will be introduced.

916 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question