Extract data from the web page and store it in notepad

[arunachandu 0]

Can someone tell me how do i extract data from the web page and store it in notepad?

[hannes08 35]

Hello arunachandu,

take a look at the helpfile, see documentation for InetRead or InetGet. You can save the recieved data as a text file with FileWrite, FileWriteLine, ...

[wakillon 398]

You can use _INetGetSource or some IE functions !

What type of data ?

[arunachandu 0]

You can use _INetGetSource or some IE functions !

What type of data ?

I passed a string in the google search and search results will be displayed. I want to store all the links(urls) of the search results in a notepad or excel sheet.

[wakillon 398]

I passed a string in the google search and search results will be displayed. I want to store all the links(urls) of the search results in a notepad or excel sheet.

Can you show your script that i adapt to it...

Edit i remember you !

Try this :

#include <IE.au3>

$oIE = _IECreate ("http://www.google.com")
$oForm = _IEFormGetObjByName ($oIE, "f")
$oQuery = _IEFormElementGetObjByName ($oForm, "q")
_IEFormElementSetValue ($oQuery, "AutoIt IE.au3")
_IEFormSubmit ($oForm )
$oLinks = _IELinkGetCollection ($oIE)
$iNumLinks = @extended
MsgBox(0, "Link Info", $iNumLinks & " links found")
For $oLink In $oLinks
    MsgBox(0, "Link Info", $oLink.href)
Next

Edited April 28, 2011 by wakillon

[wakillon 398]

A way to filter links !

expandcollapse popup

#include <IE.au3>
#include <Array.au3>

$oIE = _IECreate ("http://www.google.com")
$oForm = _IEFormGetObjByName ($oIE, "f")
$oQuery = _IEFormElementGetObjByName ($oForm, "q")
_IEFormElementSetValue ($oQuery, "AutoIt IE.au3")
_IEFormSubmit ($oForm )
$oLinks = _IELinkGetCollection ($oIE)
$iNumLinks = @extended
$_Display=0
Dim $_LinkArray[1]

For $oLink In $oLinks
    If $_Display Then _ArrayAdd ( $_LinkArray, $oLink.href )
    If StringInStr ( $oLink.href, 'advanced_search?' ) <> 0 Then $_Display=1
    If StringInStr ( $oLink.href, 'google.com/support' ) <> 0 Then ExitLoop
Next

$_LinkArray = _DeleteArrayElementWithStringInstr ( $_LinkArray, 'webcache.' )
$_LinkArray = _DeleteArrayElementWithStringInstr ( $_LinkArray, 'search?' )
_ArrayDisplay ( $_LinkArray )
_IEQuit ( $oIE )

Exit

Func _DeleteArrayElementWithStringInstr ( $_Array, $_String )
    Local $_Item
    For $_Element In $_Array
        If StringInStr ( $_Element, $_String ) <> 0 Then
            _ArrayDelete ( $_Array, $_Item )
        Else
            $_Item+=1
        EndIf
    Next
    Return $_Array
EndFunc ;==> _DeleteArrayElementWithStringInstr ( )

[arunachandu 0]

Thanks a lot for the reply.i just started leaning script.so getting all silly doubts.

I tried extracting the headings in the web page.

The code is as follows:

$oIE = _IECreate ("$url")

$heading=_IEGetObjById ($oIE, "summary")-----to extract only h2 level headings and the id for that is summary

$result=_IEPropertyGet($heading, "innertext")

MsgBox(0,"heading",$result)

the result it is showing in the message box is "0"

how do i get the content in the h2 tag?

[wakillon 398]

Without url, i can't try anything...

[arunachandu 0]

This is the code i wrote:

#include <IE.au3>

$oIE = _IECreate("www.google.com")

$html=_IEBodyReadText($oIE)

$htmlfile=FileOpen("..\Htmlfile.txt",1)

if $htmlfile = -1 Then

MsgBox(0, "Error", "Unable to open file.")

Exit

EndIf

FileWrite($htmlfile, $html)

$testurl=StringRegExp($htmlfile, '(?i)(?s)A faster way to browse the web',1)

MsgBox(0,"data",$testurl)

I was able to open the page write into the file but not able pick the text and display in the message.

The message it was showing is 0.

Can you please help me in this?

Thanks

Aruna

[bwochinski 1]

Unless you need the page text later, there's no need to write to a file, but that's pretty much where the problem stems from.

StringRegExp() will not open a file to do a search, in the usage you have above the function is just matching against the name of the file. ( ..\Htmlfile.txt )

Looking in the help you can see what your return of "0" is referring to, though it depends on the mode you're matching in.

I'm not sure what you're trying to match exactly, but to give you an example using google, try this:

#include <IE.au3>
#include <array.au3>

$oIE = _IECreate("www.google.com",0,0)
$html=_IEBodyReadText($oIE)


MsgBox(0,"",$html)

$testurl=StringRegExp($html, '(?i).*search.*',3)

_IEQuit($oIE)
_ArrayDisplay($testurl)

Edited April 29, 2011 by bwochinski

[wakillon 398]

bwochinski is right, no need to write to a file.

I have tried _IEBodyReadText and IEBodyReadHTML and i don't find the string you want !

could you be more precise ?