PureBasic Forums - English

*pssst*: the name is srod !

:lol:

CNESM: best post these sort of questions in future in either the coding questions forum or in the main COMatePLUS thread. Best not start new threads in this forum just for a single question.

Urgh, sorry srod for using wrong name! I dont know how i came to ...

"The world make its own rules"

So, scrod, thanks a lot!. Now i know for the future, that i have to set all parameter, optional and not optional and take this information in my head

Best wishes from Germany, scrod!

Hi scrod,

but one thing i didnt understand. The two parameters are optional parameters. So in normal Excel i dont have to set the paramters and i can only use "Sheets(1)\Copy" but via COM it doesnt seems to work and i had to set the parameters like you did.

But thanks scrod for your great support ...

Hi,

i want to copy my actual sheet into my workbook to get a 100% copy of a my sheet, but it looks like that this function "Sheets\copy" of the OWC11 doesn't run correct. So in the past i helped me with the following workarround:

IncludePath "..\"
XIncludeFile "COMatePLUS.pbi"


ExcelObject ...

When i see your solutions its so easy, but the time before i didnt come to it :-D Now is clear.
Thanks scrod for your quick help!

You do realise that OWC is no longer supported by Microsoft? It no longer ships with MS Office for example.

Yes, i heard it, but do you know if there a follow-up ...

Hello,

i have one question:

How can i cancel the context menu when the user click right on the spreadsheet?

In normal situation, the user will see the OWC menu of the spreadsheet, when he click right on the spreadsheet, but i will show my own menu. The Spreadsheet support the specificated event ...

Hi,

is it possible to set the output language for DatabaseError()? Sometimes its easier to get the error message in a definite language.

Greetz
CNESM

Hey srod,

after my break i worked on the code again and i tested to get more than one value from the server within only one call and i think its work. I get all neccessary values and the captions of the columns and rows and this without using an pb made array:

Define.COMateObject objMDX, objADOMD ...

I cleaned up the code, so all users can better understand the code:

Define.COMateObject objMDX, objADOMD, obCell

objMDX=COMate_CreateObject("ADODB.Connection")
If objMDX
objADOMD=COMate_CreateObject("ADOMD.Cellset")
If objADOMD

mdx.s = "with "
mdx.s = mdx.s + "member [Act1] as ...

Srod, the master of codes :D

Enclosed the runable code WITHOUT an array:

Define.COMateObject objMDX, objADOMD, obAxis, obCell
Define.COMateEnumObject enAxes


objMDX=COMate_CreateObject("ADODB.Connection")
If objMDX
objADOMD=COMate_CreateObject("ADOMD.Cellset");catalog
If objADOMD

mdx ...

BTW: Enclosed a docu about the Analysis Service:

http://msdn.microsoft.com/en-us/library ... lient.aspx

ICQ would be great: 585314593, Name: xcEr. I only can use the icq2go because i am in the office.

Srod, i understand you. Thanks for you help! But its hard to give support, when you don't can test the code ....

In normal situation the sql statement retrieve hundreds of data but for testing i only use one data call.

I will test it further. Thnaks srod for you create support. Maybe the other ...

This doesn't help, srod!

The error is the same .... :?

i tested:

Cell (1, 1) as string : " + obCell\GetStringProperty("FormattedValue")

to

Cell (0, 0) as string : " + obCell\GetStringProperty("FormattedValue")

and/or

index = 0
column = 1
SafeArrayPutElement_(*safeArray, @index ...

Yes

The code had to give back one value!

You had an error in you code:

numCells * obAxis\GetIntegerProperty("Positions.Count")

to

numCells * obAxis\GetIntegerProperty("Positions\Count")

Debugger:

Axis(0)
====
Axis(1)
====
There were 1 cell(s) retrieved.
====
Problem getting cell object!
The arguments are of the wrong type, lie ...