Html a Texto (Ayuda)

manuelhn · Mensaje por **manuelhn** » 19 Mar 2014, 07:13

Recientemente estoy iniciándome con esto de autoit
pero me doy con un problema

resulta que quiero leer un archivo que esta en Html

Código: Seleccionar todo

<html>
<head>
<title>Datos</title>
</head>
<body>
<h1>Mis Datos</h1>
      <div id="article">          
          <div id="mis-datos">
            <div class="items">
              <ul>
                <li>
                  <span class="label">Nombre</span>
                  <span class="value">EDSON JARIB</span>
                </li>
                <li>
                  <span class="label">Apellido</span>
                  <span class="value">VALLECILLO LAGOS</span>
                </li>
                <li>
                  <span class="label">Tipo de documento</span>
                  <span class="value">CIP Identidad</span>
                </li>
                <li>
                  <span class="label">Número de documento</span>
                  <span class="value">05061840000</span>
                </li>
                <li>
                  <span class="label">Telefono de contacto</span>
                  <span class="value">9999999</span>
                </li>
                <li>
                  <span class="label">Correo</span>
                  <span class="value">[email protected]</span>
                </li>
              </ul>
            </div>
	</div>
    </div>
  </body>
</html>

lo cual al abrir esta pagina con un explorador da como resultado el siguiente

Mis Datos

Nombre EDSON JARIB
Apellido VALLECILLO LAGOS
Tipo de documento CIP Identidad
Número de documento 05061840000
Telefono de contacto 9999999
Correo [email protected]

resulta que este scrip me da la solución que quiero pero no me sirve si se trata de un archivo

Código: Seleccionar todo

#include <IE.au3>
Local $oIE2 = _IE_Example("basic")
Local $sText2 = _IEBodyReadText($oIE2)
MsgBox(0, "", $sText2)

Este es mi scrip que tengo hasta el momento pero no se como tendría que hacer para lograr el resultado

Código: Seleccionar todo

#include <IE.au3>

$oIE1 = FileRead("Pagina.html")
$sText1 = _IEBodyReadText($oIE1)
MsgBox(0, "", $sText1)

De antemano gracias por su ayuda, Que Dios los llene de bendiones

emiliano · Mensaje por **emiliano** » 19 Mar 2014, 14:11

Seguramente soy más nuevo que vos, pero eso después de mucho pelear me funcionó.
Este es el sender, yo ahí leo el archivo log.txt (pero funciona con cualquier formato incluido HTML), y lo envío mediante TCPSend quizás lo que te falte (como a mi me sucedió) fue el FileRead().
Te diría "cualquier otra consulta no dudes en hacerla" pero dudo que pueda ayudarte

Código: Seleccionar todo

TCPStartup()
While 1
   $File = FileOpen("log.txt")
   if $File   = -1 then
     Msgbox(0,"Error","Archivo no encontrado")
     Sleep(10000)
   Else
     $Socket = TCPConnect(@IPAddress1, 8000)
     TCPSend($Socket, FileRead($File,4096))
     TCPCloseSocket($socket)
   EndIf
WEnd

Sds

Chefito · Mensaje por **Chefito** » 19 Mar 2014, 19:39

Mira la función _INetGetSource de la udf Inet en la ayuda. Es la que necesitas y la más fácil de utilizar

.

Casi aciertas con la función que necesitabas utilizando la udf IE. La que necesitas para conseguir el código html es _IEDocReadHTML.
Otra posibilidad es utilizar la función nativa de autoit inetread. Recupera los datos en binario, y si quieres transformarlo en caracteres tienes que utilizar la función BinaryToString. Mira el ejemplo en la ayuda que te lo dice.

Lo dicho, de estas tres posibilidades más o menos facilonas, yo suelo utilizar la primera

.

Saludos.

Autoit.ES

Html a Texto (Ayuda)

Html a Texto (Ayuda)

Re: Html a Texto (Ayuda)

Re: Html a Texto (Ayuda)