Doubt about activex

[Wanderson]

Hi all,

I Want to open a xml file using activex like this:

Cam_Arq := "C:\TESTE.XML"

DEFINE DIALOG oDlgErro RESOURCE "ERROXML"

REDEFINE ACTIVEX oAcTiveX ID 10 of oDlgErro PROGID "Shell.Explorer"

ACTIVATE DIALOG oDlgErro CENTERED;
ON INIT oAcTiveX:Do(Cam_Arq)

But i give errors.
How i can do this?
Thanks.

[Antonio Linares]

What errors do you get ?

Please post them here

[Wanderson]

Hi Antonio:

Application
===========
Path and name: E:\Sistemas\SanMarino\transp.exe (32 bits)
Size: 5,805,056 bytes
Time from start: 0 hours 1 mins 18 secs
Error occurred at: 23/12/2010, 17:05:56
Error description: Error BASE/1004 No exported method: C:\TESTE.XML

Stack Calls
===========
Called from: => ACTXINVOKE(0)
Called from: ACTIVEX.PRG => TACTIVEX:DO(0)
Called from: CTEFLEXDOCS.PRG => (b)MOSTRAERROXML(1230)
Called from: DIALOG.PRG => TDIALOG:INITIATE(0)
Called from: DIALOG.PRG => TDIALOG:HANDLEEVENT(0)
Called from: => DIALOGBOX(0)
Called from: DIALOG.PRG => TDIALOG:ACTIVATE(0)
Called from: CTEFLEXDOCS.PRG => MOSTRAERROXML(1230)
Called from: CTEFLEXDOCS.PRG => VALIDA_XML(1156)
Called from: PROG16.PRG => VALIDAXML(568)
Called from: PROG16.PRG => (b)PROG16(321)
Called from: BUTTON.PRG => TBUTTON:CLICK(0)
Called from: CONTROL.PRG => TBUTTON:HANDLEEVENT(0)
Called from: WINDOW.PRG => _FWH(3299)
Called from: => SENDMESSAGE(0)
Called from: DIALOG.PRG => TDIALOG:COMMAND(0)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: DIALOG.PRG => TDIALOG:HANDLEEVENT(0)
Called from: => DIALOGBOX(0)
Called from: DIALOG.PRG => TDIALOG:ACTIVATE(0)
Called from: PROG16.PRG => PROG16(332)
Called from: TRANSP.PRG => HABIL(1430)
Called from: TRANSP.PRG => (b)CTO(498)
Called from: MENU.PRG => TMENU:ACTIVATE(0)
Called from: BTNBMP.PRG => TBTNBMP:LBUTTONUP(0)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: CONTROL.PRG => TCONTROL:HANDLEEVENT(0)
Called from: BTNBMP.PRG => TBTNBMP:HANDLEEVENT(0)
Called from: WINDOW.PRG => _FWH(3299)
Called from: => WINRUN(0)
Called from: WINDOW.PRG => TWINDOW:ACTIVATE(950)
Called from: TRANSP.PRG => MAIN(186)

Thanks in advance.

[Wanderson]

Hi Antonio any idea?

Thanks in advance.

[lailton.webmaster]

Try this way

Cam_Arq := "C:\TESTE.XML"

DEFINE DIALOG oDlgErro RESOURCE "ERROXML"
REDEFINE ACTIVEX oAcTiveX ID 10 of oDlgErro PROGID "Shell.Explorer"

ACTIVATE DIALOG oDlgErro CENTERED ON INIT oAcTiveX:Do("NAVIGATE",Cam_Arq)

[Wanderson]

Try this way

Cam_Arq := "C:\TESTE.XML"

DEFINE DIALOG oDlgErro RESOURCE "ERROXML"
REDEFINE ACTIVEX oAcTiveX ID 10 of oDlgErro PROGID "Shell.Explorer"

ACTIVATE DIALOG oDlgErro CENTERED ON INIT oAcTiveX:Do("NAVIGATE",Cam_Arq)

Perfeito Lailton funcionou.

Valeu d+
Obrigado
Wanderson.

[lailton.webmaster]

Good !