Wer den WEB-Server von Homeputer verwendet oder über Remote-Software auf seinen Rechner zu Hause zugreifen will, muss sich bei DynDNS oder einer anderen Organisation registrieren, um seinen Rechner über eine eigene URL erreichen zu können.
Ich habe einen "unabhängigen" Weg gewählt. - Und das geht sehr einfach: Wir erstellen ein Objekt "IPAdresse" vom Typ Zeichen mit einem Makro, welches jede Minute abläuft:
Code: Alles auswählen
** Benötigte Variable: AlteIP - Typ Zeichen
** Beim Programmstart oder, falls beim letzten Durchgang keine Verbindung
wenn IPAdresse = "" oder IPAdresse = "Keine Verbindung" dann
gehezu Weiter
endewenn
wenn nicht Uhrzeit =# "**:01:**" und nicht Uhrzeit =# "**:16:**"
und nicht Uhrzeit =# "**:31:**" und nicht Uhrzeit =# "**:46:**" dann
verlassen
endewenn
Weiter:
<?
// Abfrage ob der Server erreichbar ist. Timeout 2 Sekunden
if(fsockopen("www.whatismyip.com", 80, $errno, $errstr, 2))
{
$Array = file("http://www.whatismyip.com/automation/n09230945.asp");
$IPAdresse = $Array[0];
}else{
$IPAdresse = "Keine Verbindung";
}
?>
wenn IPAdresse = "Keine Verbindung" dann
verlassen
endewenn
wenn IPAdresse <> AlteIP dann
Sendemail("MeinName@MeinProvider.com,Neue IP<<Neue IP: %<IPAdresse>")
AlteIP := IPAdresse
endewenn
Vielleicht kann's jemand brauchen....
Viele Grüsse und
┼
*i*
*i**i*
*i**i**i*
*i**i**i**i*
*i**i**i**i**i*
*i**i***i***i**i*
║
║
Fröhliche
Weihnachten
Bümpi