Automatisiert Daten aus einer HTML Seite kopieren

[fundriver]

Hallo zusammen,
ich bräuchte da mal eure hilfe:
Ich müsste bestimmte Daten ( Zeile und Position der Daten sind immer gleich) aus einer hTML Seite an bestimmte Positionen in einem Worddokument kopieren. an der HTML Seite darf ich nicht basteln, und das Word Dokument darf ich leider auch nicht verändern. Gibt es da Möglichkeiten?
danke
Wolfgang

[GoB_Dura]

Ich bin an einem Änlichem Thema drann... habe da aber auch noch keine richtig funktionierende lösung gekommen.

Müssen einzelne Teile ausgelesen werden oder die gesammte Seite? und wenn dann etwa so?
https://autohotkey.com/board/topic/62192-read-web-page

Code: Select all

;~ MsgBox, % HTMLText("http://gob-clan.de/index.php?mod=clans&action=users&id=4")
FileAppend, % HTMLText("http://gob-clan.de/index.php?mod=clans&action=users&id=4"), meintest.txt

HTMLText(url, line=""){

	doc := ComObjCreate("HTMLfile")

	pwhr := ComObjCreate("WinHttp.WinHttpRequest.5.1")

	pwhr.Open("GET",url) 

	pwhr.Send()

	doc.write(pwhr.ResponseText)

	text := doc.body.outerText

	if not line

		return, text

	s := InStr(text, "`n", 0, 1, line-1)

	e := InStr(text, "`n", 0, s+1)

	return, Trim(SubStr(text, s+1, e-s-1), "`r`n")  

}

Oder Die Gesammte Seite mackieren und in clipboard koperen

Code: Select all

WinWait, Google - Mozilla Firefox, 
IfWinNotActive, Google - Mozilla Firefox, , WinActivate, Google - Mozilla Firefox, 
WinWaitActive, Google - Mozilla Firefox, 
Send, {CTRLDOWN}ac{CTRLUP}
page := clipboard2
		Sleep, 500
		send, {CTRLDOWN}c{CTRLUP}
		FNN=%clipboard%
		

---
IN EIGENER SACHE:
Ich will von meiner Seite den User Status (Trialmember, Member oder nur Benutzer) auslesen lassen und damit mein 1klick connect TS3 programm entscheiden lassen wenn Trailmember oder + (Member,Support,Admin) dann TS3 start inkl. passw. und wenn nur Benutzer oder - (Gast) Dann muss PW des Servers manuell eingegeben werden...

1klick connect TS3 nist schopn fertig nur die Webabfrage feht mir noch... denn das was ich habe bringt mir nichts...

habe es mit einer extra .txt Datei versucht aber das ist keine gute Lösung da ich die Traimember von hand eingeben muss.. etc.. ink kleinere macken des scripts...
-------------------------------

[garry]

kurz ein Beispiel
'aac' ist internet-text und denn nach gesuchtem Text filtrieren , hier variable 'y'

Code: Select all

;- Example shows current playing song from :
;- HPR1: Traditional Classic Country from Heartland Public Radio

f1:="http://50.7.70.58:8708/played.html"        ;- url search for

f2  =http://50.7.70.58:8708
vlcx=%a_programfiles%\VideoLAN\VLC\vlc.exe
ifexist,%vlcx%
  run,%vlcx% --one-instance --qt-start-minimized %f2%,,hide,pid1     ;- play song with vlc.exe
  
xx:=ComObjCreate("WinHttp.WinHttpRequest.5.1")  ;- Create the Object
    xx.Open("GET",f1)                           ;- Open communication
    xx.Send()                                   ;- Send the "get" request
    aac=
    aac:=xx.ResponseText                        ;- Set the "aac" variable to the response
    
    ;- search for current song
    StringReplace,y,aac,</tr>,$, All
    Loop,parse,y,$,
        {
        if A_loopfield contains Current Song
            {
            y:=RegExReplace( A_loopfield, "<.*?>" )
            stringreplace,y,y,Current Song,,all
            stringmid,y,y,9,200
            break
            }
        }
        
    y :=RegExReplace(y, "\W", " ")                          ;-  remove special characters
msgbox, 262208,Heartland Public Radio ,Current Song=`n%y%   ;-  show song title
return