#include <WinHTTP.au3>
$hSession = _WinHttpOpen("Allvatar Reader") ; User Agent bestimmen
$hConnect = _WinHttpConnect($hSession, "soul.host.allvatar.com") ; Zum Host verbinden

_WinHTTPRequest($hConnect, "/login.php") ; Login Seite besuchen
_WinHTTPRequest($hConnect, "/login.php", "username=Antipope&password=notebook&login=Login+-+Die+CMS-Bridge+ist+aktiviert.+Benutzt+die+Login-Daten+eures+Forums%2FCMS+um+euch+anzumelden.") ; einloggen

$sHTML = _WinHTTPRequest($hConnect,"/viewmember.php?s=&name=Oil") ; Seite öffnen
$aJetzt = StringRegExp($sHTML,'Jetzt[^"]+[^>]+>([\d.]+)',3) ; Wert auslesen
MsgBox(0,"",$aJetzt[0]) ; und ausgeben



Func _WinHTTPRequest($hConnect, $sSite, $sPost = "", $sReferer = $WINHTTP_NO_REFERER)
    ;Author: SEuBo
    Local $hRequest, $sHTML, $sMode = "GET", $sHeaders = $WINHTTP_NO_ADDITIONAL_HEADERS, $sOptional = $WINHTTP_NO_REQUEST_DATA
    If $sPost <> "" Then
        $sMode = "POST"
        $sOptional = $sPost
        $sHeaders = "Content-Type: application/x-www-form-urlencoded" & @CRLF
    EndIf

    $hRequest = _WinHttpOpenRequest($hConnect, $sMode, $sSite, "HTTP/1.1", $sReferer) ; Anfrage an die Seite stellen
    _WinHttpSendRequest($hRequest, $sHeaders, $sOptional) ; Anfrage senden.
    _WinHttpReceiveResponse($hRequest) ; Warte auf Antwort des Servers
    Do
        $sHTML &= _WinHttpReadData($hRequest) ; Antwort aus dem Buffer lesen.
    Until @error ; bis ein fehler auftritt (übertragung abgeschlossen)
    Return $sHTML
EndFunc   ;==>_WinHTTPRequest