This is an alpha compile of Rodrigo's ActiveX
component for doing DNS and Reverse DNS lookups from Active Server Pages.


This is shareware so if you wish to use it contact Rodrigo for payment options.
Rodrigo's web site is at:
http://www.exactus.com.br/Rodrigo/


Instructions:
Place the util.dll file in a directory that has executable rights. 
A good place is the \InetPub\Scripts directory.

At the command prompt go to the directory where you placed util.dll
and register the component on the server by typing:
    regsvr32 util.dll
If the dll registered correctly you will get a pop-up message.

Useage:
In an active server page:
To get the domain name from the IP address:
<% Set IPADD = Request.ServerVariables ("REMOTE_ADDR")
set utilities = Server.CreateObject("Bamboo.Utilities")
DomainIn = utilities.ReverseDNS(IPADD)
Response.Write "The domain name is: " & DomainIn %>

To get the IP address from the domain name:
<% mydom = "c141.robins.af.mil"
set utilities = Server.CreateObject("Bamboo.Utilities")
DomIP = utilities.DNS(mydom)
Response.Write "<BR>IP for " & mydom & ": " & DomIP
%>
