域名登记查询(whois)很复杂吗--方法一

swyswyg

swyswyg

2016-01-29 18:14

域名登记查询(whois)很复杂吗--方法一,域名登记查询(whois)很复杂吗--方法一
  jjx原创,转载必须注明出处
要复制代码,请使用论坛的“复制“功能完成
chinaasp的域名查询要卖1000元,网友提了意见,却被吕科一句(你把他封装成组件试试?)给挡了回去。域名登记查询(whois)真的很复杂吗?

域名登记查询主要是通过whois服务器来完成的,当前比较常用的是rs.internic.net,通过它可以查询各种国际域名是否注册。whois的端口通常是43。利用winsock,你可以在asp简单的实现这个功能
asp不同于php/jsp,winsock功能并不内置,所以必须借助第三方的winsock组件。
这里的举例使用了serverobjects的aspsock,代码的注释比较详细,大家可以举一翻三
aspsock不是免费的,需要$49,如果需要免费的大家可以自己封装vb6中的winsock控件
或从这个地址下载免费的
Xceed Winsock Library v1.1
ftp://ftp.xceedsoft.com/pub/xceedwsl.exe
该组件的主页是
http://www.xceedsoft.com/

whois.asp
-------------------------------------------
<%@ Language=VBScript %
<HTML
<HEAD
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0"
</HEAD
<BODY
<form action=whois.asp method=post
域名:www<B.</B <INPUT size=8 name=domainname value="<% =request("domainname") %". <SELECT name=ext <OPTION
selectedcom</OPTION <OPTIONnet</OPTION <OPTIONorg</OPTION
</SELECT
<INPUT class=input1 type=submit value=域名查询 name=Submit
                </form
                
<%
dim strResult
if Request.ServerVariables("request_method")="POST" THEN
dim strQuery
'取得需要查询的域名
strQuery=request("domainname") & "." & request("ext")

dim objSock
'创建sock对象
Set objSock=Server.CreateObject("Aspsock.conn")
'设置whois服务器为rs.internic.net
objSock.RemoteHost="rs.internic.net"
'设置whois服务器端口为43
objSock.Port=43
'设置操作的超时为60秒
objSock.TimeOut=60
'打开与remotehost的连接,返回真为成功
if objSock.Open then
'发出查询 WriteLn表示用vbCrlf终结(strQuery & vbCRlf)
objSock.WriteLn strQuery
'读取返回值,最大长度为65535
strResult=objSock.ReadBytesAsString(65535)
'关闭连接
objSock.Close
'打印查询结果,你可以需要对此作些处理
Response.Write "<b查询结果</b<br<textarea rows=10 cols=60" & strResult & "</textarea"
end if
Set objSock=Nothing

end if
%

</BODY
</HTML

利用winsock可以完成许多asp不太可能完成的事情,比方像网易一样真正无刷新的聊天室,大家仔细研究研究吧

 
展开更多 50%)
分享

猜你喜欢

域名登记查询(whois)很复杂吗--方法一

ASP
域名登记查询(whois)很复杂吗--方法一

域名登记查询(whois)很复杂吗--方法二

ASP
域名登记查询(whois)很复杂吗--方法二

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

用ASP解决域名登记查询

ASP
用ASP解决域名登记查询

多个域名后缀同时查询的域名查询系统

ASP
多个域名后缀同时查询的域名查询系统

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

有好米域名批量查询好用吗

电脑网络
有好米域名批量查询好用吗

一个域名查询的程序

PHP
一个域名查询的程序

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

《最终幻想 零式HD》高效刷级做任务方法攻略

《最终幻想 零式HD》高效刷级做任务方法攻略

合理使用Win XP硬件配置文件

合理使用Win XP硬件配置文件
下拉加载更多内容 ↓