Wenn wir die Erstellung einer Website vorbereiten, müssen wir einen Internet-Domainnamen bei der Domainnamen-Registrierungsagentur beantragen. Daher möchten wir normalerweise wissen, ob der Domainname, den wir verwenden möchten, registriert wurde. Wir können die NIC-Website www.nic.net besuchen, auf den „whois“-Link klicken und den Domainnamen eingeben, den Sie abfragen möchten: Wir können die Ergebnisse erhalten, die wir benötigen.
Der WHOIS-Server gibt alle Whois-Daten für die internationalen Top-Level-Domainnamen .com, .net und .org zurück, einschließlich der Website Domainnamen-Registranten, Verwaltungsvertrag, Kontaktinformationen (Telefon, Telefonnummer, E-Mail, Adresse), Rechnungskontakt, technischer Support und Domainnamenserverinformationen sind für Benutzer normalerweise sehr hilfreich, um die Grundsituation einer Website zu verstehen verfügen über erweiterte Whois-Dienste (Domainnamenabfrage), aber persönliche Websites können unter allgemeinen Bedingungen keine Whois-Dienste anbieten, da sie nicht über die Qualifikationen und Daten von Domainnamen-Registraren verfügen. Jeder von uns kann es in seinem eigenen persönlichen Website-Abfragedienst (WHOIS) bereitstellen. In diesem Artikel wird beschrieben, wie Sie ASP in Kombination mit der XMLhttp--Programmierung
verwenden, um diese Funktion zu implementieren Das Prinzip ist sehr einfach: Die Abfrage basiert hauptsächlich auf dem WHOIS-Protokoll, das von RFC 954 bereitgestellt wird. Während des Implementierungsprozesses greifen wir über unser eigenes WEB auf den WHOIS-Datenbankserver der NIC-Site zu Server, fragen Sie den von uns benötigten Inhalt aus der WHOIS-Datenbank ab, kombinieren Sie ihn dann zu einer Webseite und senden Sie ihn über den ASP-Client zurück. Aktualisieren Sie die Client-Webseite und stellen Sie eine Anfrage an den Server, um WHOIS-Daten abzurufen. Der spezifische Prozess ist: Der Client sendet eine Domänennamenabfrage über xmlhttp-Anforderungen Der WEB-Server akzeptiert die Anfrage und verwendet xmlhttp, um den Abrufbefehl an den WHOIS-Server zu senden -> Die WHOIS-Datenbank führt Abfragevorgänge durch und gibt die Ergebnisse an unseren eigenen WEB-Server zurück (HTML-Form) -> Der WEB-Server empfängt Nach Erhalt des Inhalts die Das Ergebnis wird sofort an den Client gesendet -> Der Client-Browser verwendet VBScript, um das überschüssige HTML herauszufiltern und die anzuzeigenden Whois-Daten auszuwählen 2. Kurze Beschreibung der ASP XmlHttp-Programmierung: 1 . Client-HTML-Seite:2. Serverseitiges ASP-Programm:
Im obigen Prozess finden Sie das ASP-Programm tatsächlich auf unserem eigenen WEB-Server. In praktischen Anwendungen kann diese mittlere Schicht auch weggelassen werden, und vbscript kann zum direkten Senden und Empfangen von Daten an die WHOIS-Datenbank über xmlhttp verwendet werden. In diesem Fall kann es jedoch daran liegen, dass „Zugriff auf Datenressourcen über (<script language="vbscript"> Sub submit1_onmouseup '当点击“查询”按钮时触发; Dim objXML, objXSL, objFSO,strFile, strFileName, strXSL,strURL,TheForm Set TheForm = Document.wordfind window.status="正在检索数据···" strURL="dns.asp" Set objXML = CreateObject("Microsoft.XMLHTTP") '创建MS的XMLHTTP组件; stra = "submit=submit&fqdn="&TheForm.words.value objXML.Open "post",strURL,false '采用Post提交方式; objXML.setrequestheader "content-length",len(stra) objXML.setrequestheader "content-type","application/x-www-form-urlencoded" objXML.send stra ' 发送信息 xmlGet = objXML.responseText '稍等片刻后,得到服务器端传回来的结果; if instr(1,xmlGet,"This is not a valid .com .net .org .info or .biz domain name",1)<1 and len(trim(xmlGet))>100 then if instr(1,xmlGet,"This domain is available",1)<1 then if instr(1,xmlGet,"Registrant:",1) then strFind1 =instr(1,xmlGet,"Registrant:",1) else strFind1 = instr(1,xmlGet,"<pre><FONT face=""Verdana, Arial",1)+65 strFind2 = instr(1,xmlGet,"</FONT></pre>",1) strFind4=strFind2-strFind1 sHTML = mid(xmlGet,strFind1,strFind4) TheForm.comments.value="查询结果:"+chr(13)+chr(10)+sHTML window.status="查询结果:该域名已被占用" else TheForm.comments.value="恭喜你,此域名可用!" window.status="查询结果:该域名仍然处于可用状态!" end if else TheForm.comments.value= "无效的国际顶级域名!请输入以(.com .net .org .info or .biz)结尾的国际域名, 例如sun.com" window.status="无效的国际顶级域名!请输入以(.com .net .org .info or .biz)结尾的国际域名, 例如CCTV.com" end if Set objXML = Nothing end sub </script> <html><head><title>XMLHTTP之域名查询篇</title></head> <body bgColor=#cccca3> <form method="post" name=wordfind onsubmit="javascript:return false"> 请输入域名名称:<input type="text" value="cctv.com" name="words" size="69"> <input type="submit" value="查询" id=Submit1 name=Submit1> <TEXTAREA name=comments readonly rows=10 cols=76></TEXTAREA> </form></body></html>
) Domänen“ im IE (standardmäßig) deaktiviert ist, was zu unzureichenden Berechtigungen und der Unmöglichkeit der Ausführung führt, weshalb die Methode weggelassen wird Die ASP-Mittelschicht ist nicht sehr praktisch.
<%dim xmlGet,objXML, objXSL, objFSO,strFile, strFileName, strXSL,strURL xmlGet="" if len(trim(Request.form("fqdn"))) > 1 then strURL="http://www.domainbank.net/whoisresults_gen.cfm?show=1" 'WhoIS服务器的地址 Set objXML = CreateObject("Microsoft.XMLHTTP") '创建MS的XMLHTTP组件 stra = "submit=submit&fqdn="&trim(Request.form("fqdn")) objXML.Open "post",strURL,false objXML.setrequestheader "content-length",len(stra) objXML.setrequestheader "content-type","application/x-www-form-urlencoded" objXML.send stra ' 发送信息到WhoIs数据库服务器; xmlGet = objXML.responseText ' 取得域名服务器返回的信息 Set objXML = Nothing end if response.write xmlGet '返回结果给客户端 %>
Das obige ist der detaillierte Inhalt vonBeispielcode-Freigabe für die Verwendung von xmlhttp zum Hinzufügen einer Domainnamen-Abfragefunktion zur Website. Für weitere Informationen folgen Sie bitte anderen verwandten Artikeln auf der PHP chinesischen Website!