Is PBForms.inc not compatible with ADO?

[Alexander Holzer]

Well, here I have a problem with PBFormsInitComCtls (PBForms.inc)!

PBFormsInitComCtls (%ICC_WIN95_CLASSES OR %ICC_DATE_CLASSES OR %ICC_INTERNET_CLASSES)

..syntax error
Compile failed at...

PBForms.inc is not compatible with MSADO27.INC !??

MSADO27.INC to be created with PowerBasic COM-Browser from ActiveX Data Objects 2.7 Type Library (msado27.tlb).
But I need this library.

How now solve a problem?

Thanks

[Michael Mattias]

Try making the bitmask a variable, assigning the OR'd values to it and calling PbFormsInitComCtls with that variable as the argument.

FWIW, if you had bothered to look up "syntax error" in the help file you would know that a "syntax error" has precisely nothing (that would be zero, nada, zip, squat) to do with "compatibility."

Besides, the code you bothered to show does not include "#INCLUDE MSAD027.INC" so how could that file be the problem?

[Alexander Holzer]

It's too difficult to understand...
(I use the online-translator, i'm not very good in English)

You can try yourself:
- make simple code with PBForms;
- MSADO27.INC provide (WinXP, COM-Browser);
- and try to connect this through #INCLUDE.

There is definitely a problem with PBForm.inc

P.S. It's a pity that I vasted $99

[Alexander Holzer]

Try this: TEST
(msado27.inc, pbforms.inc + simple BAS file)

[Edwin Knoppert]

Wow.. can't see the problem.

PowerBASIC for Windows
PB/Win  Version 8.04 
Copyright (c) 1996-2007 PowerBasic Inc.
Venice, Florida USA
All Rights Reserved

Error 477 in C:\DOCUME~1\EDWINK~1\BUREAU~1\TEST_M~1\ado_test.bas(63:005):  Syntax error
Line 63:     PBFormsInitComCtls (%ICC_WIN95_CLASSES OR %ICC_DATE_CLASSES OR %ICC_INTERNET_CLASSES)
Macro Expansion(1):  HLIB0079 = LOADLIBRARY("COMCTL32.DLL")

[Alexander Holzer]

I will contact the support tomorrow.

[José Roca]

The error has nothing to do with PBForms.inc. Don't know which version of the COM Browser you have got, but your MSADO27.INC needs a couple of macros to work.

Add the following macros to the beginning of MSADO27.INC:

MACRO ADODBPositionEnum_Param = LONG
MACRO ADODBADO_LONGPTR = LONG

[Alexander Holzer]

The error has nothing to do with PBForms.inc. Don't know which version of the COM Browser you have got, but your MSADO27.INC needs a couple of macros to work.

Add the following macros to the beginning of MSADO27.INC:

MACRO ADODBPositionEnum_Param = LONG
MACRO ADODBADO_LONGPTR = LONG

Unfortunately it does't work!

Without PBForms works ADO library "msado27.inc" properly.

[Edwin Knoppert]

He is right.

[Edwin Knoppert]

I don't know about this error but if you need to bypass it?


Remark:
' PBFormsInitComCtls (%ICC_WIN95_CLASSES OR %ICC_DATE_CLASSES OR %ICC_INTERNET_CLASSES)

And add line:

InitCommonControls()

In PBMain()

[Edwin Knoppert]

If i remove the macrotemp's it works.

Though it's not 'allowed' to modify this pbforms.inc

[Alexander Holzer]

No, no...
How with it: PBFormsMakeFont, PBFormsRichEdit ???

And next time PBForms will all change back again...

[Edwin Knoppert]

You can not modify PBMain() ?

[StanHelton]

Read the thread now I'm cofused

MSADO27.INC to be created with PowerBasic COM-Browser from ActiveX Data Objects 2.7 Type Library (msado27.tlb).
But I need this library.

According to my documentation PB doesn't support ActiveX controls yet the discussion here seems to assume that it does. Did I miss something?

[José Roca]

The problem is in this line in MSADO27.INC:

    Member Call WriteText<&H00000014>(in Data As String<&H00000000>, optional in Options As enumADODBStreamWriteEnum<&H00000001>)

Apparently the use of the Data keyword as the name of the parameter is causing havoc. Change it to:

    Member Call WriteText<&H00000014>(in [B]xData[/B] As String<&H00000000>, optional in Options As enumADODBStreamWriteEnum<&H00000001>)

According to my documentation PB doesn't support ActiveX controls yet the discussion here seems to assume that it does. Did I miss something?

PB doesn't natively support visual ActiveX controls because these need an OLE container. But ADO is not a visual ActiveX.

[Alexander Holzer]

You can not modify PBMain() ?

1. read that

2. For what did I buy then this program (PBForms)???
...if I must correct thereafter everything

[StanHelton]

Thank you Jose

PB doesn't natively support visual ActiveX controls because these need an OLE container. But ADO is not a visual ActiveX.

thanks for that clarification. now I will reread the thread hopefully with understanding.

[Alexander Holzer]

Thanks José Roca,
but unfortunately this library is necessary to me.

While I don't use PBForms more.., but it is a pity

[José Roca]

Hi Alexander,

Do you have understood what I have said in my previous post?

Just change Data to xData in the following line of MSADO27.INC:

    Member Call WriteText<&H00000014>(in [B]Data[/B] As String<&H00000000>, optional in Options As enumADODBStreamWriteEnum<&H00000001>)

[Alexander Holzer]

Hi Alexander,

Do you have understood what I have said in my previous post?

Just change Data to xData in the following line of MSADO27.INC:

    Member Call WriteText<&H00000014>(in [B]Data[/B] As String<&H00000000>, optional in Options As enumADODBStreamWriteEnum<&H00000001>)

OK, I make...

Is this MEMBER CALL WriteText continues to function?