COM

Re: How to get the path

sarfaraznawaz27-Feb-13 22:27

sarfaraznawaz

27-Feb-13 22:27

see i have created the com dll for shell context menu ..
if (DragQueryFile((HDROP)medium.lpszFileName, i, path, MAX_PATH))
{
g_szSelectedFiles.SetAt(i, path);
szFileName = g_szSelectedFiles[i];
}
from here i am getting the path (szFileName )i want in exe code so that i can proceed this my doubt ..
the variable is decalred as static in header file of the dll .i link the library of dll .the scope is not remaining .....

Best Regards
Sarfaraz

Re: How to get the path

Richard MacCutchan27-Feb-13 22:46

Richard MacCutchan

27-Feb-13 22:46

What do you mean by "i want in exe code"; I am afraid that makes little sense.

Use the best guess

Re: How to get the path

sarfaraznawaz27-Feb-13 23:27

sarfaraznawaz

27-Feb-13 23:27

the path(Szfilename)is useed in dll .Now this szfilename path i want use in the application code .

i explain how i tried i linked the dll lib to an application code and then i included the header file of the dll in an application code so that i can use the path(szfilename).
this szfilename is declared in static so its scope remain in application code also ..

Re: How to get the path

Richard MacCutchan27-Feb-13 23:28

Richard MacCutchan

27-Feb-13 23:28

Then you either need to export it from the dll or provide a function that will return it to the calling application.

Use the best guess

WorkBooks::OpenText file not loading

ForNow12-Feb-13 10:38

ForNow

12-Feb-13 10:38

Hi,

I have the following code sequences whose pourpose is to display a .txt file in a Excel Spreadsheet, however the .txt file is not being loaded after I execute workbooks.opentext
a workbook is loaded but there are no sheets displayed let alone text
I get good return codes from IDispatch->invoke and good return codes in excpInfo

I have changed the file name to a bogous name and the same thing happens

C++

  app.CreateDispatch("Excel.Application");  // this works my code I usally check AX register    
  Workbooks objBooks(app.Workbooks());       // while testing
 
 Workbooks objBooks = app.GetWorkbooks();
 
    COleVariant FilenameOpen(File), 
        FilenameSave(XlsFile), 
        Origin((short)2), // xlWindows 
        StartRow((short)1), 
        DataType((short)1), // xlDelimited 
        TextQualifier((short)1), // xlDoubleQuote 
        ConsecutiveDelimiter((long)FALSE, VT_BOOL), 
        Tab((long)FALSE, VT_BOOL), 
        Semicolon((long)TRUE, VT_BOOL),
		Comma((long)FALSE, VT_BOOL), 
		Space((long)FALSE, VT_BOOL),
		Other((long)FALSE, VT_BOOL),
		Otherchar((long)FALSE,VT_BOOL),
		Fieldinfo((long) FALSE, VT_BOOL),
		TextVisualLayout((long)FALSE, VT_BOOL),
		DecimalSeperator((long) FALSE, VT_BOOL),
		ThousandSepartor((long) FALSE, VT_BOOL),
		TrailingMinusNumbers((long) FALSE, VT_BOOL),
		Local((long) FALSE, VT_BOOL),
                  Fileformat((short)33), // xlExcel4 
                  Save((long)FALSE, VT_BOOL);

COleSafeArray saRet;
DWORD numElements[2];
numElements[0] = 2;
numElements[1] = 2;
saRet.Create(VT_I4,2,numElements);
long index[2];
long val;
index[0]=0;
index[1]=0;
val = 1;
saRet.PutElement(index,&val);
index[0] = 1;
index[1] = 0;
val = 2;
index[0] = 1;
index[1] = 1;
val = 9;

objBooks.OpenText((LPCTSTR)"C:\\Program Files\\Microsoft VIsual Studio\\MyProjects\\I46023\\I46023.txt", Origin, COleVariant((long)1),COleVariant((long)1),  
             1, 
			 ConsecutiveDelimiter, Tab, Semicolon,
 			 Comma,Space,Other,Otherchar,saRet,TextVisualLayout,
 			 DecimalSeperator,ThousandSepartor,TrailingMinusNumbers,
 			 Local);
			
 app.SetVisible(true);
  app.SetUserControl(TRUE);

Re: WorkBooks::OpenText file not loading

Richard MacCutchan27-Feb-13 22:09

Richard MacCutchan

27-Feb-13 22:09

Why are you using the (LPCTSTR) cast on your file path? Do you fully understand what a cast does?

