Domain availability checker

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   hi..
I am doing domain name checker..
Below is the code of tutorial I get from internet.
But the result always return not available...
Who know what is the problems?

Thanks you... 
[code]
<% Dim strURL: strURL = "http://www.7788.com" 
Dim objXMLConn, strResponse

Set objXMLConn = Server.CreateObject("Microsoft.XMLHTTP") 
objXMLConn.Open "get", strURL, False

'| Compensate for errors with this line.
On Error Resume Next
GetConnection.Send

strResponse = objXMLConn.getResponseHeader("Date")

If Not IsEmpty(strResponse) Then
   Response.write(strURL & " is available") 
Else
   Response.write(strURL & " is not available")
End If 

Set objXMLConn = Nothing %>
[code]

Between, to add a domain availability checker to my site is that very hard and required high skill of programming? Because I am fresh in programing, still under training..
Thanks for reply... 