When I use the function CusrorToXML() I got an XML string. Now what I have to do to save that as a file to be able to open it in my web browser and see all as a tree view? Thank you in advance.FUNCTION DoShellExecute( tcFileName )
#DEFINE SW_SHOWNORMAL 1
#DEFINE SW_SHOWMINIMIZED 2
#DEFINE SW_SHOWMAXIMIZED 3
LOCAL ARRAY laJunk[1]
LOCAL lnRes
lnRes = ADLLS( laJunk )
IF lnRes = 0 OR NOT ( ASCAN( laJunk, 'ShellExecute ', 1, -1, 1, 15 ) > 0)
DECLARE INTEGER ShellExecute IN shell32 ;
INTEGER lnhwnd, STRING lcOperation, ;
STRING lcFile, STRING lcParameters, ;
STRING lcDirectory, INTEGER lnShowCmd
ENDIF
lnRes = ShellExecute( 0, "open", tcFileName, "", "", SW_SHOWMAXIMIZED )Call like this:
CURSORTOXML( [<< My Alias >>], [lcXML], 0 )
STRTOFILE( lcXml, [d:\xmlFiles\test.xml] )
DoShellExecute( [d:\xmlFiles\test.xml] )
