Need help on problem with Excel processes - COM Discussion Boards

l a u r e n16-Sep-05 8:04

16-Sep-05 8:04

ok hmmmmm now u lost me ... i thought variants were single variables so how can i stuff an array into one?

if im being dumb just tell me and i'll stop asking dumb questions
Smile | :)

"there is no spoon"
biz stuff about me

Re: activex problems...

rwestgraham16-Sep-05 14:24

rwestgraham

16-Sep-05 14:24

Not dumb, this stuff is complicated. I tested the below code in VC++6/VB6 and it worked.

ATL/C++ Server Code:

***************************************************************************

STDMETHODIMP CVBArray::GetVBArray(VARIANT *MyArray)
{

//Create a sample byte array and initialize with zeros
//256 is small, so don't bother creating on the heap
unsigned char bytearray[256] = {0};

//Declare a pointer to the byte array
unsigned char* pbytearray = bytearray;

//Set every other byte to 1
for(int i = 0; i <256; i+=2)
{
bytearray[i] = 1;
}

//Now comes the fun part!!!!

//Call VariantInit to initialize our return parameter
VariantInit(MyArray);
//Set the type of the return paramter to VT_UI1
//VB will recognize VT_UI1 as an unsigned char i.e. byte
MyArray->vt = VT_ARRAY| VT_UI1;

//Declare a pointer for a SAFEARRAY
SAFEARRAY* psa;
//Declare a SAFEARRAYBOUND and initialize it to the correct size
SAFEARRAYBOUND bounds = {sizeof(bytearray), 0};

//Create the SAFEARRAY using the type, dimension, and array length
psa = SafeArrayCreate(VT_UI1, 1, &bounds);

//Declare a null pointer for access to the SAFEARRAY's array
void* pSafeArrayData = NULL;

//Now set the pointer to the SAFEARRAY array (must be cast as void**)
SafeArrayAccessData(psa, (void**)(&pSafeArrayData));

//Let's review: We now have a local byte array populated with data.
//We also now have a SAFEARRAY object with a data buffer the size of our byte array.
//We have created a pointer for the SAFEARRAY's data buffer.
//We have "unlocked" the SAFEARRAY's data buffer and set our pointer to it
// by calling SafeArrayAccessData.

//Now all we need to do is copy our local data into the SAFEARRAY data buffer
// the clean up and return.

//Copy bytearray into SAFEARRAY buffer
memcpy(pSafeArrayData, pbytearray, sizeof(bytearray));
pbytearray = NULL;

//"Lock" the SAFEARRAY.
SafeArrayUnaccessData(psa);
//Set the SAFEARRAY we just created and populated to the return parameter.
MyArray->parray = psa;

//Now we are ready to return

return S_OK;
}

**************************************************************************

VB Code:

**************************************************************************

Private Sub GetArrayFromCOM()
Dim oServer As New vbArray
Dim testItems() As Byte
Dim i As Long
Dim count As Long
Dim strShow As String

testItems = oServer.GetVBArray
count = UBound(testItems)
For i = 0 To count
strShow = strShow & " " & CStr(testItems(i))
Next i

MsgBox strShow

End Sub

*****************************************************************************

Re: activex problems...

l a u r e n19-Sep-05 6:20

l a u r e n

19-Sep-05 6:20

holy crap!!
thnx v much
Smile | :)

"there is no spoon"
biz stuff about me

Re: activex problems...

Jörgen Sigvardsson16-Sep-05 14:38

Jörgen Sigvardsson

16-Sep-05 14:38

And he beat me to it again! Jeez, I need to stop seeing women, because obviously they're taking up too much of my time.. Big Grin | :-D

To make rwestgraham's story short, it's the vt field of the variant which holds the secret. If you give it the value of VT_UI1|VT_ARRAY you can stuff a BYTE-safearray into it. You can even stuff structures (VT_RECORD) in there too, should you ever have feel masochistic. Smile | :)