Use the best guess

Re: WorkBooks::OpenText file not loading

ForNow28-Feb-13 8:07

ForNow

28-Feb-13 8:07

Richard

This is the function prototype in excel.cpp

C++

oid Workbooks::OpenText(LPCTSTR Filename, const VARIANT& Origin, const VARIANT& StartRow, const VARIANT& DataType, long TextQualifier, const VARIANT& ConsecutiveDelimiter, const VARIANT& Tab, const VARIANT& Semicolon, const VARIANT& Comma,
        const VARIANT& Space, const VARIANT& Other, const VARIANT& OtherChar, const VARIANT& FieldInfo, const VARIANT& TextVisualLayout, const VARIANT& DecimalSeparator, const VARIANT& ThousandsSeparator, const VARIANT& TrailingMinusNumbers,
        const VARIANT& Local)

Filename is Of type LPCTSTR

Thanks

Re: WorkBooks::OpenText file not loading

Richard MacCutchan28-Feb-13 21:47

Richard MacCutchan

28-Feb-13 21:47

ForNow wrote:
Filename is Of type LPCTSTR

Then you should provide a LPCTSTR in your call, rather than providing a LPCSTR, and then telling the compiler to ignore the fact that the string may not be in the correct format. Lookup the use of the TEXT() macro and make sure your strings are generated correctly, and read the documentation on the correct use of casts.

Use the best guess

Re: WorkBooks::OpenText file not loading

ForNow1-Mar-13 8:20

ForNow

1-Mar-13 8:20

The Text macro interperts the string if ansi is defined according to the current codepage

I think the string I am passing is being interpetted correctly

looking at the varaint type of the file it was being interpetted as a VT_BSTR

and had the correct value

C++

