Seite 1 von 1
Text aus Browser Popup kopieren
Verfasst: 23.12.2007 19:37
von -CookieLove-
Hallo
Ich möchte ein kleines Programm erstellen das Nachrichten
aus einem Forum protokolliert. Die Nachrichten in diesem
Forum kommen als Popup und sind also ein eigenes kleines
Fenster.
Wie kann mein Programm den Text der in dieser Nachricht steht
herrausziehen?
Gruß Alex,
Verfasst: 23.12.2007 19:42
von edel
Da es sich dabei wohl um eine ganz normale html Seite handelt, kannst
du sie auch mit ganz normalen PB Network Befehlen auslesen.
Verfasst: 23.12.2007 19:58
von -CookieLove-
wie?
Verfasst: 23.12.2007 20:30
von edel
In diesem Forum hier werden poPups so geoeffnet :
Code: Alles auswählen
<script language="Javascript" type="text/javascript">
<!--
if ( 1 )
{
window.open('privmsg.php?mode=newpm', '_phpbbprivmsg', 'HEIGHT=225,resizable=yes,WIDTH=400');;
}
//-->
</script>
Das heisst also das die Seite sich wie folgt aufbaut :
Server :
http://www.purebasic.fr/german/ (+ ordner)
Seite : privmsg.php?mode=newpm (+ variablen)
ruft man diese seite nun auf
http://www.purebasic.fr/german/privmsg.php?mode=newpm
sieht man diese Seite ganz normal im Browserfenster statt in
einem Popup.
Und mit diesem kleinen Snippet holen wir uns die Seite in unseren
Speicher :
Code: Alles auswählen
InitNetwork()
server.s = "purebasic.fr"
port.l = 80
adress.s = "/german/privmsg.php?mode=newpm"
nid = OpenNetworkConnection(server,port)
If nid
header.s = "GET " + adress + " HTTP/1.0" + Chr(13) + Chr(10)
header.s + "Host: " + server + Chr(13) + Chr(10)
header.s + Chr(13) + Chr(10)
result.s = ""
buffer.s = ""
len.l = 0
If SendNetworkString(nid,header)
While 1
e = NetworkClientEvent(nid)
If e = #PB_NetworkEvent_Data
Repeat
buffer = Space(1024)
len = ReceiveNetworkData(nid,@buffer,1024)
result + buffer
Until len = 0
Break
EndIf
Wend
Debug result
EndIf
EndIf
Verfasst: 24.12.2007 00:20
von -CookieLove-
Ich dachte eher an einen Code der auf das Fenster zugreift. Das Forum von dem ich spreche heißt TU und funktioniert etwas anders als normale Foren.