DnsLookup
DnsLookup dient zum Auflösen von Hostnamen in IP-Adressen. Diese Funktion wird hauptsächlich verwendet, um Verbindungen zu Servern herzustellen, deren IP-Adresse unbekannt ist.
Syntax
DnsLookup(hostname)
Rückgabewert
String (IP-Adresse).
Beispiel
Sehr einfacher DNSEine in TCP/IP-basierten Netzwerken verwendete Datenbank, mit der sich Hostnamen in IP-Adressen übersetzen und andere Domänen-bezogene Informationen bereitstellen lassen.-Lookup und Reverse Lookup:
Function Main
Dim SocketObject As Object
Dim ServerName As String
Dim IP As String
Dim ResolvedName As String
'Wagenrücklauf und Zeilenvorschub
cr = Chr(13) + Chr(10)
ServerName = "whois.networksolutions.com"
echo("Wird gesucht"+cr)
Socket.SetTimeout 5000,5000
ip = socket.DnsLookup(ServerName)
echo(ServerName + "entspricht der IP-Adresse:"+cr )
echo(ip +cr)
ResolvedName = Socket.ReverseDnsLookup(ip)
echo(cr)
echo("IP-Adresse "+ip+ "entspricht "+cr)
echo(ResolvedName+cr)
End Function