Zeile nach Wort ausgeben

hajoh25

Hallo,
in dem folgenden Code will ich das das Wort "href=" in einem Quellcode gesucht wird und wenn er es gefunden hat das Wort danach ausgeben. Jedoch weiß ich nicht, wie ich das machen kann.

Code

#include <IE.au3>
#include <Inet.au3>
#include <String.au3>
#include <File.au3>


$source = _INetGetSource("http://www.google.de/")
$suchen = "href="
$count = _FileCountLines($source)
$line = FileReadLine($source, 1)




	If StringInStr($source, $suchen) Then


		MsgBox(0, "Test", $suchen)


	 EndIf

Alles anzeigen

x0r

AutoIt

#include <Inet.au3>
#include <String.au3>
#include <Array.au3>


Local $source = _INetGetSource("http://www.google.de")


Dim $ary = _StringBetween($source, "href='", "'")


_ArrayDisplay($ary)

Alles anzeigen

Nimms mir bitte nicht übel, aber kannst du gar nix alleine?