for n = 0 to xRes[ 1 ]:Length - 1
MsgInfo( xRes[ 1 ]:item( n ):NodeName )
cXML = xRes[ 1 ]:item( n ):XML
cXML = SubStr( cXML, At( ">", cXML ) + 1 )
cXML = SubStr( cXML, 1, At( "<", cXML ) - 1 )
MsgInfo( cXML )
next
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: Google [Bot] and 29 guests