DNS Server in Windows eintragen

[kingflo]

Hallo ich möchte gerne mit meinem Programm die DNS-Serveraddresse in den TCPIP Eigenschaften eintragen lassen.

Bei meinem Rechner bekomme ich das auch folgendermaßen hin:

Delphi-Quellcode:

var reg:TRegistry;

    ergebnis:string;
    newValue:String;
begin
  newValue:='145.253.2.171';
  reg:=TRegistry.Create;
  reg.RootKey:=HKEY_LOCAL_MACHINE;
  reg.OpenKey( '\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\{016E2DD2-BF67-4CEE-976F-7354D79F3B60}', False); //Schlüssel öffnen
  ergebnis:= reg.ReadString('NameServer'); //Wert auslesen
  reg.WriteString('NameServer',newValue);
  reg.Free; //Freigeben
  ShowMessage('Von '+ergebnis+' geändert in '+newValue);

Allerdings funktioniert diese Methode nur bei meinem Rechner, wegen der GUID {016E2DD2-BF67-4CEE-976F-7354D79F3B60}, die ja bei jedem Rechner an der stelle anders ist. Diese bekomme ich auch leider nicht raus. Jetzt wollte ich mal fragen, ob vielleicht jemand ne andere Möglichkeit kennt, und mir vielleicht helfen kann.

[soulies]

hoi,

nur als idee ...

[Idee]
falls dir die Ip adresse bekannt ist - könntest du diese in den schlüsseln vergleichen ...

wenn nicht dann nützt dir vllt. ein Vergleich der guid's und du suchts die, in der der wert der

ip adresse <> 0.0.0.0 ist ...
[/Idee]


cya

[kingflo]

ja die Adresse ist leider nicht bekannt, (soll ja nur gesetzt werden) und wenn derjenige keine DNS-Serveradresse benutzt, kann ich auch nicht nach <> 0.0.0.0 bz <> '' gucken, da der key NameServer dann gar nicht erst existiert.
Ausserdem ist der key NameServer ja ein Schlüssel (mit oder ohne Wert egal) der zu dem ordner {016E2DD2-BF67-4CEE-976F-7354D79F3B60} gehört. Und den schlüssel NameServer gibt es dummerweise ziemlich oft. Ich brauche aber den, der unter \SYSTEM\CurrentControlSet\Services\Tcpip\Parameter s\Interfaces\{GUID_UNBEKANNT} steht d.H... ich hab keine Ahnung *g*

das dumme bei mir z.B habe ich unter dem Pfad \SYSTEM\CurrentControlSet\Services\Tcpip\Parameter s\Interfaces noch 5 ordner (alle mit einer GUID benannt) wovon in 3 orndern der kay NameServer existirert ich in meinem Falle brauchte nur {016E2DD2-BF67-4CEE-976F-7354D79F3B60} (hab 111.111.111.111 mit windows TCPIP Eigenschaften eingetragen, und nach der IP gesucht).

[kingflo]

also es gäbe natürlich die Möglichkeit mit reg.getKeyNames alle Ordner zu ermitteln, und für jeden den NameServer zu setzen, das finde ich aber mist und unschön, deshalb hoffe ich einfach, dass jemand ne bessere sauberere Lösung kennt

[soulies]

hoi,

Zitat:

wenn derjenige keine DNS-Serveradresse benutzt, kann ich auch nicht nach <> 0.0.0.0 bz <> '' gucken, da der key NameServer dann gar nicht erst existiert.

warum nicht - was hat der key Nameserver mit IP adresse zu tun ?

Zitat:

\SYSTEM\CurrentControlSet\Services\Tcpip\Parameter s\Interfaces noch 5 ordner

du hast '5 Ordner' also 5 Guid's ...

ich behaupte mal einfach in allen Ordner gibt es den Key IP Adresse [bei mir ist es so]
in 4 Ordner davon ist diese 0.0.0.0 und nur in einem <> 0.0.0.0

wenn du diesen gefunden hast - hast du autom. deine Guid und kannst den Nameserver setzen ...

so dachte ich könnte es gehn ...



cya

[kingflo]

Zitat:

Zitat von soulies

hoi,

Zitat:

