Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Delphi Netzwerk adapter deaktivieren/aktivieren (https://www.delphipraxis.net/206562-netzwerk-adapter-deaktivieren-aktivieren.html)

Koloss 6. Jan 2021 15:16

Netzwerk adapter deaktivieren/aktivieren
 
Hallo Leute,

ich rufe über den powershell folgenden Befehl auf und dieser funktioniert auch:
Code:
ShellExecute(0, 'runas', 'powershell', 'netsh interface set interface "ethernet" disable', nil, SW_HIDE);
Wenn ich aber mehrere Ethernet Adapter habe und ich möchte "Ethernet 2" deaktivieren, dann funktioniert es nicht mehr z.b.:
Code:
ShellExecute(0, 'runas', 'powershell', 'netsh interface set interface "ethernet 2" disable', nil, SW_HIDE);
Gebe ich es aber direkt in der Powershell ein funktioniert es.

ACHTUNG: Diese Befehle funktionieren nur als Administrator.

Zusätzlich suche ich einen Befehl wo ich die Namen der Verbindungen rausbekomme. Also "Ethernet 2", "Ethernet 3", "wlan" usw.
Die vorhanden Netzwerkkarten bekomme ich raus aber eben nicht die dazu passenden Namen, Siehe ganz unten:
https://stackoverflow.com/questions/...twork-adapters

Dalai 6. Jan 2021 15:36

AW: Netzwerk adapter deaktivieren/aktivieren
 
Die PowerShell würde ich komplett aus der Gleichung bzw. Befehlszeile nehmen, weil die unnötig ist. Netsh.exe ist bereits ein eigenes Programm. Folgendes sollte also ausreichen:
Delphi-Quellcode:
ShellExecute(0, 'runas', 'netsh.exe', 'interface set interface "ethernet" disable', nil, SW_HIDE);
{}
Dann würde ich die Rückgabe von ShellExecute auswerten, um herauszubekommen, warum es nicht funktioniert.

Grüße
Dalai

Koloss 6. Jan 2021 16:21

AW: Netzwerk adapter deaktivieren/aktivieren
 
Spitze Danke!!! Funktioniert jetzt auch mit "ethernet 2"

Jetzt fehlt mir nur noch die liste der ethernetadapter

TurboMagic 6. Jan 2021 21:05

AW: Netzwerk adapter deaktivieren/aktivieren
 
Zur Not "ipconfig /all" aufrufen und die Ausgabe auswerten.
Dazu entweder mit der verfügbaren Komponente die Konsolenausgabe
abgreifen oder Ausgabe mittels > in eine Datei umleiten.


Alle Zeitangaben in WEZ +1. Es ist jetzt 15:42 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz