1 2 3 4 5 6 7 8 9 下一页
源码是老外的,俺做了点修改,写成了dll方法:
Public Function GetDNSinfo() As String
获取dns信息
Public Function MX_Query(DNS_Addr As String, ByVal Domain_Addr As String) As String
获取mx最佳记录,
dns_addr,域名解析服务器,可以用getdnsinfo获取,也可以用nslookup命令
domain_addr,想要获取邮件服务器的域名,如163.com ,hotmail.com
http://www.ASPcdrom.com/down/mxquery.rar
VERSION 1.0 CLASS
BEGIN
MultiUse = -1 'True
Persistable = 0 'NotPersistable
DataBindingBehavior = 0 'VBNone
DataSourceBehavior = 0 'vbNone
MTSTransactionMode = 0 'NotAnMTSObject
END
Attribute VB_Name = "mxquery"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = True
Option Explicit
Private WithEvents objWinSock As MSWinsockLib.Winsock
Attribute objWinSock.VB_VarHelpID = -1
Private Const ERROR_BUFFER_OVERFLOW = 111
上一篇: VB超频快餐,让我一次用个够!(一)
下一篇: VB超频快餐,让我一次用个够!(二)
1 2 3 4 5 6 7 8 9 下一页
文章整理:西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!