Good music: In my rosary[^]

Re: activex problems...

rwestgraham16-Sep-05 15:19

rwestgraham

16-Sep-05 15:19

Jörgen Sigvardsson wrote:
And he beat me to it again!

My dev machine crashed on Monday, I've been using that as an excuse to screw around doing nothing but surf the web, LOL.

Jörgen Sigvardsson wrote:
I need to stop seeing women, because obviously they're taking up too much of my time..

I need to start seeing women, LOL. If you spend as much time with women as I spend masturbating, I envy you. :->

Re: activex problems...

Jörgen Sigvardsson17-Sep-05 9:31

Jörgen Sigvardsson

17-Sep-05 9:31

rwestgraham wrote:
If you spend as much time with women as I spend masturbating, I envy you.

Laugh | :laugh:

release and go query some woman's interface. Beats addrefing yourself. Just finding the right interface is fun as it is! Big Grin | :-D

Good music: In my rosary[^]

Re: activex problems...

rwestgraham17-Sep-05 12:05

rwestgraham

17-Sep-05 12:05

Actually, I have a live in. But these days I'm more interested in querying some IUnknowns, LOL. Just gotta make sure you use MarshalByLatex before you insert your stub into some strange proxy. :->

Need help on problem with Excel processes

J. Holzer14-Sep-05 3:44

J. Holzer

14-Sep-05 3:44

Hi!

I´m reading a Excel-Sheet by calling the Excel-COM-Object with the following code:

Excel.Application ExcelObj = new Excel.Application();
Excel.Workbook theWorkbook = ExcelObj.Workbooks.Open(filename, false, true, 5, "", "", true, Excel.XlPlatform.xlWindows, "\t", false, false, 0, true, true, true);

Excel.Sheets sheets = theWorkbook.Worksheets;

Excel.Worksheet worksheet = (Excel.Worksheet)sheets.get_Item(sheetNumber);

for (int i = startRow; i <= endRow; i++)
{
Excel.Range range = worksheet.get_Range(startCol + i.ToString(), endCol + i.ToString());
System.Array myvalues = (System.Array)range.Cells.Value2;
string[] strArray = ConvertToStringArray(myvalues);
storage.Add(strArray);
}

ExcelObj.Quit();

My problem is, that Excel does not really quit but stay in my task-manager.
What do i have to do to make Excel to leave my memory?

Thanks!

COM newbie: LNK2005

Jose M Castellanos12-Sep-05 3:09

Jose M Castellanos

12-Sep-05 3:09

Hello:

I am developping my first COM project Blush | :O

, that in fact is an attempt to split a previous project into a client and a COM server. Since I'm not very experienced in this field, I'm having linking errors when trying to compile the server:

winComServer.cpp
Linking...
winComServer_i.obj : error LNK2005: _CLSID_CoServer already defined in winComServer.obj
winComServer_i.obj : error LNK2005: _LIBID_WINCOMSERVERLib already defined in winComServer.obj
winComServer_i.obj : error LNK2005: _IID_ICoServer already defined in winComServer.obj

I have been reading several forums about this kind of problems with no possitive results.
I'm NOT including "initguid.h" from "stdafx.h", that seems to be a source of problems.

Any help would be really welcomed.

Jose M

-- modified at 9:13 Monday 12th September, 2005

Re: COM newbie: LNK2005

Jose M Castellanos13-Sep-05 1:25

Jose M Castellanos

13-Sep-05 1:25

I have solved the problem:

I had changed my precompiled headers settings. I must use them in order to make the app works.

Sorry guys, no winners this time. Next time you shoud be faster Wink | ;)

.

Jose M

How to Show ActiveX Control on a Window?

Ashwin kumar Gurujala11-Sep-05 23:30

Ashwin kumar Gurujala

11-Sep-05 23:30

Hi,

