Below you find a script example on how to do DNS reverse lookups.

'Copyright 2005 by www.aloaha.com
'furhter questions please send to info@aloaha.com or visit our Forum at:
'http://www.aloaha.com/html/portal

'create spf_dns object
Set dns=CreateObject("spf_dns.DNSClass")

'retrieve reverse lookup record
MsgBox dns.PTR_Query("217.160.205.164")

'destroy object
Set dns=nothing

Back to Index