 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
这里主要介绍如何用该组件WHOIS域名，目前网上很多域名查询系统都是通过XMLHTTP获得其他网页数据，而获得记录。其实，我们完全可以通过w3Sockets自己来实现WHOIS的功能。 程序代码如下： <% @ LANGUAGE=VBScript %> <% Dim Domain,socket Domain = "knowsky" ‘这里以knowsky为例 Set socket = Server.CreateObject( "Socket.TCP" ) \\\'建立socket对象 function whois( Domain, Server ) socket.Host = Server + ":43" \\\'设置主机地址 socket.Open() ’打开 socket.SendLine( Domain ) ‘传递变量 socket.WaitForDisconnect() Response.Write( "<blockquote><pre>" + socket.Buffer + "</pre></blockquote>" ) ’获得内容 socket.Close() ‘关闭 End Function %> <html> <body bgcolor="#FFFFFF" text="#000010" link="#0000C0" vlink="#000040" alink="#000040"> <%Call whois( DomainName + ".com", "rs.internic.net" ) %> <%Call whois( DomainName + ".net", "rs.internic.net" ) %> <%Call whois( DomainName + ".org", "rs.internic.net" ) %> </body> </html> 返回类别: 教程 上一教程: DATAGRID表头跨行合并的实现 下一教程: 对一篇很长的文章做到完美的分页输出 您可以阅读与"使用W3SOCKETS组件实现域名查询功能"相关的教程: · ASP查询XML的代码，实现了无刷新、模糊查询功能 · 不用组件实现上载功能(2) · 使用XMLHTTP制作域名查询系统 · 使用XMLHTTP为网站增加股市行情查询功能 · 不用组件实现上载功能(1) |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