I have tried to show an ActiveX Control on a Window in SDI application. I used the following API,

CLSID clsid; //clsid of activex control
IUnknown* pIunknown;
HRESULT hResult;

hResult = CoCreateInstance( clsid, NULL,
CLSCTX_INPROC_SERVER|CLSCTX_INPROC_HANDLER,
IID_IUnknown, (void**)&pIunknown );

But still the Control is not display.......
Where lies the Error? Can anyone help me out?

-- modified at 5:31 Monday 12th September, 2005

ActiveX control container

code_chenyf8-Sep-05 14:36

code_chenyf

8-Sep-05 14:36

Friends,
I want to develop a ActiveX control container,and save data in flat(uncompound) document.
My document CxxDoc is derived from COleDocument,and the constructor as following:
CxxDoc::CxxDoc()
{
// EnableCompoundFile();
// ^^^^^^^^^^^^^^^^^^^^^^^^^^I need a flat (uncompound) file.so i delete it.

...
}
Firstly, Is it OK????Can i save data in flat document?

Secondly,my client item is CxxClientItem,
class CxxClientItem : public COleClientItem

The WriteItem and ReadItem function (copied from the sample program of ActiceX control test container in Visual C++) as follows. They can work correctly in compound document. Please tell me how to change them from compound document to flat(uncompound) document. I'm a new and I do need your help. Laugh | :laugh:

void CxxClientItem::WriteItem( CArchive& ar )
{
USES_CONVERSION;
IStoragePtr pStorage;
IStreamPtr pStream;
IPersistStreamInitPtr pPSI;
TCHAR szItemName[64];
HRESULT hResult;
IPersistStoragePtr pPersistStorage;
CxxDoc* pDoc;
CLSID clsid;

(void)ar;

pDoc = GetDocument();
ASSERT_VALID( pDoc );
ASSERT( pDoc->m_lpRootStg != NULL );
// ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^It is wrong in uncompound document
ASSERT( pDoc->m_bCompoundFile );
// ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^It is wrong in uncompound document
ASSERT( m_lpStorage != NULL );
ASSERT( !ar.m_bForceFlat );

GetItemName( szItemName );

if( !pDoc->m_bSameAsLoad )
{
hResult = pDoc->m_lpRootStg->CreateStorage( T2COLE( szItemName ),STGM_CREATE|STGM_READWRITE|STGM_TRANSACTED|STGM_SHARE_EXCLUSIVE, 0, 0, &pStorage );
// ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^It is wrong in uncompound document
if( FAILED( hResult ) )
{
AfxThrowOleException( hResult );
}
m_lpNewStorage = pStorage;
m_lpNewStorage->AddRef();
m_bNeedCommit = TRUE;
}
else
{
pStorage = m_lpStorage;
}

......
}

void CxxClientItem::ReadItem( CArchive& ar )
{
USES_CONVERSION;
BOOL tUsedStream;
IStoragePtr pStorage;
IPersistStreamInitPtr pPSI;
IStreamPtr pStream;
TCHAR szItemName[64];
HRESULT hResult;
BOOL tQuickActivated;
IPersistStoragePtr pPersistStorage;
CLSID clsid;

(void)ar;

CxxDoc* pDoc = GetDocument();
ASSERT_VALID(pDoc);
ASSERT(pDoc->m_lpRootStg != NULL);
// ^^^^^^^^^^^^^^^^^^^^^^^^^^It is wrong in uncompound document
ASSERT(pDoc->m_bCompoundFile);
// ^^^^^^^^^^^^^^^^^^^^^^^^^^It is wrong in uncompound document
ASSERT(m_lpStorage == NULL);
ASSERT(m_lpLockBytes == NULL);
ASSERT( !ar.m_bForceFlat );

// get item name
GetItemName( szItemName );

// open storage for this item
hResult = pDoc->m_lpRootStg->OpenStorage( T2COLE( szItemName ), NULL,
STGM_READWRITE|STGM_TRANSACTED|STGM_SHARE_EXCLUSIVE, 0, 0, &pStorage );
// ^^^^^^^^^^^^^^^^^^^^^^^^^^It is wrong in uncompound document
if( hResult != S_OK )
{
TRACE1( "Warning: unable to open child storage %s.\n", szItemName );
// upon failure throw file exception (item will be cleaned up)
AfxThrowOleException( hResult );
}
ASSERT(pStorage != NULL);

// remember the storage
m_lpStorage = pStorage;
ASSERT(m_lpStorage != NULL);
m_lpStorage->AddRef();

......
}

