澳门二十一点游戏赌场 澳门二十一点游戏赌场
    您现在的位置:首页 >> 软件应用 >> ASP教程 >> 内容

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

    时间:2012/7/23 20:43:39 点击:

      核心提示:jjx原创,转载必须注明出处要复制代码,请使用论坛的“复制“功能完成chinaasp的域名查询要卖1000元,网友提了意见,却被吕科一句(你把他封装成组件试试?)给挡了回去。域名登记查询(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 %>






    域名:www. ">.



    <%
    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 "查询结果
    "
    end if
    Set objSock=Nothing

    end if
    %>




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

    作者:佚名 来源:不详

    共有评论 0相关评论
    发表我的评论
    • 大名:
    • 内容:
  • 澳门二十一点游戏赌场(www.0769online.com) © 2018 版权所有 All Rights Reserved. 邮箱:103150@qq.com 业务QQ:103150 手机:13549753683

    Power By Laoy8 SQL 3.0SP1 粤ICP备10098668号
  •