Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

DNS-Serveradresse automatisch beziehen mit VBS

Mitglied: DerDieFrageHat

DerDieFrageHat (Level 1) - Jetzt verbinden

21.06.2005, aktualisiert 21.05.2007, 12587 Aufrufe, 8 Kommentare

Hallo

Ich habe mit Hilfe mehrerer Quellen (da ich davon eigentlich überhaupt keine Ahnung habe) eine VBS erstellt um einem Computer eine fixe IP, einen Standard-Gateway und einen DNS-Server zuzuweisen.

Das Ganze brauche ich um einem Laptop von zuhause einen Zugang zum Firmen-Server zu ermöglichen. Zuhause steht ein Router des Providers der nur auf einer bestimmten Adresse diese Vebindung zulässt, stelle ich sie mit dem Script richtig ein.


Danach sollen die IP-Adresse und der DNS-Server wieder automatisch zugewiesen werden.
Das mit der Ip-Adresse geht soweit nur habe ich bis jetzt nichts gefunden was dazu führt, dass der DNS-Server wieder automatisch bezogen wird.

Bis jetzt schaut das Script so aus:

On Error Resume Next

strComputer = "."
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colNicConfigs = objWMIService.ExecQuery _
("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True")

For Each objNicConfig In colNicConfigs
If Not objNicConfig.DHCPEnabled Then
intReturn = objNicConfig.EnableDHCP
End If
Next


Danke im voraus
Peter
Mitglied: alesio
21.06.2005 um 16:38 Uhr
Dein script aktiviert dhcp (aut. ip!). Wenn ich richtig verstehe, willst du das gegenteil, also:

If objNicConfig.DHCPEnabled Then
intReturn = objNicConfig.DisableDHCP
End If

...oder ist das zum reaktivieren von dhcp?
Bitte warten ..
Mitglied: DerDieFrageHat
22.06.2005 um 07:54 Uhr
Hallo

Ich will mit dem Script DHCP reaktivieren, nur weiss ich nicht wie ich bei den TCP/IP-Eigenschaften der Netzwerkkarte den Punkt "DNS-Server automatisch beziehen" scriptisch machen kann - Das derzeitige Script gehörte als um diesen Punkt erweitert.

g
Peter
Bitte warten ..
Mitglied: 12217
22.06.2005 um 10:59 Uhr
Hi,

wieso benutzt du nicht netsh? Ist imho einfacher und ab W2000 auch Bestandteil des Betriebssystems?

mfg
DrOktagon
Bitte warten ..
Mitglied: alesio
22.06.2005 um 11:14 Uhr
Du kannst vielleicht hier etwas finden:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wmisdk ...

gruß, alesio
Bitte warten ..
Mitglied: DerDieFrageHat
23.06.2005 um 08:08 Uhr
Hallo DrOktagon

Danke für den Netsh-Hinweis
Tatsächlich, es geht einfacher - aber nur ein bisschen

So bin ich dann doch mit zwei Zeilen glücklich geworden

netsh interface ip set address "LAN-Verbindung" dhcp
netsh interface ip set dns "LAN-Verbindung" dhcp


Danke
Peter
Bitte warten ..
Mitglied: DerDieFrageHat
23.06.2005 um 08:15 Uhr
Hi Alesio

Das war eine der Seiten die ich verwendet habe um überhaupt einmal soweit zu kommen eine fixe Ip, Gateway und DNS einzustellen bzw. die IP wieder auf automatisch beziehen zurückzustellen - nur für den DNS-Server habe ich nichts gefunden

Aber ich habe jetzt DrOktagons Hinweis mit netsh umgesetzt.

Danke
Peter
Bitte warten ..
Mitglied: StarSpace
03.05.2006 um 09:09 Uhr
Es gibt noch eine Möglichkeit. Der Wert DhcpNameServer unter dem Schlüssel HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces
\ {AdapterIdentifier} auf null setzen. Nicht schön aber funktioniert.

Siehe: http://www.microsoft.com/germany/technet/datenbank/articles/600485.mspx
Bitte warten ..
Mitglied: 48422
21.05.2007 um 16:28 Uhr
Um diesen Thread für künftige Scriptmenschen zu vervollständigen möchte ich Euch meine Lösung vorschlagen:

