[REBOL] Re: refinement for whois protocol
From: ronald:free at: 22-Apr-2002 9:23
Hi none,
Monday, April 22, 2002, 12:56:08 AM, vous avez écrit:
n> Does anyone know how to set the server refinement for the whois scheme?
n> what I want to do is build a view interface so I can do a whois lookup
n> on the
n> name entered. The problem I`m having is specifying the @rs.internic.net
n> when I try to join whois:// + variable [+--rs--internic--net] I get a malformed
n> email address error. Can I do a refinement to pre-specify the whois server
n> resource ?
n> Adrian
n> --
n> Prendi GRATIS l'email universale che... risparmia: http://www.email.it/f
n> Sponsor:
n> Puglia Pocket: le ultime notizie, gratis, sul tuo sito; devi solo prenderlo
n> Clicca qui: http://adv.email.it/cgi-bin/foclick.cgi?mid=314&d=22-4
Try this :
whois: func [
"Retrieves 'whois' information from Network Solutions' server"
domain "Domain to Look Up" [string! word!]
/server
whois-domain "Alternative Whois Server" [string! word!]
][
if not server [whois-domain: 'whois.networksolutions.com]
read join whois:// [domain "@" whois-domain]
]
print whois "rebol.com"
Taken from script called whois.r that could perharps
help you (view/desktop/sites/Automation/whois.r from Christopher Ross-Gill)
--
Best regards,
Ronald