... nRen := oText:RecCount() + 1 Cada uno de las lineas tiene un identificador único... por ejemplo: <Contact_ContactPerson>VERONICA MARTINEZ ALMENDAREZ</Contact_ContactPerson> FOR i := 1 TO nRen cDatos := alltrim( oText:ReadLine() ) // una linea es un dato if "<Contact_ContactPerson>"$cDatos ...