+- Comunidad Gambas-es (https://gambas-es.org)
+-- Foro: Gambas (https://gambas-es.org/forum-3.html)
+--- Foro: Aplicaciones/Fragmentos de Código (https://gambas-es.org/forum-8.html)
+--- Tema: obtener el path de la terminal (/thread-1419.html)
obtener el path de la terminal - alberto-moyano - 26-06-2023
Hola gente, estoy intentando obtener la ruta de un terminalview y volcarlo en un textbox, pero obtengo un error, el código es este, no entiendo que hago mal, gracias de antemano por cualquier explicación que me aclare en que me equivoco
Código:
Public Sub Form_Open()
Dim ruta As String
pBash = TerminalView1.Exec(["bash"])
ruta = TerminalView1.Input("pwd").Split("\n")[0]
If ruta.EndsWith("\n") Then
ruta = ruta[0, ruta.Length - 1]
End If
TextBox1.Text = ruta
EndRE: obtener el path de la terminal - tincho - 26-06-2023
No conozco ese control, pero luego de hacer unas pruebas veo que TerminalView1.Input("pwd") escribe pwd en la terminal pero no copia lo que escribís en la terminal en una variable.
RE: obtener el path de la terminal - cogier - 26-06-2023
Prueba este código.
Código:
'Requiere gb.desktop & gb.form.terminal
pBash As Process
Public Sub Button1_Click()
Dim ruta As String
pBash = TerminalView1.Exec(["bash"])
TerminalView1.SetFocus
Desktop.SendKeys("pwd" & gb.NewLine)
Wait 0.25
ruta = TerminalView1.Text
TextBox1.Text = Split(ruta, gb.NewLine)[1]
Desktop.SendKeys("clear" & gb.NewLine)
End