<% @LANGUAGE=JAVASCRIPT%><%
strDomain = ""+Request.Form("Domain");
if (strDomain=="undefined") {
strDomain="";
}
%>
<HTML>
<HEAD>
<TITLE>Domæne tester</TITLE>
<BODY>
<B>Domæne tester</B>
<FORM ACTION="dnstest.asp" METHOD="POST">
<INPUT TYPE="TEXT" NAME="Domain" SIZE="25" VALUE="<%=strDomain%>">
<INPUT TYPE="SUBMIT" VALUE="-- Test nu --">
</FORM>
<%
if (strDomain!="" && strDomain.indexOf(".")>0) {
strDOM = strDomain.substr(strDomain.indexOf(".")+1,strDomain.length);
doHTTP=false;
switch (strDOM) {
case "dk" : {
doHTTP=true;
strHost = "DK-hostmaster";
strWIhost = "
www.dk-hostmaster.dk:80"strURLGet="
http://www.dk-hostmaster.dk/perl/Whois.pl?query="+strDomain;strMatch = "% No entries found"
break;
}
case "com" :
case "net" :
case "org" :
case "edu" : {
strHost = "Internic";
strWIhost = "rs.internic.net:43";
strMatch = "No match for"
break;
}
default : {
strHost = "RIPE";
strWIhost = "whois.ripe.net:43";
strMatch = "% No entries found"
}
}
noError=true;
w3Sock=Server.CreateObject("socket.tcp");
w3Sock.Host=strWIhost;
if (doHTTP) {
try {
w3Sock.Open();
w3Sock.SendLine("GET "+strURLGet);
w3Sock.WaitForDisconnect();
strText=""+w3Sock.Buffer;
}
catch (e) {
strText=""+e.description;
noError=false;
}
} else {
try {
w3Sock.Open();
w3Sock.SendLine(strDomain);
w3Sock.WaitForDisconnect();
strText=""+w3Sock.Buffer;
}
catch (e) {
strText=""+e.description;
noError=false;
}
}
if (noError) {
if (strText.indexOf("%ERROR")>0) {
Response.Write("Fejl ved lookup");
} else {
if (strText.indexOf(strMatch)>0) {
Response.Write("<b>"+strDomain +"</b> er ledigt");
} else {
Response.Write("<b>"+strDomain +"</b> er optaget");
}
}
} else {
Response.Write("<p>"+strWIhost+"<br>"+strText);
}
// Response.Write("<p>"+strWIhost+"<br>"+strText);
}
%></body>
</html>