Calling IE without dde or API 1

[Joseh]

Hello friends,
Here i found how to call IE from PowerCOBOL:
1) Type this on REPOSITORY of the form:
CLASS COM AS "*OLE".
2) In the event of you want to call IE, type this:
WORKING-STORAGE SECTION.
01 IE-APP PIC X(28) VALUE "InternetExplorer.APPLICATION".
01 IE OBJECT REFERENCE COM.
01 OLE-TRUE PIC 1 BIT VALUE B"1".
01 url PIC X(34) VALUE "

http://ar.geocities.com/pcobolar/".

PROCEDURE DIVISION.
INVOKE COM "CREATE-OBJECT" USING IE-APP RETURNING IE
INVOKE IE "SET-Visible" USING OLE-TRUE
INVOKE IE "NAVIGATE" USING BY REFERENCE url
SET IE TO NULL

And.. that's all
Check it out and let me know
Regards from argentina!

Jose

http://ar.geocities.com/pcobolar/

Saludos!
Jose Holzmann

http://ar.geocities.com/pcobolar