• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

mekanis

[Resolvido] Shell

11 mensagens neste tópico

Boas pessoal

como é que por exemplo em vb meto o resultado do ipconfig da linha de comando num richtextbox??

oke eu tenho é richtextbox.text = shell("ipconfig")

mas aparecem-me uns numeros tipo 2532 e coisas do genero...

como é que ei de fazer?

Obrigado e boas programações :P

cumps

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Tu queres meter o resultado da linha de comandos ou queres a informação da rede ?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Tu queres meter o resultado da linha de comandos ou queres a informação da rede ?

qual a diferença?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Uma coisa é agarrar no texto que vem na consola de DOS e carregar na richtextbox, outra coisa é recolher informação da placa de rede e colocar ordenadamente na richtextbox.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Uma coisa é agarrar no texto que vem na consola de DOS e carregar na richtextbox, outra coisa é recolher informação da placa de rede e colocar ordenadamente na richtextbox.

Gostava de saber ambas se possivel

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Epá não vi esta tua resposta. :cheesygrin:

Logo vou testar e logo coloco um exemplo, embora acho mais complicado ler a informação da consola.

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Ora aqui vai alguma informação!

Para leres o resultado da consola, e afinal até é simples, podes fazer o seguinte:

        Dim proc As New Process
        With proc.StartInfo
            .FileName = "ipconfig"
            .RedirectStandardOutput = True
            .CreateNoWindow = True
            .WindowStyle = ProcessWindowStyle.Maximized
            .UseShellExecute = False
        End With
        proc.Start()

        Dim result As String = proc.StandardOutput.ReadToEnd

        proc.WaitForExit()
        Me.RichTextBox1.Text = result

Para obteres informação da placa de rede podes usar também a classe WMI com o parâmetro "Win32_NetworkAdapter".

Como o outro resolve (penso eu) não perdi tempo a testar :P

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Obrigadão jpaulino funciona na perfeição, só tenho uma dúvida sabes como dar paragrafos? ou seja isto aparece tudo numa só linha e gostava que aparece-se como na linha de comandos...

Obrigado mais uma vez, és o maior :P

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Altera a ultima linha para isto:

Me.RichTextBox1.Text = result.Replace(Chr(10), VbNewLine)

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora