Jump to content

analyze a webpage


Recommended Posts

Hey guys,

I was am looking to analyze a site and save the results.

The website is http://http://www.ellatha.com/eve/LPIndex-Isk-1

the function should be able to search for an INT > 1500 for exemple on the ISK Profit/LP column and afterwards save me the results

with the item on a file. After that press next site button and repeat the task. The only thing that I founded so far is:

'?do=embed' frameborder='0' data-embedContent>>

but maybe someone with more experience can give me some tipps

 

Thnx

Hendrik

Link to comment
Share on other sites

Thats not for ingame, its a tool that will help me to decide in which item I should invest my LP (loyality Points) the game is eveonline.com. I just want to analyze a webpage that has a databse for it

I am not launching this script ingame or in game server. I am analyzing a third party website

Edited by hendrikhe
Link to comment
Share on other sites

  • Moderators

hendrikhe,

Sorry for the delay - it took some time to learn about what you were trying to do. From what I have seen so far it seems to me that this does not involve game play:

The EVE API is a service provided by CCP that supplies account and character information to external applications without requiring you to log into the game

so I am happy for the thread to stay open. Please do not stray into other, less welcome areas. :)

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to comment
Share on other sites

Since the mods are allowing it, perhaps this can get you started:

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

Global $iValue = 1500, $sSearch = "Isk Profit/LP"
Local $bVisible = True
Local $sURL = "http://www.ellatha.com/eve/LPIndex-Isk-", $iIndex = 1, $iISKindex
Local $oIE = _IECreate("about:blank", 0, $bVisible)
OnAutoItExitRegister("cleanup")

Local $oTables, $aTable, $aItem
While 1
    _IENavigate($oIE, $sURL & $iIndex)
    $oTables = _IETableGetCollection($oIE)
    For $oTable In $oTables
        $aTable = _IETableWriteToArray($oTable, True)
        If StringInStr($aTable[0][0], "Faction Corp") Then
            For $a = 0 To UBound($aTable, 2) - 1
                If StringInStr($aTable[0][$a], $sSearch) Then
                    For $b = 1 To UBound($aTable, 1) - 1
                        If Number(StringReplace($aTable[$b][$a], ',', '')) > $iValue Then
                            Dim $aItem[2][UBound($aTable, 2)]
                            For $iItem = 0 To UBound($aTable, 2) - 1
                                $aItem[0][$iItem] = $aTable[0][$iItem]
                                $aItem[1][$iItem] = $aTable[$b][$iItem]
                            Next
                            _LogItem($aItem)
                        EndIf
                    Next
                EndIf
            Next
            ExitLoop
        EndIf
    Next
    $iIndex += 20
WEnd

Func _LogItem($aItem)
    _ArrayDisplay($aItem, "Item found with at least " & $iValue & " " & $sSearch)
EndFunc   ;==>_LogItem

Func cleanup()
    _IEQuit($oIE)
EndFunc   ;==>cleanup
Link to comment
Share on other sites

I changed the script just a little bit so it didnt stopped after finding a result.

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


Global $iValue = 1500, $sSearch = "Isk Profit/LP"
Local $bVisible = True
Local $sURL = "http://www.ellatha.com/eve/LPIndex-Isk-", $iIndex = 1, $iISKindex
Local $oIE = _IECreate("about:blank", 0, $bVisible)
OnAutoItExitRegister("cleanup")

Local $oTables, $aTable, $aItem
sleep(5000)
$test = 1
$blad= 1
Dim $aItem[1000][1000]
While $blad < 1506
    _IENavigate($oIE, $sURL & $iIndex)
    $oTables = _IETableGetCollection($oIE)

    For $oTable In $oTables
        $aTable = _IETableWriteToArray($oTable, True)
        If StringInStr($aTable[0][0], "Faction Corp") Then
            For $a = 0 To UBound($aTable, 2) - 1
                
                If StringInStr($aTable[0][$a], $sSearch) Then
                    For $b = 1 To UBound($aTable, 1) - 1
                        If Number(StringReplace($aTable[$b][$a], ',', '')) > $iValue Then
                            

                            For $iItem = 0 To UBound($aTable, 2) - 1
                                $aItem[0][$iItem] = $aTable[0][$iItem]
                                $aItem[$test][$iItem] = $aTable[$b][$iItem]

                            Next
                            $test = 1 + $test
                       
                        EndIf
                    Next
                EndIf
            Next
            ExitLoop
        EndIf
    Next
    $iIndex += 20
    $blad = $blad + 1
WEnd

Func _LogItem($aItem)
    _ArrayDisplay($aItem, "Item found with at least " & $iValue & " " & $sSearch)
EndFunc   ;==>_LogItem

Func cleanup()
    _IEQuit($oIE)
EndFunc   ;==>cleanup

while 1
_LogItem($aItem)
sleep(5000)

WEnd

This site is really nice because its easy to navigate, but unfortunately thiis site is not up to date.

After some research I found this site : https://www.fuzzwork.co.uk/lpstore/ but it seems to be impossible for me to navigate via autoit there, also I couldnt find out how to set "show 100 entries" with Autoit

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...