Visual Basic Dos Befehl Problem

[x0cola0x]

Moin

Versuche momentan in Visual Basic den Befehl "netsh int tcp set global chimney=automatic" auszuführen mache das ganze momentan so:

Shell("Cmd /K""netsh int tcp set global chimney=automatic")

Aber bekomme immer die Meldung "Der Befehl netsh? wurde nicht gefunden" (Ja ich habe es als Admin gestartet).Und wenn es mal funkt kommt eine Meldung mit Falschem Parameter etc. aber im Command funkt es ohne Probleme jemand ne Lösung?In C++ funkts auch net -.- ( system("") )

€: Die Fehler Meldungen werden im Command angezeigt nicht in vb.

[MrSm!th]

#moved

[vwap]

Da die Funktion "Shell" verwendet wird, ist das wohl VB6 und somit kein .NET.

[Sedrika]

    Public Function CMDResponse(ByVal cmd As String) As StreamReader
        Dim p As New Process
        p.StartInfo.UseShellExecute = False
        p.StartInfo.RedirectStandardOutput = True
        p.StartInfo.FileName = "cmd.exe"
        p.StartInfo.Arguments = cmd
        p.Start()
        Return p.StandardOutput
    End Function

Aufrufen tust du es so:

Dim Scanner As StreamReader = CMDResponse("/c ") ' /c und danach dein Parameter
Do Until Scanner.EndOfStream
' Dein Code
Loop