#530 - Whois di domini .it con una pagina ASP

Lo script di oggi effettua una semplice interrogazione al database del NIC italiano per visualizzare le informazioni sull'intestatario di un dominio. Sfrutta XMLHTTP.

<%

dominio = Request("dominio")

if len(dominio) > 0  then

  ' pagina da richiamare
  url = "http://www.nic.it/cgi-bin/WISE/whois.cgi?object=" & dominio

  ' usiamo l'oggetto XMLHTTP
  Set XMLHTTP = Server.CreateObject("Microsoft.XMLHTTP")
  XMLHTTP.open "GET", url, false

  ' inviamo la richiesta
  XMLHTTP.send (strPost)

  ' codice di risposta del server
  status = CInt(XMLHTTP.status)

  ' Se lo stato è 200, è ok
  if status = 200 then
    Response.write (XMLHTTP.responseText)
  else
    Response.write "<P>Errore: " & status
  end if

  set XMLHTTP = Nothing

else

%>
<form method="POST">
Dominio: <input type="text" size="20" name="dominio">
<input type="submit" value="Cerca">
<%
end if
%>


Approfondimenti

Commenti

Esprimi il tuo giudizio su questo script:

Per procedere devi essere autenticato.

Aggiungi un nuovo commento »»»
Per inserire un commento, devi registrarti alla nostra community.




IN EVIDENZA
MISC