Update (Windows)

Illegal Operation8-Sep-05 4:10

Illegal Operation

8-Sep-05 4:10

Can someone please tell me more or less how Microsoft updates your OS over the internet? I know they call API's through ActiveX but how do they do it?

Illegal Operation

Making Computer Software Talk

STA & MTA

MailtoGops8-Sep-05 3:07

MailtoGops

8-Sep-05 3:07

When I am into the STA or MTA threads, how can I check at runtime whether I am STA or MTA thread..

Excel Automation problem

HeartFriend7-Sep-05 20:22

HeartFriend

7-Sep-05 20:22

i'm wonder whether CComPtr<ixxxx> is equal with IXXXPtr(raw interface wrapper class)?
for example:

Excel::_ApplicationPtr spApp;
HRESULT hr = spApp.CreateInstance(L"Excel.Application"); // this will succeed
//CComPtr<Excel::_Application> spApp;
//HRESULT hr = spApp.CoCreateInstance(L"Excel.Application"); //this will fail

i guess in most cases this should be equal ,right?

-- modified at 2:24 Thursday 8th September, 2005

COM and access rights (perhaps ?)

gnilk6-Sep-05 2:17

gnilk

6-Sep-05 2:17

Hi,

I have stumbled upon an issue which I am failing to resolve..
Basically I have an outproc COM server (.exe) which exposes a couple of interfaces which are
bridged to inproc COM objects, .dll's). One of the inproc objects is interfacing with a serial port, this works like a charm with my test application (not using the outproc COM server directly, but instead using the inproc COM objects) but when using the outproc COM server (.exe) as the call-gateway
I am unable to open up the serial ports...

The problem is to open the serial port(s)...
Everything runs on the local machine, administrator accounts, WinXP SP2..

Very "fuzzy" description, however..

|
Application | .exe COM Server - inProc objects <-> serial port
| (not a service)

No impersonation code has been done, everything is most plain (i.e. no tricks applied)
Any ideas ?

// Fredrik

How to properly stop STA thread

ComplexLifeForm3-Sep-05 7:19

ComplexLifeForm

3-Sep-05 7:19

Hi,

I am using a third party COM component to connect to a remote SSH server. For this I have created a STA thread. Now I have a trivial user scenario, when the user issues a connect command a modal dialog is shown with a cancel button to display the status of connection. At anytime the user can press cancel button to abort the operation. Since the calls to cancel/abort are generally asynchronous the actual call to disconnect comes from a different STA thread. Now the problem I am facing is that the after the user clicks the cancel button the dialog is not getting disposed away and the thread is not stopping, thus my application hangs. If I attach a debugger to the release build of the application, the application breaks in the debugger with Invalid RtlHeapAddress. Initially I though it could be a problem of directly accessing my interface pointer, so I marshalled the interface pointer using GlobalInterfaceTable, yet the result is the same.

After some debugging I found that the call to Connect is not returning at all, to be on a safer side I have a message loops in my all STA threads.

How do I make sure that my dialog is disposed properly and my STA thread also stops properly.

I am using VC++ 6.0 for developing my application. The COM part is implemented using pure C++

Thanks

ATL Service

Ashwin kumar Gurujala31-Aug-05 21:42

