Entwickler-Ecke
Internet / Netzwerk - <<INDY-Problem>> Abfrage mit IDWhois
Master Joko - Sa 20.11.04 20:50
Titel: <<INDY-Problem>> Abfrage mit IDWhois
hallo df-user,
ich habe hier euer forum im internetbereuch komplett nach meinem problem durchsucht, und bin leider nicht fündig geworden.
anscheinend ist die indy komponente entweder total simpel, das ich es mir schon wieder schwer mache, oder es brauchte dazu noch nie einer eine hilfestellung.
mein problem ist, das ich mich zwar auf einen ftp connecten kann, die verzeichnisliste kann ich aich einlesen, doch wenn ich jedoch eine whois-abfrage machen möchte, dann stürzt mein proggie ab...
auch die indy-hilfe, also das bsp.-prog zur whois-abfrage funzt auch nicht richtig.
egal, welche ip ich eingebe, es erscheint keine vernünftige angabe.
hier mal ein stückchen code, von meiner whoisabfrage:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
| procedure TForm1.ftp_buttonClick(Sender: TObject);
var idftp:Tidftp;
begin
idftp:=TIdftp.Create(Self);
idftp.Username:= user.Text;
idftp.Password:= pass.Text;
idftp.Port:=StrToInt(port.Text);
idftp.Host:= ip.Text;
if passive.Checked = true then
idftp.Passive := True;
if passive.Checked = false then
idftp.Passive := false;
try
Idftp.Connect();
Idftp.ChangeDir (path.Text);
begin
FTP_Inhalt:=TStringList.Create;
with Form1 do
begin
ListBox1.items.Clear;
Idftp.Size('*.*');
IdFTP.List(FTP_Inhalt);
ListBox1.Items.Assign(FTP_Inhalt);
IdFTP1.Disconnect;
with IdWhois1 do begin
Host := whois.text;
listbox1.Lines.Text := whois(trim(edtDomainToCheck.text));
selbst
if connected then disconnect;
end;
end;
end;
except
showmessage('überprüfe Angaben!!!');
end;
end; |
kann mir da einer weiterhelfen ?
hab schon std.lang nach der indy-komponente idwhois gegoogelt, aber nix gefunden, und die indy hilfe selbst - damit komme ich einfach net klar...
wäre für hilfe sehr dankbar...
greetz Joko
Moderiert von 
UGrohne: Code- durch Delphi-Tags ersetzt.
inselberg - Di 23.11.04 12:24
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
| procedure TForm1.Button1Click(Sender: TObject);
begin
idWhois1.Host := edit1.Text;
memo1.lines.add(idWhois1.WhoIs(edit1.Text));
end;
procedure TForm1.IdWhois1Status(ASender: TObject; const AStatus: TIdStatus;
const AStatusText: String);
begin
memo1.Lines.add(AStatusText);
end; |
das ist mein code ... läuft ("verbindung abgelehnt") also wo ist dein problem?
versuch es mal ohne ftp ... dann sehn ma weita ;)
*Two Timing Touch And Broken Bones*
Master Joko - So 28.11.04 13:08
hallo,
danke für die antwort, und deine hilfestellung, aber mein problem ist, das er zwar connected (also mit whois) aber es erscheint eine antwort, die nicht das ist, was ich haben möchte:
Quelltext
1:
2:
3:
4:
5:
6:
7:
| Whois Server Version 1.3
Domain names in the .com and .net domains can now be registered
with many different competing registrars. Go to http://www.internic.net
for detailed information.
No match for "WHOIS.INTERNIC.NET". |
diese antwort erscheint bei allen whois-abfragen, die ich gemacht habe.
benutze ich jedoch das programm smartwhois, dann erhalte ich als antwort für z.b. den mail anbieter web.de folgendes:
Quelltext
1:
2:
3:
4:
| WEB.DE AG
Amalienbadstrasse 41
D-76227 Karlsruhe
Germany |
genauso wollte ich auch meine ausgabe bekommen, was allerdings nicht klappt.
egal, welche whois-abfrage ich starte, bekomme ich als antwort no match found...
also muss ich mir vorstellen, das es da etwa besonderheiten bei der abfrage gibt ??
oder kennt jmd. evtl. ein gutes buch, das das thema "indy" besonders gut behandelt?
greetz Joko
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!