--------------------------------------------------------------------------------
Hallo, wer ist mit den Prinzipen DNS bekannt?
Ich hab ein kleines Problemchen, ich brauche fest zu stellen ob es eine gegebene e-mail Adresse giebt.
Dafür bekomme ich eine IP-Adresse des Mail-Servers vom dem e-Mail, das tue ich so:
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13:
| dns := TIdDNSResolver.Create(nil); dns.AllowRecursiveQueries := True; dns.Host := DNSServer; dns.QueryRecords := [qtMX]; dns.ReceiveTimeout := 20000; dns.Resolve(sDomain); for i := 0 to dns.QueryResult.Count-1 do if (dns.QueryResult[i].RecType = qtMX) then begin sDomain := TMXRecord(dns.QueryResult[i]).ExchangeServer; bFound := True; break; end; |
Danach (wenn ein MailServer gefunden ist) frage ich bei dem Server nach Existenz der User, aber es ist weniger interresant.
Das Problemm ist da ich gar nicht wies was ich als Host für DNS-Server nehmen soll. Ich habe einige IP's in Internet ausgesucht, aber dort werden nur einige MailServer gefunden.
Giebt es uberchaut so ein DNS Server wo man Internet Adressen die IP's kriegen kann?
Moderiert von
matze: Delphi-Tags hinzugefügt