DNSClient Object
Description
This object allows you to perform various DNS lookups.
Methods
ResolveAddress
ResolveName
ResolveNameMulti
Example
Set dc = CreateObject("Toolsack.DNSClient")
MsgBox "1.2.3.4 has the fq name of : " & dc.ResolveAddress("1.2.3.4")
MsgBox "This IP address of the world's greatest web site is : " & dc.ResolveName("www.toolsack.com")
Set sl = dc.ResolveNameMulti("www.microsoft.com")
If sl.Count > 1 Then
MsgBox "Microsoft still uses round robin dns"
Else
MsgBox "Microsoft's web site only has one ip address now"
End If
Samples
Articles
We always want to hear your feedback. Send to feedback@toolsack.com.
© 2000-2001 Toolsack Software Ltd.
