標準で頑張るには裏でWScript.Shell使ってnslookupを実行する、
とかになるのかな?