Ashwin kumar Gurujala

31-Aug-05 21:42

I want to write a service which will notify if any new file is generated in particular directory. How can i trap this event in Atl service

Re: ATL Service

logicaldna31-Aug-05 22:47

logicaldna

31-Aug-05 22:47

plz check

http://www.codeproject.com/file/filemonitor.asp[^]

You will get source and test project for ATL

Excel late binding

Anonymous31-Aug-05 21:21

Anonymous

31-Aug-05 21:21

Hey,
I'm using late binding for Excel and I have problem with calling Open (Workbooks) method.
Some other method (properties) work just fine (I'm using Office XP).

Code:

<br />
objWorkbooks = excel.GetType().InvokeMember("Workbooks",BindingFlags.GetProperty, null, excel, null);<br />
<br />
object[] oParam= new object[13]; //i also try 1(optional) and 11(office 2003) params<br />
oParam[0] = FileName;<br />
for(int t=1; t < parameters.Length; t++)<br />
  oParam[t] = Type.Missing; //a also try to put some valid params (like in early binding)<br />
<br />
//here I get error<br />
objWorkbooks.GetType().InvokeMember("Open",BindingFlags.InvokeMethod, null, objWorkbooks, oParam);<br />
<br />

And exception is: "Additional information: Exception has been thrown by the target of an invocation."

Tnx for helping me.

Nice day,
David

SOAP quetsion

logicaldna31-Aug-05 19:03

logicaldna

31-Aug-05 19:03

plz tell me how to access a dll on a server from a client side VB application

I am able to access ASP service from vb app. through SOAP
but how to do this with .dll

plz help

Thanks in advance

How to specify a sound card in windows media player

JaniceA29-Aug-05 23:08

JaniceA

29-Aug-05 23:08

I want to specify a sound card for windows media player but keep the windows default sound card unchanged (i.e., windows use another sound card). By the use of DirectSound, I can enumerate all sound cards in my system.

So, after I obtained the GUID of the sound cards, how can I specify a GUID for the windows media player? Also, how can i specify another GUID for the system as its default sound card?

Thanks for your kindness help!!!

-- modified at 5:09 Tuesday 30th August, 2005

Really struggling with GetTypeFromProgID

DaveC42691329-Aug-05 8:11

DaveC426913

29-Aug-05 8:11

Trying to get a VB app to run Windows Media Services on a remote machine.

This code
tServerType = Type.GetTypeFromProgID("WMSServer.Server", <myserver>, True)

generates this error
System.Runtime.InteropServices.COMException (0x800401F3): Invalid class string
at System.RuntimeType.GetTypeFromProgIDImpl(String progID, String server, Boolean throwOnError)
at System.Type.GetTypeFromProgID(String progID, String server, Boolean throwOnError)

I really need help with how to configure my local and my remote machine to talk to each other.

HELP!!

________________________________________________________________________
Dave
Y10K bug! Let's not get caught with our pants down **AGAIN**! (DC 02002)

Re: Really struggling with GetTypeFromProgID

Jörgen Sigvardsson29-Aug-05 9:00

Jörgen Sigvardsson

29-Aug-05 9:00

"WMSServer.Server" is an invalid ProgID. Have you registered the component/proxy locally? (I have no idea how Windows Media Services work, but you mention "remote machine", so I assume you're using DCOM. Then you need to either have the components or the proxy registered on your client machine)

Good music: In my rosary[^]

Re: Really struggling with GetTypeFromProgID

DaveC42691329-Aug-05 10:03

DaveC426913

29-Aug-05 10:03

I'm pretty green with this stuff.

I am using DCOM, yes.

I am developing on the client machine right now, so I would expect that, yes, they are registered.

"WMSServer.Server" is an invalid ProgID. Should it be the GUID?

________________________________________________________________________
Dave
Y10K bug! Let's not get caught with our pants down **AGAIN**! (DC 02002)

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