Check Domain Name Availability

<% If Len(Request("DomainName")) > 0 Then Set objWhoIs = Server.CreateObject("ASPWhoIs.WhoIs") %> <% Response.Write(objWhoIs.WhoIsHTML(Request("DomainName"))) %> <% End If %>