Array
(
)

Comando MSDOS via VB.NET

Facc
   - 06 mar 2009

Estou fazendo assim, funciona mas preciso resolver um problema:

#Código

Dim CMDProcesso As New Process
        Dim CMDInfoInicio As New System.Diagnostics.ProcessStartInfo

        ´´Inicia novo prompt de comando
        CMDInfoInicio.FileName = "cmd"

        ´´Redireciona o Input
        CMDInfoInicio.RedirectStandardInput = True

        ´´Redireciona o OutPut
        CMDInfoInicio.RedirectStandardOutput = True

        ´´Requerido para o redirecionamento
        CMDInfoInicio.UseShellExecute = False

        ´´Seta Informações de inicialização
        CMDProcesso.StartInfo = CMDInfoInicio

        ´´Inicia processo
        CMDProcesso.Start()

        ´´Declara STREAMS de Leitura e Escrita
        ´´E os seta como Input e OutPut do processo

        Dim SR As System.IO.StreamReader = CMDProcesso.StandardOutput
        Dim SW As System.IO.StreamWriter = CMDProcesso.StandardInput

        ´´Envia Comando
        SW.WriteLine("net use \126.0." & IPServe & ".1 /user:vendas")

        ´´Envia comando para Sair
        SW.WriteLine("exit")

        ´´Retorna Resultado do prompt
        MsgBox(SR.ReadToEnd) -> Apenas para mostrar a mensagem... depois irei comentar

        ´´Fecha Streams
        SW.Close()
        SR.Close()


[img:b6be5cd882]http://i498.photobucket.com/albums/rr350/faccruz/MSDOS.jpg[/img:b6be5cd882]

como incluir a senha qndo pede?? essa é a minha duvida, ou então, capturar qndo der erro

Lembrando que eu estou acesando via BROWSER

Facc
   - 09 mar 2009

ninguem?

Rafael Cabral
   - 10 mar 2009

Já tentou isso?

#Código

Process.Start("cmd.exe /c net use \126.0." & IPServe & ".1 /user:vendas")


Atenciosamente,

Rafael Cabral