FF.au3/IE.au3 Quellcode auslesen in Variable speichern

Kev

Hey

also hab ne HP..da isn Quellcode...

es geht darum: BSP:

http://www.arsenal.rising-gods.de/character-sheet.xml?r=PvP-Realm&n=Anubiz

Im Quellcode steht jetz drin: zb:class=priest

kann ich so sachen mit hilfe von der FF.au3 und IE.au3 auslesen und in zb. $class speichern.

if yes then
how?

gruß

Kev

( Nein ich zock kein WoW^^ (mehr),just fun scripting)

**Schnitzel**

ich kann die seite leider nicht öffnen da Games bei uns in der arbeit gesperrt sind.

aber erlaubt die seite denn die automatisierung? wohl kaum oder?
und wenn doch: Was willste mit deinem script machen?

Kev

muss es ja net erlauben, bzw ich will ja nur die daten auslesen,bsp: ich lese aus, was der character da fürne klasse ist, was im quellcode unter class=priest steht, das geb ich dann in ner msgbox aus.

damit jeder gleich weiß.

aha.

klasse ist priester
etc.

//edit

Spoiler anzeigen

[autoit]

#cs ----------------------------------------------------------------------------

[/autoit] [autoit][/autoit] [autoit]

AutoIt Version: 3.3.4.0
Author: myName

[/autoit] [autoit][/autoit] [autoit]

Script Function:
Template AutoIt script.

[/autoit] [autoit][/autoit] [autoit]

#ce ----------------------------------------------------------------------------

[/autoit] [autoit][/autoit] [autoit]

; Script Start - Add your code below here
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <IE.au3>
#include <FF.au3>

[/autoit] [autoit][/autoit] [autoit]

Guicreate("EviLSig",500,350)
GuictrlcreateLabel("Character Name:",30,30,120,25)
$Name = GUICtrlCreateInput("",130,25,120,25)
GuictrlcreateLabel("Rising Gods Realm:",30,60,120,25)
$Realm = GUICtrlCreateInput("",130,55,120,25)
$Button = GUICtrlCreateButton("Fertig",130,85,120,25)
$ButtonExit = GUICtrlCreateButton("Beenden",370,315,120,25)
$Button1 = GUICtrlCreateButton("Show me",130,112,120,25)
GuiCtrlSetState($Button1, $GUI_DISABLE)
GUISetState(@SW_SHOW)

