DnsLookup
DnsLookup viene utilizzato per risolvere i nomi host negli indirizzi IP. Questa funzione viene utilizzata principalmente quando si desidera connettersi ai server e non si conosce l’IP relativo.
Sintassi
DnsLookup(hostname)
Restituisce
String (IP Address).
Esempio
Ricerca DNSUn database utilizzato dalle reti TCP/IP che consente la traduzione dei nomi host in numeri IP e di fornire altre informazioni relative al dominio. molto semplice e invertita:
Function Main
Dim SocketObject As Object
Dim ServerName As String
Dim IP As String
Dim ResolvedName As String
'Ritorno a capo e avanzamento riga
cr = Chr(13) + Chr(10)
ServerName = "whois.networksolutions.com"
echo("Risoluzione"+cr)
Socket.SetTimeout 5000,5000
ip = socket.DnsLookup(ServerName)
echo(ServerName + " risolve nell’indirizzo IP:"+cr )
echo(ip +cr)
ResolvedName = Socket.ReverseDnsLookup(ip)
echo(cr)
echo("Indirizzo IP "+ip+ " risolve in "+cr)
echo(ResolvedName+cr)
End Function