- Public Sub TreeViewcomandos_Select()
- Dim res5 As String
- Dim res6 As String
- Dim sesto As String
- sesto = TreeViewcomandos.Current.Key
- Select Case sesto
- Case "ifconfig"
- TextAreacomandos.Clear
- Shell "ifconfig --help" To res5 'aquí si pongo shell "ifconfig eth0" o "ifconfig" los muestra, como que el problema se da cuando se pone modificadores
- TextAreacomandos.Text = res5
- Print "ifconfig"
- Case "ifup"
- TextAreacomandos.Clear
- Print "ifup"
- Shell "uname -h" To res6
- TextAreacomandos.Text = res6
- Case Else
- Return
- End Select
- End
alguien me puede decir en que me equivoco??