[/autoit] [autoit][/autoit] [autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
case $button
GuiCtrlSetState($Name, $GUI_DISABLE)
GuiCtrlSetState($Realm, $GUI_DISABLE)
msgbox(0,"Status", "Character Name: " & GUICtrlRead($Name) & @CRLF & "Rising Gods Realm: " & GUICtrlRead($Realm))
GuiCtrlSetState($Button1, $GUI_ENABLE)
case $ButtonExit
exit
case $Button1
ShellExecute("http://www.arsenal.rising-gods.de/character-sheet.xml?r=" & GUICtrlRead($Realm) & "-Realm&n=" & GUICtrlRead($Name))
EndSwitch
Wend

[/autoit]

und jetz soll in dem gui noch stehen, was der angegebene char für eigenschaften hat.
klasse,life,mana,spelldmg (^^ wow krams halt)
was ich ausm quellcode lesen will.

**Schnitzel**

Zitat von Kev

muss es ja net erlauben

doch muss er.
weil wir keine scripte unterstützen die gegen AGB's der Betreiber verstoßen

Kev

okay er erlaubts schnitzel

ich kenn den schon paar jahre..das is kein problem, da brauchste dir keine sorgen machen

da schnitzel net auf die seite kommt, hab ich den quellcode ma kopiert.

Spoiler anzeigen

<?xml version="1.0" encoding="UTF-8"?>
<?xml-stylesheet type="text/xsl" href="/layout/character/sheet.xsl"?>
<page globalSearch="1" lang="de_de" requestUrl="/character-sheet.xml">
<tabInfo subTab="profile" tab="character" tabGroup="character" tabUrl="r=PvP-Realm&cn=Anubiz&gn=PornKingS"/>
<characterInfo>
<character battleGroup="Rising Gods" charUrl="r=PvP-Realm&n=Anubiz" class="Priester" classId="5" classUrl="c=Priester" faction="Allianz" factionId="0" gender="Männlich" genderId="0" guildName="PornKingS" guildUrl="r=PvP-Realm&gn=PornKingS" lastModified="04.03.2010 12:00" level="75" name="Anubiz" points="760" prefix="" race="Mensch" raceId="1" realm="PvP-Realm" suffix="" titleId="0"/>
<characterTab>
<talentSpecs>
<talentSpec active="1" group="1" icon="spell_shadow_shadowwordpain" prim="Schatten" treeOne="12" treeThree="54" treeTwo="0"/>
</talentSpecs>

</professions>
<characterBars>
<health effective="12819"/>
<secondBar casting="85" effective="10612" notCasting="85" type="m"/>
</characterBars>
<baseStats>
<strength attack="41" base="41" block="0" effective="41"/>
<agility armor="96" attack="48" base="48" critHitPercent="0" effective="48"/>
<stamina base="93" effective="814" health="7960" petBonus="-1"/>

**Schnitzel**

hm ok dann sag doch das das ne seite von nem bekannten is

den quellcode kriegste so:

[autoit]

$source = _INetGetSource("www.diehomepage.de")

[/autoit]

und untersuchen kannst du ihn mi RegEx oder mit den stringfunktionen. Meistens funktioniert _Stringbetween ganz gut

Kev

okay und jetz für ganz doofe?

quellcode von der hp steht oben..

[autoit]

$source = _INetGetSource("http://www.arsenal.rising-gods.de/character-sheet.xml?r=" & GUICtrlRead($Realm) & "-Realm&n=" & GUICtrlRead($Name))

[/autoit]

und jetz zb davon class=priest..da soller..des class=priest finden, und das was hinter dem = steht auslesen, ich versuch ma umzusetzen:

$class = suche-im-quellcode(class=*) und speicher was für * steht in der variable $class

**Schnitzel**

so sollte es eigentlich funktionieren:

Spoiler anzeigen

[autoit]

#include <Inet.au3>
#include <String.au3>
$source = _INetGetSource("www.diehomepage.de")
$klasse = _StringBetween($source , '" class="', '" classId')

[/autoit] [autoit][/autoit] [autoit]

If IsArray($klasse) Then
MsgBox(0,"Deine Klasse ist:", $klasse[0])
Else
msgbox(0,"Fehler", "Keine Klasse gefunden")
EndIf

[/autoit]

Kev

[autoit]

#include <Inet.au3>
#include <String.au3>
$source = _INetGetSource("http://www.arsenal.rising-gods.de/character-sheet.xml?r=PvP-Realm&n=Anubiz")
$klasse = _StringBetween($source , '" class="', '" classId')

[/autoit][autoit][/autoit][autoit]

If IsArray($klasse) Then
MsgBox(0,"Deine Klasse ist:", $klasse[1])
Else
msgbox(0,"Fehler", "Keine Klasse gefunden")
EndIf

[/autoit]

so?!?!?!

kommt fail

**Schnitzel**

ups sry.
_Stringbetween is nullbasiert. habs oben ausgebessert.

wenns nicht funktioniert helf ich dir in ner viertl stunde, dann bin ich daheim

Kev

same thing

joa machn wa's so
bzw fahr auch gleich vonner Arbeit nachhause..bin so um 18 uhr @home

achja &

thx

**Schnitzel**

hö, du hasts aber schon angepasst oder, also den link

Spoiler anzeigen

[autoit]

#include <Inet.au3>
#include <String.au3>
$source = _INetGetSource("http://www.arsenal.rising-gods.de/character-sheet.xml?r=PvP-Realm&n=Anubiz")
$klasse = _StringBetween($source , '" class="', '" classId')

[/autoit] [autoit][/autoit] [autoit]

If IsArray($klasse) Then
MsgBox(0,"Deine Klasse ist:", $klasse[0])
Else
msgbox(0,"Fehler", "Keine Klasse gefunden")
EndIf

[/autoit]

weil genau so funktionierts bei mir

Kev

komisch :o @home geht alles

bei mir auch, danke schnitzi

SEuBo

Auch wenn das Problem schon gelöst ist: Ich empfehle für sowas immer StringRegExp. Das ist schnell, praktisch, und zuverlässiger als _StringBetween (welches im übrigen nur ein Wrapper für RegExp ist)

Siehe meine Signatur - da findest du ein entsprechendes Tutorial falls es dich interessieren sollte