vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
SEPA-Dateien erstellen inkl. IBAN-, BLZ-/Kontonummernprüfung  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB & Windows API
Re: IP Adresse automatisch beziehen 
Autor: strossi
Datum: 23.11.04 07:05

Hier der Code zum die NIC auf DHCP einstellen

Dim oAdapters As Object
Dim oAdapter As Object
Dim nStatus As Long

' alle verfügbaren Netzwerk-Adapter mit IP-Adresse
Set oAdapters = GetObject("winmgmts:").ExecQuery( _
"SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True")

For Each oAdapter In oAdapters
If IsArray(oAdapter.IPAddress) Then
nStatus = oAdapter.EnableDHCP
End If
Next
Exit Sub

Gruß Strossi
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
IP Adresse automatisch beziehen1.594strossi16.11.04 22:05
Re: IP Adresse automatisch beziehen926ModeratorMartoeng19.11.04 14:40
Re: IP Adresse automatisch beziehen814strossi22.11.04 07:13
Re: IP Adresse automatisch beziehen887ModeratorMartoeng22.11.04 19:58
Re: IP Adresse automatisch beziehen929strossi23.11.04 07:05

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2024 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel