Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 2
Ir a la página 1, 2  Siguiente
 
[SOLUCIONADO] Consola De Gambas
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje [SOLUCIONADO] Consola De Gambas 
 
Buenos días (por aquí en Venezuela).
Quisiera saber si es posible mostrar la consola de gambas en el formulario, en tiempo de ejecución, para monitorear los procesos, por ejemplo, de descargas de archivos.

Mi problema es que cuando creo el ejecutable del programa, todo lo que le ordeno hacer a la consola de gambas queda en una caja negra, y me gustaría saber si puedo monitorear esos procesos.

Gracias caballeros.

consola_gambas
 




===================
gambeando ando -o- Yaracuy-Venezuela
[img]http://www.gambas-es.org/files/images/2194/mi_tarj_present_qr_droid.png[/img]
 
última edición por datobinario el Jueves, 12 Abril 2018, 19:01; editado 2 veces 
datobinario - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Consola De Gambas 
 
Aqui tienes un ejemplo:
https://cursogambas.blogspot.com.es...e-gnulinux.html
 




===================
Blog personal
Web: SoloGambas seleccion de articulos dedicados a Gambas
Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
 
jsbsan - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Consola De Gambas 
 
Muchas gracias jsbsan por tu pronta respuesta, el ejemplo que me diste me sirvió, para un casi si y para otro no.
Me explico, me sirve para el caso donde debo ejecutar un script.sh que no descarga nada de internet, pero para otro script.sh que si hace una descarga (con wget) no funciona. Se salta la descarga y se va inmediatamente a la respuesta final.

Para el script que funciona bien, es uno donde sólo utilizo imagemagick, y creo un colage con distintas imágenes.

Lo otro es que sólo veo las salidas que ordena el script, por ejemplo, si si yo coloco en mi .sh

variable="hola mundo"
echo $variable

esa es la salida que se logra leer del proceso, pero si yo coloco en mi script

wget www.google.com -O google.txt

no me muestra la salida de la consola:

--2018-04-11 14:54:24--  http://www.google.com/
Resolviendo www.google.com (www.google.com)... 172.217.0.164, 2607:f8b0:4008:80a::2004
Conectando con www.google.com (www.google.com)[172.217.0.164]:80... conectado.
Petición HTTP enviada, esperando respuesta... 200 OK
Longitud: no especificado [text/html]
Grabando a: “google.txt”

google.txt              [ <=>                ]  10,38K  --.-KB/s    in 0,05s  

2018-04-11 14:54:25 (193 KB/s) - “google.txt” guardado [10634]


este proceso me gustaría mostrarlo en tiempo de ejecución ¿es posible?
 




===================
gambeando ando -o- Yaracuy-Venezuela
[img]http://www.gambas-es.org/files/images/2194/mi_tarj_present_qr_droid.png[/img]
 
datobinario - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Consola De Gambas 
 
Citar:
Se salta la descarga y se va inmediatamente a la respuesta final.

Explico esto mejor, para que funcione wget debo usar
cProce = Shell lComando For Write

si uso
cProce = Shell (lComando) For Read As "Proceso"

el wget del script  no me funciona y se salta el proceso, sin mensaje de error ni nada que me pueda orientar.
 




===================
gambeando ando -o- Yaracuy-Venezuela
[img]http://www.gambas-es.org/files/images/2194/mi_tarj_present_qr_droid.png[/img]
 
datobinario - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Consola De Gambas 
 
Buenas compañero!

Si el script sh solo descarga un archivo de internet y tienes que esperar a que termine, puedes usar muchas otras funciones (Nativas) de gambas... depende siempre de que se ajuste más a tu proyecto, incluso puedes ir controlando el porcentaje de descarga y mostrarlo en un ProgressBar...

Igualmente si aun así quieres seguir ejecutando el SH, podrías ponerle alfinal "wait" de esta manera el programa esperará a que el .sh termine antes de seguir su ejecución.
 



 
CanihoJR - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Consola De Gambas 
 
Buenas, gracias por responder.
CanihoJR escribió: [Ver mensaje]
incluso puedes ir controlando el porcentaje de descarga y mostrarlo en un ProgressBar...


¿eso se puede hacer? sería genial y básicamente lo que busco.

porque a mi lo se me ocurre es un progressbar que vaya de principio a fin a cada rato (lo he hecho), ya que no conozco la longitud del archivo ni el proceso de la descarga.
 




===================
gambeando ando -o- Yaracuy-Venezuela
[img]http://www.gambas-es.org/files/images/2194/mi_tarj_present_qr_droid.png[/img]
 
datobinario - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Consola De Gambas 
 
datobinario escribió: [Ver mensaje]
si uso
cProce = Shell (lComando) For Read As "Proceso"

el wget del script  no me funciona y se salta el proceso, sin mensaje de error ni nada que me pueda orientar.


Más exactamente, como tú gestionas esta linea ?
Es decir, como lees los datos del comando ?
 



 
vuott - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Consola De Gambas 
 
Citar:
Más exactamente, como tú gestionas esta linea ?
Es decir, como lees los datos del comando ?

No entiendo bien la pregunta, pero esto es lo que hago:
Public Sub Button6_Click()

  Dim Comando, csLocal As String
  Dim rsLocal As Result
  csLocal = "SELECT bbrefID,mlbID FROM appearances LEFT JOIN mlbid USING(bbrefID) WHERE mlbID IS NULL AND yearID=2018 GROUP BY bbrefID"
  Try rsLocal = cSql.Exec(csLocal)
  If Error Then
    Message(Error.Text)
  Else
    If rsLocal.Count > 0 Then
      Comando = "/home/datobinario/mlb-controles/bb-ref/mlbid/01-mlbid.sh " & varUltimoAnio & " Y"
      'Comando = "/home/datobinario/mlb-controles/bb-ref/mlbid/01-mlbid.sh " & varUltimoAnio
      LineDeComando(Comando)
    Endif
  Endif

End


Y este es el script:
#!/bin/bash
inicio2=`date +%s`
yearID=$1
seccion="mlbid"
if [ -z $2 ]; then
    archivo=('war_daily_bat.txt' 'war_daily_pitch.txt')
fi
if [ $2 = "Y" ]; then
    archivo=('war_daily_bat_year.txt' 'war_daily_pitch_year.txt')
fi

destino="/home/datobinario/mlb-controles/bb-ref/$seccion/todo.txt"
TABLA_BD=$seccion
 > $destino
for FILE in ${archivo[*]}; do
    inicio=`date +%s`
    origen="/home/datobinario/mlb-controles/bb-ref/$seccion/$FILE"
    wget "https://www.baseball-reference.com/data/$FILE" -O $origen
    bc=" "
    rp="+"
    sed -i "s#$bc#$rp#g" $origen
    if [ -f $origen ]; then
        for LIN in $(cat "$origen"); do
            
            arr=(${LIN//','/ })
            if [ ${arr[4]} = "$yearID" ]; then
                valor=${arr[3]},${arr[2]}
                echo $valor >> $destino
            fi
            
        done
    fi
    final=`date +%s`
    let seg=$final-$inicio
echo "**********$FILE ** ("$seg"seg.)"
done
destinoFinal=${destino//.txt/-2.txt}
cat $destino | sort | uniq > $destinoFinal

final2=`date +%s`
let seg=$final2-$inicio2

echo "**LISTO** ("$seg"seg.)"

este script hace dos descargas.
 




===================
gambeando ando -o- Yaracuy-Venezuela
[img]http://www.gambas-es.org/files/images/2194/mi_tarj_present_qr_droid.png[/img]
 
datobinario - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Consola De Gambas 
 
datobinario escribió: [Ver mensaje]
Buenas, gracias por responder.
¿eso se puede hacer? sería genial y básicamente lo que busco.


Si, que se puede, solo quieres descargar un archivo??
 



 
CanihoJR - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Consola De Gambas 
 
CanihoJR escribió: [Ver mensaje]

Si, que se puede, solo quieres descargar un archivo??

este es el script
#!/bin/bash
inicio2=`date +%s`
yearID=$1
seccion="mlbid"
if [ -z $2 ]; then
    archivo=('war_daily_bat.txt' 'war_daily_pitch.txt')
fi
if [ $2 = "Y" ]; then
    archivo=('war_daily_bat_year.txt' 'war_daily_pitch_year.txt')
fi

destino="/home/datobinario/mlb-controles/bb-ref/$seccion/todo.txt"
TABLA_BD=$seccion
 > $destino
for FILE in ${archivo[*]}; do
    inicio=`date +%s`
    origen="/home/datobinario/mlb-controles/bb-ref/$seccion/$FILE"
    wget "https://www.baseball-reference.com/data/$FILE" -O $origen
    bc=" "
    rp="+"
    sed -i "s#$bc#$rp#g" $origen
    if [ -f $origen ]; then
        for LIN in $(cat "$origen"); do
            
            arr=(${LIN//','/ })
            if [ ${arr[4]} = "$yearID" ]; then
                valor=${arr[3]},${arr[2]}
                echo $valor >> $destino
            fi
            
        done
    fi
    final=`date +%s`
    let seg=$final-$inicio
echo "**********$FILE ** ("$seg"seg.)"
done
destinoFinal=${destino//.txt/-2.txt}
cat $destino | sort | uniq > $destinoFinal

final2=`date +%s`
let seg=$final2-$inicio2

echo "**LISTO** ("$seg"seg.)"

este en particular descarga dos archivos, hay otros que descargan mas de uno, y algunos sólo uno.
 




===================
gambeando ando -o- Yaracuy-Venezuela
[img]http://www.gambas-es.org/files/images/2194/mi_tarj_present_qr_droid.png[/img]
 
última edición por datobinario el Jueves, 12 Abril 2018, 16:08; editado 1 vez 
datobinario - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Timer En Aplicacion De Consola Gambas destroyer General 3 Miercoles, 27 Octobre 2010, 11:52 Ver último mensaje
destroyer
No hay nuevos mensajes Ejemplo Consola En Gambas rakso102 Aplicaciones/Fragmentos de Código 2 Martes, 01 Febrero 2011, 15:59 Ver último mensaje
rakso102
No hay nuevos mensajes Línea De Comando En La Ventana De Consola... Shell General 4 Miercoles, 02 Abril 2014, 10:35 Ver último mensaje
Shell
No hay nuevos mensajes [Bug] Gambas 3.11. No Recuerda La Opción ... Shell General 1 Lunes, 14 May 2018, 08:47 Ver último mensaje
Shell
 

Publicar nuevo tema  Responder al tema  Página 1 de 2
Ir a la página 1, 2  Siguiente

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario



  

 

cron