case VT_BSTR:
                {
                    LPCOLESTR lpsz = va_arg(argList, LPOLESTR);
                    pArg->bstrVal = ::SysAllocString(lpsz);
                    if (lpsz != NULL && pArg->bstrVal == NULL)
                        AfxThrowMemoryException();

Re: WorkBooks::OpenText file not loading

Richard MacCutchan1-Mar-13 23:46

Richard MacCutchan

1-Mar-13 23:46

ForNow wrote:
I think the string I am passing is being interpetted correctly

By luck, not judgement; if your project is built in UNICODE mode then it will be wrong. You should not use a cast unless you understand the consequences. Instead, use the TEXT() macro to ensure that your character string is generated in the appropriate character set to match the build. Your cast in the foregoing code is telling the compiler to ignore the fact that the string may be in the wrong character set.

Use the best guess

DISP_E_EXCEPTION & excepinfo->scode 800A03EC from WorkBooks::OpenText

ForNow6-Feb-13 12:26

ForNow

6-Feb-13 12:26

I am getting the above error from WorkBooks::OpenText

As all of the 18 paramters are optional
besides the first

I VT_NULL'ed all of them besdies the file name and still got the error

Since there is a lot of security where I work

I used the program name as the text file and still got the above errors

Any Help would be appreciated

Re: DISP_E_EXCEPTION & excepinfo->scode 800A03EC from WorkBooks::OpenText

Richard MacCutchan6-Feb-13 22:34

Richard MacCutchan

6-Feb-13 22:34

You should make an effort to research error codes first: see here[^] for a number of possibilities.

WorkBooks::OpenText failure

ForNow5-Feb-13 11:25

ForNow

5-Feb-13 11:25

Hi,

I am get an assert error when calling WorkBooks::OpenText

I traced it down the code to dispatch->invoke and the return code from that

was 0x80020008 DISP_E_BADVARTYPE One of the arguments in rgvarg is not a valid variant type.

I had a VARIANT for all my arguments besides the 5th which is a long

My question is then the following almost all the paramters are optional

besdides the first which is the filename

I assumed optional was a NULL so.

I coded the following for NULL

VARIANT varfalse.

varfalse.intVal = 0;
varfalse.vt = VT_INT;

is this correct ?

thanks

.

Re: WorkBooks::OpenText failure

Garth J Lancaster5-Feb-13 14:47

Garth J Lancaster

5-Feb-13 14:47

ForNow wrote:
is this correct ?

no ... you should use

C++

varfalse.vt = VT_EMPTY

C++

varfalse.vt = VT_NULL

DISP_E_UNKNOWNNAME from GetIDsOfNames

ForNow29-Jan-13 14:04

ForNow

29-Jan-13 14:04

Hi,

I getting the above return code the following is my code sequence

CLSID clsid;         // initialization
	HRESULT hr = CLSIDFromProgID(L"Excel.Application",&clsid)

IDispatch *pWApp;


	hr = CoCreateInstance(clsid, NULL, CLSCTX_LOCAL_SERVER, 
                          IID_IDispatch, (void **)&pWApp);

   LPOLESTR ptName = (LPOLESTR) _T("OpenText");
DISPID dispID;
 hr =  pWApp->GetIDsOfNames(IID_NULL, &ptName, 1 , LOCALE_USER_DEFAULT,&dispID);

I am using VIsual C++ 6.0 excel 2003

Thanks

Re: DISP_E_UNKNOWNNAME from GetIDsOfNames

Richard MacCutchan29-Jan-13 21:16

Richard MacCutchan

29-Jan-13 21:16

Check your return codes.

Re: DISP_E_UNKNOWNNAME from GetIDsOfNames

ForNow30-Jan-13 8:36

ForNow

30-Jan-13 8:36

For CoInitialize I am getting a 0x00000001 S_FALSE (already initliazed)

For CLSIDFromProgID I am getting a 0x00000000 S_OK

For CoCreateInstance I am getting a 0x00000000 S_OK

For GetIDsOfNames I am getting a 0X80020006 DISP_E_UNKNOWNNAME

Thanks

Re: DISP_E_UNKNOWNNAME from GetIDsOfNames

Richard MacCutchan30-Jan-13 9:35

Richard MacCutchan

30-Jan-13 9:35

I have tried this code with a variety of names (supposedly in Excel) but get the same response each time. The MSDN documentation is not very helpful so I'm not sure where to go from here. However, once again I would ask, what problem are you actually trying to solve?

Re: DISP_E_UNKNOWNNAME from GetIDsOfNames

Richard MacCutchan30-Jan-13 9:39

Richard MacCutchan

30-Jan-13 9:39

I just tried again with the name "worksheets" and it worked. So, the code is correct, but the name you are using is not.

Re: DISP_E_UNKNOWNNAME from GetIDsOfNames

ForNow30-Jan-13 9:58

ForNow

30-Jan-13 9:58

Very good you are right on the key is the first paramter

_In_ LPCOLESTR lpszProgID,

The Class id name, Excel is divded into for objects Application, Workbook, Worksheet, and I think Range

In Visual C++ 6.0 there is a OLE/COM viewer which might kind a hint of the names

What I am trying to do,

My boss gave me an assignment to automate the pasting of .txt file onto a Excel Worksheet

I wanted this app to be MFC based as I might need to employ windows services

Hence the main thread CWinApp and associated mainwindow

Thanks again for your help

Re: DISP_E_UNKNOWNNAME from GetIDsOfNames

Richard MacCutchan30-Jan-13 10:10

Richard MacCutchan

30-Jan-13 10:10

A quick search for "Excel C++" finds Accessing Excel Spreadsheets via C++[^].

Found the Answer PLease Read

ForNow30-Jan-13 10:34

ForNow

30-Jan-13 10:34

Richard,

I have to wait for years here to get a better compiler e.g. Visual Studio

However Visual C++ 6.0 has an OLE/COM viewer

So......

From File -> Run the Registry Editor

Then get the progid

http://msdn.microsoft.com/en-us/library/aa911706.aspx[^]

Re: DISP_E_UNKNOWNNAME from GetIDsOfNames

ForNow30-Jan-13 14:51

ForNow

30-Jan-13 14:51

I am going to go with the method you pointed out had using AS i GET BY THE
DISP_E_UNKNOWN

Maybe the way excel was installed it ddn't make entries

for HKCR\Typlib for the excel methods properties

Thanks

Re: DISP_E_UNKNOWNNAME from GetIDsOfNames

Richard MacCutchan30-Jan-13 21:51

Richard MacCutchan

30-Jan-13 21:51

You can find (most of?) the names in the Excel object properties[^]; I don't know where you got "OpenText" from.

Re: DISP_E_UNKNOWNNAME from GetIDsOfNames

ForNow1-Feb-13 9:25

ForNow

1-Feb-13 9:25

http://msdn.microsoft.com/en-us/library/microsoft.office.interop.excel.workbooks.opentext(d=printer,v=office.11).aspx[^]

When I orignally coded the app and used the #import method I didn't find which led me to use native OLE functions

Then I got stuck with GetIDSofnames

Now I found the api in my excel.h header must of overlooked

thanks

General News Suggestion Question Bug Answer Joke Praise Rant Admin

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.