Thema: Delphi Internetseiten auslesen

Einzelnen Beitrag anzeigen

MrMyagi

Registriert seit: 2. Mai 2007
203 Beiträge
 
Delphi 7 Personal
 
#20

Re: Internetseiten auslesen

  Alt 10. Jun 2008, 17:21
Zitat:
Da die Adressen solcher Links aber meistens eher konstant sind, würde ich die jetzt also zuerst im HTML-Code auslesen und dann einfach per WebBrowser.Navigate dorthin navigieren.
Japp, hast recht, dort kann ich auch mit navigate hinkommen.
Nun allerdings erscheint dort ein Feld, wo ich normalerweise immer das PW eingebe.
HAb schon alles mögliche versucht mit .value usw jedoch trägt er dort nichts ein
in das Editfeld.
Wie müsste der Code denn dafür aussehen?

Bild(möchte eine Eingabe in das Editfeld machen und hinterher den Button OK klicken):
http://operationsinnlos.op.funpic.de/Bild.JPG

Quellcode von dem Ausschnitt:

<HTML>
<HEAD>
<TITLE>Startseite</TITLE>
<SCRIPT language="JavaScript" src="/html/js_menu.txt" type="text/JavaScript"></SCRIPT>
<SCRIPT language="JavaScript">
<!--
var verz = 2000;
function OnLoad()
{
top.frames[1].location.href = "/html/m_start_passwort.htm";
}
function stVerg()
{
document.location.href="/html/vergessen.html";
}
function chk_pwd(){
document.PWD.submit();
}
function stEnter(){
if (window.event.keyCode==13){
chk_pwd();
}
}
function stBak(){
document.PWD.P1.disabled = false;
document.PWD.P1.style.backgroundColor="#FFFFFF";
document.PWD.P1.value = "";
document.PWD.P1.focus();
verz *= 2;
}
function stEnd(){
top.window.close();
}
//-->
</SCRIPT>
<LINK rel="stylesheet" href="/html/style.css" type="text/css">
<STYLE type="text/css">
<!--
#t_but1 {
/* visibility: hidden;*/
}
//-->
</STYLE>
</HEAD>
<BODY onLoad="OnLoad()">
<DIV id=c_Frame>
<DIV id=c_border>
<DIV id=c_pfad>Router - Einstieg in die Konfiguration</DIV>


<DIV id=c_titel>Passwort Eingabe</DIV>
<form name="PWD" method="POST" action="/cgi-bin/webcm">
<input type="hidden" name="getpage" value="../html/hcti_startseite.htm" />
<DIV id=c_last>
<table border="0" cellpadding="0" cellspacing="2">
<tr>
<td width="120"><input type="password" class="stylepwd" name="login:command/password" size="12" maxlength="12" /></td>
<td></td>
</tr>
</table>
</DIV>
</form>
<DIV id=c_leer></DIV>
<DIV id=c_foot></DIV>
</DIV>
</DIV>
<DIV id=t_Frame>
<DIV id=t_but1 onclick=stEnd() onmouseover=rahmen(1,1) onmouseout=rahmen(0,1)>Beenden&lt;&lt;</DIV>
<DIV id=t_but2 onclick=stVerg() onmouseover=rahmen(1,2) onmouseout=rahmen(0,2)>Vergessen&lt;&lt;</DIV>
<DIV id=t_but4 onclick=chk_pwd() onmouseover=rahmen(1,4) onmouseout=rahmen(0,4)>&gt;&gt; OK</DIV>
</DIV>
<DIV id=i_Frame>
<DIV id=i_content>

<h2>Passwort Eingabe</h2>


Der Zugang zu den Router - Konfigurationsdaten wird durch ein Passwort geschützt.</p>


Geben Sie das Passwort ein und bestätigen Sie mit OK.</p>


Wenn Sie das Passwort vergessen haben, können Sie innerhalb der ersten 10 Minuten nach einem
Neustart des Routers die Werkseinstellungen wiederherstellen und so das Passwort deaktivieren.</p>
</DIV>
</DIV>
</BODY>
</HTML>



mfG, Nico
  Mit Zitat antworten Zitat