ErrorDNS = objNicConfig.SetDNSServerSearchOrder(dhcp)

Mit diesem Befehl wird die DNS-Serveradresse automatisch über DHCP bezogen.
Falls die Option zwar gesetzt ist aber trotzdem kein DNS-Server nicht erreicht wird, muss man zusätzlich noch das DHCP Lease erneuern:

objNicConfig.RenewDHCPLease

Mfg Moyyer
Bitte warten ..
Ähnliche Inhalte
Windows 7

DNS Serveradressen werden automatisch hinzugefügt

gelöst Frage von basslifeWindows 76 Kommentare

Da ich neu in diesem Forum bin hoffe ich, dass ich alle Regeln bei meiner Frage beachte! Ich habe ...

Batch & Shell

Powershell Befehl für IPv4 Adresse und DNS automatisch beziehen

gelöst Frage von 132934Batch & Shell5 Kommentare

Hallo zusammen, ich suche nach einem Powershell Befehl mit dem man auf einem Netzwerkadapter "Ethernet0" die Eigenschaften von IPv4 ...

Exchange Server

Exchange Serveradressen

gelöst Frage von 108436Exchange Server3 Kommentare

Mahlzeit. wie kann ich in OWA von Exchange 2010 die Serveradressen Eingeben? aktuell ist das leer MfG

Windows 7

Welche Java und Adobe Updater Serveradresse

Frage von mavericklpWindows 72 Kommentare

Moin moin zusammen, wir haben bei uns in der Firma momentan das Problem, das wir an jedem Computer die ...

Neue Wissensbeiträge
Ausbildung

Linux-Ausstieg in Niedersachsen - Windows statt Bugfix

Information von StefanKittel vor 2 TagenAusbildung33 Kommentare

Sind ja nur Steuergelder

Speicherkarten

Neuer Speicherkartentyp - zunächst nur für Huawei-Smartphones (künftig auch für Notebooks u. Tablets?)

Tipp von VGem-e vor 3 TagenSpeicherkarten4 Kommentare

Servus, als ob das "Chaos" i.S. Speicherkarten noch nicht groß genug wäre?! Evtl. kommt dieser neue Kartentyp bald auch ...

Sicherheit

Diverse D-Link-Router durch drei Schwachstellen kompromittierbar

Information von kgborn vor 4 TagenSicherheit1 Kommentar

Hat jemand D-Link-Router in Verwendung? Einige Modelle sind sicherheitstechnisch offen wie ein Scheunentor. Äußerst unschöne Sache, aber nichts neues ...

Hardware

100.000 Mikrotik-Router ungefragt von Hacker abgesichert

Information von 7Gizmo7 vor 4 TagenHardware3 Kommentare

Hallo zusammen, da hier ja öfters mal von Mikrotik gesprochen wird. Trotz Updates klafft eine Sicherheitslücke in Hundertausenden Mikrotik-Routern. ...

Heiß diskutierte Inhalte
Windows Userverwaltung
Passwortwechsel Zeitpunkt festlegen
Frage von Looser27Windows Userverwaltung21 Kommentare

Guten Morgen liebe Kolleginnen und Kollegen, da es eine Userin in meinem Urlaub geschafft hat, sich vom AD vollständig ...

Vmware
Offene LDAP-Server in AS
gelöst Frage von obi-wan-kenobiVmware19 Kommentare

Hallo alle Miteinander, ich habe ein Problem, unsere VM-Ware Appliance (Version. 6.5.0.10000) ist scheinbar angreifbar. Wir haben eben die ...

Windows 10
Windows 10 Spracherkennung - Eure Meinungen?
Frage von honeybeeWindows 1014 Kommentare

Hallo, wollte heute mal aus Neugier die Spracherkennung unter Windows 10 (Version 1803) ausprobieren und war mehr wie enttäuscht. ...

Windows Server
Zertifikat RemoteDesktop hinterlegen
gelöst Frage von Green14Windows Server12 Kommentare

Hallo zusammen. ich habe mehrere Server (WinSrv 2016). Die Server sind in keiner Domäne und keine Terminalserver. Ich verbinde ...