Mensajes: 92
Temas: 29
Gracias Recibidas: 0 en 0 posts
Gracias Dadas: 1
Registro en: Jul 2020
06-10-2020, 05:01
(Última modificación: 06-10-2020, 21:11 por
kokodrilo.)
buenas
me tiene loco este código,
sudo pip3 install --force-reinstall youtube-dl
quiero ejecutar eso en un terminal para que el usuario vea el progreso y al terminar el mismo quiero cerrar la ventana inmediatamente pero no logro hacerlo
alguna sugerencia?
El tiempo de las manifestaciones caducó pero el boicot con auto sacrificio es el camino para derrotar al sistema.
Mensajes: 340
Temas: 25
Gracias Recibidas: 89 en 69 posts
Gracias Dadas: 11
Registro en: Jul 2020
06-10-2020, 10:29
(Última modificación: 06-10-2020, 10:41 por
vuott.)
Abres el terminal con Gambas ?
"Los horizontes perdidos nunca regresan. " (F. Battiato, La stagione dell'amore, 1983)
"Las ondas nunca regresan. " (Genesis: Ripples - A trick of the tail, 1976)
Mensajes: 92
Temas: 29
Gracias Recibidas: 0 en 0 posts
Gracias Dadas: 1
Registro en: Jul 2020
06-10-2020, 17:14
(Última modificación: 06-10-2020, 17:45 por
kokodrilo.)
uso un formulario llamado terminal con un terminalview y lo uso como clase
terminal.instalyoutube
termina.mensaje
termina.etc
un amigo me tiro este codigo que tengo que probar yo ya habia probado algo de esto pero sin exito, no se si le erre a la sintaxis o que hice mal.
esto es para darte una idea de lo que quiero.
Código:
Public Sub installyoutube()
Dim proceso5 As Process
Me.show()
proceso5 = TerminalView1.Exec(["sudo", "/usr/bin/pip3", "-q", "install", "-U", "youtube-dl"], ["bash"])
While proceso5.State = Process.Running
Wait 1 ' 0.5
Wend
Wait 0.1
proceso5.close
End
Public Sub ExisteYoutubedl()
FMain.ShowMensajes("Comprobando si youtube-dl esta instalado")
If System.Exist("youtube-dl") = False and if System.Exist("pip3") Then
FMain.ShowMensajes("Instalando youtube-dl espere por favor...")
Terminal.Title = "instalación youtube-dl"
Terminal.Mensaje("Ingrese su contraseña para iniciar la instalación")
Terminal.installyoutube()
Terminal.Close
If System.Exist("youtube-dl") Then
FMain.ShowMensajes("youtube-dl se instaló con éxito")
Wait 1
Else
FMain.ShowMensajes("Fallo la instalación de youtube-dl")
Wait 2
Endif
Endif
Endif
MostrarVersionYoutube_dl
Catch
Message.Error(Error.Text & gb.NewLine & Error.Where)
End
bueno descubrí algo no me andaba a mi porque pip3 va con la ruta absoluta, hago mas pruebas y les cuento.
como se ve en el código ahí.
El tiempo de las manifestaciones caducó pero el boicot con auto sacrificio es el camino para derrotar al sistema.
Mensajes: 340
Temas: 25
Gracias Recibidas: 89 en 69 posts
Gracias Dadas: 11
Registro en: Jul 2020
(06-10-2020, 17:14)kokodrilo escribió: uso un formulario llamado terminal con un terminalview y lo uso como clase
Desculpa, no lo encuentro.

Como haces ? Donde está ? Que Componente usas ?
"Los horizontes perdidos nunca regresan. " (F. Battiato, La stagione dell'amore, 1983)
"Las ondas nunca regresan. " (Genesis: Ripples - A trick of the tail, 1976)
Mensajes: 92
Temas: 29
Gracias Recibidas: 0 en 0 posts
Gracias Dadas: 1
Registro en: Jul 2020
06-10-2020, 18:59
(Última modificación: 06-10-2020, 19:35 por
kokodrilo.)
gb.term y gb.form.terminal
parece que esto funciona:
TerminalView1.Print("Comenzando tarea espere por favor..." & gb.Lf)
TerminalView1.Goto(0, 2)
Proceso5 = TerminalView1.Exec(["sudo", "pip3", "install", "--force-reinstall", "youtube-dl"], ["bash"])
While proceso5.State = Process.Running
Wait 1 ' 0.5
Wend
Wait 0.1
proceso5.close
Me.Close
El tiempo de las manifestaciones caducó pero el boicot con auto sacrificio es el camino para derrotar al sistema.
Mensajes: 340
Temas: 25
Gracias Recibidas: 89 en 69 posts
Gracias Dadas: 11
Registro en: Jul 2020
06-10-2020, 20:52
(Última modificación: 06-10-2020, 20:54 por
vuott.)
(06-10-2020, 18:59)kokodrilo escribió: gb.term y gb.form.terminal
Ah, ok, gracias.
(06-10-2020, 18:59)kokodrilo escribió: While proceso5.State = Process.Running
Sì, usando
Process, me parece la mejor solución
.
"Los horizontes perdidos nunca regresan. " (F. Battiato, La stagione dell'amore, 1983)
"Las ondas nunca regresan. " (Genesis: Ripples - A trick of the tail, 1976)
Mensajes: 92
Temas: 29
Gracias Recibidas: 0 en 0 posts
Gracias Dadas: 1
Registro en: Jul 2020
06-10-2020, 21:02
(Última modificación: 06-10-2020, 21:09 por
kokodrilo.)
solucionado:
Public Sub installyoutube()
Dim proceso5 As Process
Me.show()
TerminalView1.Print("Comenzando la tarea espere por favor..." & gb.Lf)
TerminalView1.Goto(0, 2)
Proceso5 = TerminalView1.Exec(["sudo", "pip3", "install", "--force-reinstall", "youtube-dl"], ["bash"])
While proceso5.State = Process.Running
Wait 1
Wend
proceso5.close
Me.Close
Catch
End
El tiempo de las manifestaciones caducó pero el boicot con auto sacrificio es el camino para derrotar al sistema.