Domain Checker

Hi All

I have a signup process which I have done ASP, I wanted to do a domain availability check in during the sign up process, I found a code that pings URL on the internet and adapted it so that it fitted within my code, its below

################################################

function isDomainAvailable(strDomainName, strDomainExt)

            isDomainAvailable = false

            url = "www." & strDomainName & strDomainExt

    Set objWShell = CreateObject("WScript.Shell")

    Set objCmd = objWShell.Exec("ping " & url)

                        strPResult = objCmd.StdOut.Readall()

    set objCmd = nothing: Set objWShell = nothing

    if InStr(strPResult,"TTL=") > 0 then

                        errMsg = "'" & url & "' is already taken and not available"

                        isDomainAvailable = true

            else

                        errMsg = "'" & url & "' may still be available"

                        isDomainAvailable = false

            end if

end function

#################################################

When I run it on my local machine it all works fine, but when I uploaded it to the remote server on GODADDY (IIS 6.0) where I am hosting my site it gives this error
####################

WshShell.Exec error '80070005'

Access is denied.

The system cannot locate the resource specified.