DnsLookup
DnsLookup はホスト名を IP アドレスに解決するために使用します。 この関数は、多くの場合、サーバーへの接続を試みるものの、その IPがわからない場合に使用されます。
構文
DnsLookup(hostname)
戻り値
String (IP アドレス).
例
非常に単純な DNSホスト名の IP 番号への変換を可能にして他のドメイン関連の情報を提供する TCP/IP ネットワークによって使用されるデータベース。 ルックアップとリバース ルックアップ:
Function Main
Dim SocketObject As Object
Dim ServerName As String
Dim IP As String
Dim ResolvedName As String
' キャリッジ リターンとライン フィード
cr = Chr(13) + Chr(10)
ServerName = "whois.networksolutions.com"
echo("Resolving"+cr)
Socket.SetTimeout 5000,5000
ip = socket.DnsLookup(ServerName)
echo(ServerName + " resolves to the IP Address:"+cr )
echo(ip +cr)
ResolvedName = Socket.ReverseDnsLookup(ip)
echo(cr)
echo("IP Address "+ip+ " resolves to "+cr)
echo(ResolvedName+cr)
End Function