【w3Sockets是写著名JMAIL邮件...... w3Sockets是写著名JMAIL邮件组件开发者开发的又一免费实用的ASP组件。 需要下载的朋友可以在这里下载:http://www.dimac.net/FreeDownloads/dlstart.asp?ProductID=2 下载后解压,运行SocketReg.exe注册组件。 这里主要介绍如何用该组件WHOIS域名,目前网上很多域名查询系统都是通过XMLHTTP获得其他网页数据,而获得记录。其实,我们完全可以通过w3Sockets自己来实现WHOIS的功能。 程序代码如下: <% @ LANGUAGE=VBScript %> <% Dim Domain,socket Domain = "im286" ‘这里以im286为例 Set socket = Server.CreateObject( "Socket.TCP" ) '建立socket对象 function whois( Domain, Server ) socket.Host = Server + ":43" '设置主机 socket.Open() ’打开 socket.SendLine( Domain ) ‘传递变量 socket.WaitForDisconnect() Response.Write( " " ) ’获得内容" + socket.Buffer + " socket.Close() ‘关闭 End Function %> ===================================== <%Call whois( DomainName + ".com", "rs.internic.net" ) %> <%Call whois( DomainName + ".net", "rs.internic.net" ) %> <%Call whois( DomainName + ".org", "rs.internic.net" ) %> 程序演示:http://pay.91dm.com/whois.asp |
|小黑屋|最新主题|手机版|微赢网络技术论坛 ( 苏ICP备08020429号 )
GMT+8, 2024-9-29 21:22 , Processed in 0.219436 second(s), 12 queries , Gzip On, MemCache On.
Powered by Discuz! X3.5
© 2001-2023 Discuz! Team.