TomasSenk

#include <IE.au3>
#include <String.au3>
Func _ThanksCheck_EPVP4Story($Site, $Name)
Local $IECreate = _IECreate($Site, "", 0)
Local $ThanksSource = _IEDocReadHTML($IECreate)
Local $WinTitle = _StringBetween($ThanksSource, '<META content="', '" property="og:title">')
Local $LogInName = _StringBetween($ThanksSource, "rel=nofollow>", "</A>.")
Local $ThanksName = _StringBetween($ThanksSource, $Name & '.html" rel=nofollow>', '</A>&nbsp;(')
If $LogInName[0] = $Name Then
If $ThanksName[1] = $Name Then
Return True
Else
Return False
EndIf
Else
Return False
EndIf
WinClose($WinTitle&" - Windows Internet Explorer")
EndFunc ;==>_ThanksCheck_EPVP4Story