Output the contents of a HTML tag in a specific <div>

[SuperCrazyJoel]

I am currently working on a script that will output the contents of a specific HTML tag in a specific <div>.

Thus far, I have managed to output the contents of the entire div (in plain text).

#include <IE.au3>
#include <MsgBoxConstants.au3>


Local $oIE = _IECreate("www.autoitscript.com")
Local $oDiv = _IEGetObjById($oIE, "header")


MsgBox($MB_SYSTEMMODAL, "Obtain Title", $oDiv.innerText)

However,  I only need the contents of the <h1> tag. 

Secondary question, in my div "header" there is also some text contained in <p> tags. I want to also output the line that begins with a certain phrase e.g. SEARCH("Select this line").

All help appreciated. 

Edited July 11, 2014 by SuperCrazyJoel

[Damein]

You'll need to use StringRegExp

$Data = StringRegExp($oDiv.innerText, "(?i)(?s)<h1>(.*?)</h1>", 1)

That should get you what you want.

What that is doing is searches for <h1> and then copies everything until it finds </h1>

Didn't test but I think that will work out.

StringRegExp is a complicated and vast amount of information so to understand it fully you'll want to look through the help document extensively. But that should get you started and a clear idea of what it does.

Edited July 11, 2014 by Damein

[SuperCrazyJoel]

Thanks for the reply. However, the problem is .innerText removes the HTML tags (thus the regular expression cannot find anything). 

I understand that _IEGetObjById returns an object variable. The regular expression needs to search this raw object variable (not the innerText). How can I do this?

[mikell]

Use $oDiv.innerHtml instead  of $oDiv.innerText

[SuperCrazyJoel]

Another quick question - this time about the regex. It didn't like the / therefore I edited the regex: 

StringRegExp($oDiv.innerHtml, "(?i)(?s)<h1>(.*?)<\/h1>",1)

On a regex tester (PCRE) - I get results as expected. On autoit - I don't get results. 

[jchd]

A forward slash doesn't need to be escaped and should cause no issue. What does "it didn't like the /" mean?

Please post reproducer to help us help you.

#include <Array.au3>

Local $sIn = "this is a made up sample containing <h1>something interesting</h1> and more blah"
Local $aRes = StringRegExp($sIn, "(?is)<h1>(.*?)</h1>", 1)
_ArrayDisplay($aRes)

[SuperCrazyJoel]

No problem.

 

#include <IE.au3>
#include <MsgBoxConstants.au3>


Local $oIE = _IECreate("http://www.w3schools.com/html/default.asp")
Local $oDiv = _IEGetObjById($oIE, "main")
Local $oInnerHTML = $oDiv.innerHTML
Local $oTitle = StringRegExp($oInnerHTML, "(?is)<h1>(.*?)</h1>", 1)


;MsgBox($MB_SYSTEMMODAL, "Obtain Title", $oDiv.innerHTML)
;MsgBox($MB_SYSTEMMODAL, "Obtain Title", $oTitle)


;ConsoleWrite($oInnerHTML)
ConsoleWrite($oTitle)

[jchd]

Please refer to my sample code and/or to the help file: StringRegExp returns an ...

[mikell]

As StringRegExp returns an array, you must check an array element

#include <IE.au3>
#include <MsgBoxConstants.au3>

Local $oIE = _IECreate("http://www.w3schools.com/html/default.asp")
Local $oDiv = _IEGetObjById($oIE, "main")
Local $oInnerHTML = $oDiv.innerHTML
Local $oTitle = StringRegExp($oInnerHTML, "(?is)<h1>([^<]+)", 3)[0]

MsgBox($MB_SYSTEMMODAL, "Obtain Title", $oTitle)