|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
ASP是依赖组件的,能访问数据库的组件好多就有好多种,再有就是你微软的工具可是什么都要收钱的啊!查询体系|域名查询1、道理:
道理十分复杂,域名的查询次要是基于RFC954供应的WHOIS协定。在完成过程当中,我们经由过程本人的WEB服务器会见NIC站点的WHOIS数据库服务器,从WHOIS数据库中查询我们所必要的内容,然后经由过程ASP组分解网页回送给客户端。
同时,我们利用xmlHttp协定完成客户端网页无革新效果和向服务端提出检索WHOIS数据的请求。
详细流程为:客户端经由过程xmlhttp提出域名查询请求-->WEB服务器中的ASP侦听页承受哀求后利用xmlhttp向WHOIS服务器发送检索命令-->WHOIS数据库实行查询操纵,前往了局给我们本人的WEB服务器(html情势)-->WEB服务器吸收到内容后,当即将了局传送给客户端->客户端扫瞄器利用vbscript过滤失落HTML过剩部分,选择出whois数据显现出来。
2、ASPXmlHttp编程简述:
1、客户端html页面:
<scriptlanguage="vbscript">
Subsubmit1_onmouseup当点击“查询”按钮时触发;
DimobjXML,objXSL,objFSO,strFile,strFileName,strXSL,strURL,TheForm
SetTheForm=Document.wordfind
window.status="正在检索数据・・・"
strURL="dns.asp"
SetobjXML=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.sendstra发送信息
xmlGet=objXML.responseText稍等半晌后,失掉服务器端传返来的了局;
ifinstr(1,xmlGet,"Thisisnotavalid.com.net.org.infoor.bizdomain name",1)<1andlen(trim(xmlGet))>100then
ifinstr(1,xmlGet,"Thisdomainisavailable",1)<1then
ifinstr(1,xmlGet,"Registrant:",1)then
strFind1=instr(1,xmlGet,"Registrant:",1)
else
strFind1=instr(1,xmlGet,"<pre><FONTface=""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="查询了局:该域名仍旧处于可用形态!"
endif
else
TheForm.comments.value="有效的国际顶级域名!请输出以(.com.net.org.infoor.biz)开头的国际域名,比方sun.com"
window.status="有效的国际顶级域名!请输出以(.com.net.org.infoor.biz)开头的国际域名,比方CCTV.com"
endif
SetobjXML=Nothing
endsub
</script>
<html><head><title>XMLHTTP之域名查询篇</title></head>
<bodybgColor=#cccca3>
<formmethod="post"name=wordfind>
请输出域名称号:<inputtype="text"value="cctv.com"name="words"size="69">
<inputtype="submit"value="查询"id=Submit1name=Submit1>
<TEXTAREAname=commentsreadonlyrows=10cols=76></TEXTAREA>
</form></body></html>
2、服务器端ASP程序:
<%dimxmlGet,objXML,objXSL,objFSO,strFile,strFileName,strXSL,strURL
xmlGet=""
iflen(trim(Request.form("fqdn")))>1then
strURL="http://www.domainbank.net/whoisresults_gen.cfm?show=1"
WhoIS服务器的地点
SetobjXML=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.sendstra发送信息到WhoIs数据库服务器;
xmlGet=objXML.responseText获得域名服务器前往的信息
SetobjXML=Nothing
endif
response.writexmlGet前往了局给客户端
%>
在上述过程当中,能够发明我们本人的WEB服务器中的ASP程序实在只起到一其中间传送的感化,在实践使用中,也能够省往这其中间层,利用vbscript经由过程xmlhttp间接向WHOIS数据库发送和吸收数据。不外如许的话,大概会由于IE中“经由过程(别的)域会见数据资本”被禁用(默许)而引发权限不敷招致没法实行,以是该省往ASP两头层的办法其实不太通用。
本程序在基于Windows2000平台的IIS5.0和IE6.0上运转经由过程。实践利用过程当中,能够把上述代码拷贝到本人网页中,经由复杂的页面编纂,便可在本人的网页中增添在页面无革新情形下的域名查询功效了,初看上往,还真的有点象专业的域名注册服务商网站供应的服务了。
asp可以轻松地实现对页面内容的动态控制,根据不同的浏览者,显示不同的页面内容。而浏览者一点觉察不出来,就像为他专门制作的页面一样。使用各种各样的组件,asp可以完成无比强大的功能。 |
|