AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Netzwerke Delphi Auf Website ohne IE zugreifen, um Daten auszulesen
Thema durchsuchen
Ansicht
Themen-Optionen

Auf Website ohne IE zugreifen, um Daten auszulesen

Offene Frage von "hm988"
Ein Thema von hm988 · begonnen am 15. Feb 2004 · letzter Beitrag vom 19. Feb 2004
 
Benutzerbild von Treffnix
Treffnix

Registriert seit: 25. Jun 2003
Ort: AC
740 Beiträge
 
Delphi 7 Professional
 
#8

Re: Auf Website ohne IE zugreifen, um Daten auszulesen

  Alt 19. Feb 2004, 08:48
Also, wenn sich die Zeilenanzahl vor den relevanten Zeilen nie ändert und die Länge und Position einer MAC-Adresse immer gleich ist, ist es nicht schwer.

Delphi-Quellcode:
Procedure ...
var HTML: TStringlist;
    MACs: TStringList;
    i: Integer;
Begin
  ...
  HTML:= TStringlist.Create;
  MACs:= TStringList.Create;
  HTML.Text := deinHTMLString;
  i:= 33; //Wenn ich mich nicht verzählt habe, steht die erste MAC in Zeile 33
  While Trim( HTML[i] ) <> 'Do Begin
    MACS.Add( copy( HTML[i], 45, 17 ) ); //45-> erster Buchstabe der MAC 17 -> Länge einer MAC
    i:= i+2; //2, sofern die Zwischenzeile nich von DP kommt
  End;
End;
Ist jetzt so das erste, was mir einfällt und ungetestet. Die Zahlen musste auf jeden Fall noch überprüfen. Es ist früher Morgen
Kannste es ja mal testen...

Wenn sich die Positon innerhalb des HTML-Textes musste die Zeilen nach Stichworten durchforsten, um die richtige zu finden.
z.B. in dem du mit pos nach "<tr><td align=center>1</td><td align=center>" suchst...
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 05:00 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz