Visual Basic Dos Befehl Problem

01/27/2013 20:44 x0cola0x#1

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.

01/29/2013 21:27 MrSm!th#2

#moved

01/30/2013 18:32 vwap#3

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

01/30/2013 23:46 Sedrika#4

Code:

    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:

Code:

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