Netzwerkadapter aktivieren und deaktivieren , ip adresse erneuern und neu verbinden

  • VB.NET

Es gibt 14 Antworten in diesem Thema. Der letzte Beitrag () ist von hal2000.

    Netzwerkadapter aktivieren und deaktivieren , ip adresse erneuern und neu verbinden

    Hallo,
    Ich hab jetzt seit neustem win7 (vorher xp)
    jetzt hab ich das Problem das ich zwar verbunden bin mit dem Wlan Router aber ich hab kein Internet früher bei xp gab es reparieren(dann funtzte das Internet) aber bei win7 gibt es dass nicht D;.
    Jetzt möchte ich das nachmachen also wie kann ich Netzwerkadapter aktivieren und deaktivieren , ip adresse erneuern und neu verbinden .... alle befehle bitte reinschreiben wenn das überhaupt geht ;D
    DANKE IM VORRAUs. :thumbsup:

    Matzee


    PS: ich kenne den Hilfreich Button ;D

    ähh kanst du mir weiter helfen wie muss ich das machen

    VB.NET-Quellcode

    1. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    2. netsh interface set interface DISABLED End Sub

    Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „Matzee2011“ ()

    Okay, zum Beispiel so:

    VB.NET-Quellcode

    1. Shell("netsh interface set interface <interface name> DISABLED") ' DEAKTIVIEREN
    2. Shell("netsh interface set interface <interface name> ENABLED") 'AKTIVIEREN

    Das ganze ist aus dem Kopf geschrieben. Natürlich wäre es sinnvoller, es mit einem Objekt der Klasse Process zu machen.
    Außerdem muss der Platzhalter <interface name> mit dem Interfacenamen ersetzt werden.
    Ich kann dir da keine genaue Hilfe anbieten, da ich mich damit noch nicht ausreichend beschäftigt habe.

    Grüße Myrax

    Ich führe den Befehl volgender maßen aus:
    netsh interface set interface name="LAN-Verbindung" admin=DISABLED
    und dann sagt er das der Name der Schnittstelle für den Router nicht registriert sei.
    Aber der Name stimmt zu 100%
    Kann mir jemand weiter helfen?
    It's not a bug, it's a feature

    Schlechte Nachricht:
    netsh scheint auf Nicht-Server-Betriebssystemen nur für non-LAN-Interfaces zu funktionieren.

    Du kannst devconverwenden.

    Im Netz habe ich noch folgendes VBScript gefunden, das funktionieren sollte (du kannst es ja auf .net umschreiben ;) )

    VB.NET-Quellcode

    1. Const ssfCONTROLS = 3
    3. sConnectionName = "Local Area Connection"
    5. sEnableVerb = "En&able"
    6. sDisableVerb = "Disa&ble"
    8. set shellApp = createobject("shell.application")
    9. set oControlPanel = shellApp.Namespace(ssfCONTROLS)
    11. set oNetConnections = nothing
    12. for each folderitem in oControlPanel.items
    13. if folderitem.name = "Network and Dial-up Connections" then
    14. set oNetConnections = folderitem.getfolder: exit for
    15. end if
    16. next
    18. if oNetConnections is nothing then
    19. msgbox "Couldn't find 'Network and Dial-up Connections' folder"
    20. wscript.quit
    21. end if
    23. set oLanConnection = nothing
    24. for each folderitem in oNetConnections.items
    25. if lcase(folderitem.name) = lcase(sConnectionName) then
    26. set oLanConnection = folderitem: exit for
    27. end if
    28. next
    30. if oLanConnection is nothing then
    31. msgbox "Couldn't find '" & sConnectionName & "' item"
    32. wscript.quit
    33. end if
    35. bEnabled = true
    36. set oEnableVerb = nothing
    37. set oDisableVerb = nothing
    38. s = "Verbs: " & vbcrlf
    39. for each verb in oLanConnection.verbs
    40. s = s & vbcrlf & verb.name
    41. if verb.name = sEnableVerb then
    42. set oEnableVerb = verb
    43. bEnabled = false
    44. end if
    45. if verb.name = sDisableVerb then
    46. set oDisableVerb = verb
    47. end if
    48. next
    50. 'debugging displays left just in case...
    51. '
    52. 'msgbox s ': wscript.quit
    53. 'msgbox "Enabled: " & bEnabled ': wscript.quit
    55. 'not sure why, but invokeverb always seemed to work
    56. 'for enable but not disable.
    57. '
    58. 'saving a reference to the appropriate verb object
    59. 'and calling the DoIt method always seems to work.
    60. '
    61. if bEnabled then
    62. ' oLanConnection.invokeverb sDisableVerb
    63. oDisableVerb.DoIt
    64. else
    65. ' oLanConnection.invokeverb sEnableVerb
    66. oEnableVerb.DoIt
    67. end if
    69. 'adjust the sleep duration below as needed...
    70. '
    71. 'if you let the oLanConnection go out of scope
    72. 'and be destroyed too soon, the action of the verb
    73. 'may not take...
    74. '
    75. wscript.sleep 1000
    --
    If Not Program.isWorking Then Code.Debug Else Code.DoNotTouch
    --

    Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „petaod“ ()

    Schon mal an UAC gedacht? Das Deaktivieren einer Netzwerkverbindung ist ein administrativer Vorgang und benötigt daher erweiterte Rechte. Fordere Administratorrechte an und führe folgenden Befehl aus (engliches System vorausgesetzt - kA wie die NIC in nem deutschen System heißt):

    Quellcode

    1. netsh interface set interface name="Local Area Connection" admin=ENABLED
    Gruß
    hal2000

Facebook
Telefonspende