wenn derjenige keine DNS-Serveradresse benutzt, kann ich auch nicht nach <> 0.0.0.0 bz <> '' gucken, da der key NameServer dann gar nicht erst existiert.

warum nicht - was hat der key Nameserver mit IP adresse zu tun ?

Naja weil der DNS eintrag nicht in dem key IP adresse sondern im Key NameServer gespeichert wird.

[kingflo]

Jetzt habe ich aber noch ein Problem: mein Tool kann es jetzt zwar ändern, und wenn ich in Windows in die TCPIP Eigenschaften reingucke, steht da auch folgende DNS Adresse verwenden und dann meine Adresse, er benutzt sie aber nicht, denn wenn ich z.B die adresse 123.123.123.123 in Windows in den igenschaften eingebe, kann ich z.B danach keine Seiten mehr aufrufen (ist ja auch ok und richtig) wenn ich es aber mit meinem Tool mache, steht es zwar in den Eigenschaften von TCPIP mit 123.123.123.123 ich kann aber immer noch surfen usw, und dass kann ja nicht richtig sein.

Kann / bzw muss ich da irgendwas aktualisieren oder so?...

[soulies]

hoi,

Zitat:

Naja weil der DNS eintrag nicht in dem key IP adresse sondern im Key NameServer gespeichert wird.

alles richtig was du sagst ...

du sollst den Wert des Keys IPAddress auch nur vergleichen um an die gesuchte Guid ranzukommen ....

das du dann den nameserver in dem jeweiligen Key setzen musst ist klar ...


cya

[soulies]

Zitat:

Kann / bzw muss ich da irgendwas aktualisieren oder so?...

du bestimmt noch mit SendMessage ne Botschaft an Windows senden ...
aber welche ???? [frag mich net]



cya

[kingflo]

hab leider nichts gefunden *heul* weiß jemand vielleicht, wie ich dafür sorge, dass die Lan Verbindung, oder/und die Netzwerk/Lan Einstellungen Aktualisiert werden?

[kingflo]

mm schade ich habe immer noch nichts gefunden, mit dem es funktioniert :wall:

[soulies]

hi kingflo,

hast du bis dato schon ne lösung ?

wenn nicht - versuch mal

Delphi-Quellcode:

SendMessage(HWND_BROADCAST, WM_SETTINGCHANGE ,0 ,0);

ich bin gespannt ...


cya

[kingflo]

scheint leider auch nicht zu funktionieren, obwohl er auf jeden Fall etwas gemacht hat, denn es hat länger gedauert. Ich poste mal das Projekt, falls jemand sein Glück versuchen will! Aber achtung, aktuell wird auch die registry gesetzt, obwolh ich auch ne möglichkeit eingebaut habe es mit nem cmd zu machen, wollte sicher gehen *g*, weiß das ist nicht gut, werde es auch ändern, aber vorher such ich die Lösung zum neu laden/aktualisieren.

[kingflo]

Zeil des ganzen ist es eigentlich, vom Provider gesperrte Webseiten aufrufen zu können. z.B ist in der Türkei bwin.com gesperrt, aber auf http://www.bwintr.com it z.B ein Tool erhältlich, welches es für die türken ermöglicht bwin.com trotzdem aufzurufen, und so etwas möchte ich auch machen, und dachte daher an das setzen des DNS Servers, hat vielleicht jemand ne andere idee?

[stifflersmom]

Vor nicht allzu langer Zeit gab es bei der ct mal ein
Skript zum automatisierten Einstellen der Netzwerkparameter (ip-adresse, default-route...)
vielleicht siehst Du Dir das mal an und orientierst Dich daran.

Moin

[kingflo]

mach ich gerne, hast du zufällig nen link oder so?

[DasZiesel]

hi,

warum löst du die ganze Gesichte nicht einfach über WMI?

[kingflo]

WMI, hatte ich gar nicht dran gedacht, und auch ehrlich gesagt noch nie benutzt, aber danke für den tipp, werde mich da mal schlau lesen und gucken, was ich machen kann, danke auf jeden Fall für den Vorschlag

[stifflersmom]

Zitat:

Zitat von kingflo

mach ich gerne, hast du zufällig nen link oder so?

Link nicht, aber das Tool...

Moin

[kingflo]

danke dir... :dp: