>Somebody have an example of MSXML2.DOM in VFP 7.0 ?

You can also work with MSXML2.DOM using ADO and XML Simple Provider:

oRs = CreateObject("ADODB.Recordset")
oRs.ActiveConnection = "Provider=MSDAOSP;Data Source=MSXML2.DSOControl.2.6;"
oRs.Open("portfolio.xml")

? oRs.Fields(0).Name
Do While !oRs.Eof
	? oRs.Fields(0).Value
	oRs.MoveNext()
EndDo