Letzte Änderung:  
29.03.2010 13:10:12
 
ein Counter...
Anmelden
  Dokumentation - [Beispielskripten] - [ReversDns]  
Bild Über IWAN
Bild Das Produkt
Bild ein wenig Technik
Bild Referenzen
Bild Open GIS
Bild History
Bild Aktuelle Änderungen

Bild Dokumentation
Bild Datenzugriff
Bild IwanScript
Bild Symbole und Klassifikation
Bild How-To's
Bild Beispielskripten
PixelBild Layerinfo
PixelBild Projektinfo
PixelBild ReversDns
PixelBild Symboldump
PixelBild WFS Ausgabe

Bild Kontakt/Impressum
Bild Kontakt
Bild Impressum
Bild Haftungsausschluss
Bild Copyright
Bild Weitere Links

 

ReversDns

Go;
/*
  Namensauflösung für IP-Addressen
  
  Argumente für dieses Skript: IPS=ListDerAddressen
  Es kann eine einzelne Addresse angegeben werden, oder kommasepariert eine Liste
*/
       
End;
<html>
<head>
<title>Reverse DNS Lookup</title>
<style type=text/css>
  BODY,TABLE,TR
    {font-family:Verdana;font-size:12px;font-weight:800;}
  TR.HEAD
    {font-weight:800;}
  TR.A
    {color:#0000FF;background-color:#CCCCCC;}
  TR.B
    {color:#0000DF;background-color:#DDDDDD;}
</style>
</head>
<body>
<script>
  self.focus();
</script>

Go;
  IF(isnull($IPS));
    print("Keine Adresse übergeben (ips ist leer)!");
  ELSE;
    ret=CreateObject(arr,"Array");        
    count=arr.FromString($IPS,iif(isnull($SEP),",",$SEP));
    ret=arr.RemoveDup();
    IF(arr.First())
      print("<table width=100% border=0 cellpadding=4 cellspacing=0>");
      print("<tr class=HEAD><td align=center>IP</td><td></td><td align=center>Host</td></tr>");
      flag=true;
      while(arr.Next());
        flag=not(flag);
        host=ReverseDNSLookup(arr.Item());
        print("<tr class="+iif(flag,"A","B")+"><td nowrap>"+arr.Item()+"<td>:</td>");
        print("<td nowrap width=100%>"+iif(isnull(host),"-k.A.-",host)+"</td></tr>");
      wend;
      print ("</table>");
    ENDIF;
  ENDIF;
End;
</body>
</html>
Druckersymbol Druckversion dieser Seite 

Zuletzt geändert am 19.09.04 (rn)
   Sitemap | IDU Homepage: [http://www.idu.de] cardo Homepage: [http://www.cardogis.com] GDDB Homepage: [http://www.gddb.de]