Input Address to Lookup

<% Set DNSLook = Server.CreateObject("AspDNS.Lookup") strRes = DNSLook.DNSLookup ("mailhost.onramp.net") Response.Write ("The IP Address of mailhost.onramp.net is " & strRes & "") %>