ASP WhoIs Simple Example

Page Source Code:

<html>
<head>
<title>ASP WhoIs Simple Example</title>
</head>
<body>
<form method="POST" action="Demo3.Asp">
<%
If Len(Request("Domain") > 0 Then
    ' Step 1: Create the object
    set objWhoIs = Server.CreateObject("WhoIs2.WhoIs")
    ' Step 2: Get the response in HTML format for display
    strResponse = objWhoIs.WhoIsHTML(Request("Domain"))
    ' Step 3: Display the results
    Response.Write(strResponse)
End If
%>
<p> </p>
<p>
<b>Domain Name:</b>
<input type="text" name="Domain" size="20">
<input type="submit" value="Lookup" name="Lookup">
</p>
</form>
</body>
</html>