A través de automatización puedes obtener las estadísticas y características de un documento de Word, entre ellas: número de palabras, párrafos, líneas, palabras, entre otras.
oW = Createobject("Word.Application")
oW.Documents.Open(Getfile("DOC"))
?"Palabras "+ Transform(oW.ActiveDocument.ComputeStatistics(0))
?"Líneas " + Transform(oW.ActiveDocument.ComputeStatistics(1))
?"Paginas " + Transform(oW.ActiveDocument.ComputeStatistics(2))
?"Caracteres sin espacios " +
Transform(oW.ActiveDocument.ComputeStatistics(3))
?"Parrafos "+ Transform(oW.ActiveDocument.ComputeStatistics(4))
?"Caracteres con espacios " +
Transform(oW.ActiveDocument.ComputeStatistics(5))
Si tienes inquietudes, sígueme en Twitter para contactarme.
Seguir a @davamadort¿Deseas que tu sitio web aparezca en buscadores como google, yahoo, msn?
Contrata un plan de hosting en www.winnethost.com y recibes totalmente gratis el registro de tu sitio web en más de 24 buscadores, entre ellos google, yahoo, msn
El Sitio La Web de Davphantom se encuentra hospedado en WinNetHost.com
