Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Nuevo: Obtener Datos Del Terminal
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Nuevo: Obtener Datos Del Terminal 
 
hola a todos los integrantes de la comunidad gambas! soy nuevo en el foro y necesito que me ayuden con un problema que no logro resolver... necesito saber como obtengo los datos que me genera el terminal.
llevo dos semanas buscando lineas de código que me ayuden y no he encontrado nada...
de antemano gracias

 



 
maickolmedina - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Nuevo: Obtener Datos Del Terminal 
 
Hola maickolmedina

Si esta estas usando algun comando de la terminal ejecutando la orden Shell, puedes redirigir la salida del comando con la orden:

public sub ejecutaComando(comando as string)
Dim salida as string
Shell comando  To salida
print salida 'muestra la salida de la consola
end

 


Mirate la ayuda de gambasdoc: http://gambasdoc.org/help/lang/shell

Donde tambien te explica otra forma de hacerlo, que es usando procesos


Nota:

Citar:
llevo dos semanas buscando lineas de código que me ayuden y no he encontrado nada...

En el libro de gambas de Daniel Campos y Jose Luis Redrejo ,en pagina 133, viene explicado. Te lo puedes descargar en la sección de Descargas del foro.
 




===================
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: Nuevo: Obtener Datos Del Terminal 
 
¿como aplico esta solución en el siguiente código?
Public Sub SubeIMG(archivo As String)
Dim texto As String
Dim hproc As Process
Dim frase As String
Dim i As Integer
Dim Inicial, RutaREMOTA, rutaLocal As String

Inicial = Upper(Mid(archivo, 1, 1))
RutaREMOTA = "mi ruta/" & Inicial & "/"
rutaLocal = DirIMG.Current & "/" & archivo
texto = "lftp -u user,password host"
Try hproc = Shell texto For Write
Print texto
If Error Then
Message.Info("Error al ejectar lftp:" & texto) '; ERROR )
Endif

Print #hproc, "put " & rutaLocal & " -o " & RutaREMOTA
If Error Then
Message.Info("Error al subir archivo| " & Error.Text)
Endif

Print #hproc, "exit"

Do While hproc.state = Process.Running
Wait 0.01
Loop
'Close #hproc

End


Explico, es un procedimiento para subir imágenes a un servidor por FTP, lo traigo desde gambas2 y funciona perfecto, pero solo quisiera poder recibir los mensajes de la consola, sobre todo para cuando algo sale mal, o un OK, lo que sea, pero saber la respuesta de la consola después de hacer una operación de subida.

Ahora estoy ciego, ese mensaje de error que tiene el código es un saludo a la bandera, nunca funciona.

Otra cosa, no puedo cerrar el proceso, "Close #hproc" de dice "el flujo está cerrado" en gambas2 si lo hacia, aunque comenté la linea y no ha hecho falta.
 




===================
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 Lunes, 11 Marzo 2013, 03:46; editado 1 vez 
datobinario - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Nuevo: Obtener Datos Del Terminal 
 
datobinario:
Try hproc = Shell texto For Write

Si lo tienes abierto para escritura, que yo sepa, no puedes leer la salida con "To"

Lo que se me ocurre es que redirijas  la salida un archivo de texto, en la misma linea de comando que le mandas al Shell:
texto = "lftp -u user,password host >salida.txt"


Y que luego, analises ese archivo "salida.txt", a ver que ha pasado en la ejecución de tus ordenes.

Saludos
 




===================
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: Nuevo: Obtener Datos Del Terminal 
 
Se todas formas, para subir y bajar ficheros vía ftp, no necesitas recurrir a ninguna librería externa como lftp, cnftp, etc. El componenete FTPClient de Gambas3 es suficiente...
Échale un ojo a este hilo.

http://foro.gambas-es.org/viewtopic.php?f=5&t=2908

Eso sí, monitorizarse no se deja...
 



 
shordi - Ver perfil del usuarioEnviar mensaje privado 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 
OcultarTemas parecidos
Tema Autor Foro Respuestas último mensaje
No hay nuevos mensajes Nuevo Control: Gb.odt (pasar Datos De .txt... jsbsan Aplicaciones/Fragmentos de Código 0 Sabado, 04 Diciembre 2010, 02:49 Ver último mensaje
jsbsan
No hay nuevos mensajes Conectar Y Obtener Datos De Una BD SQLITE DEATH Bases de Datos 4 Viernes, 29 Julio 2011, 03:31 Ver último mensaje
jousseph
No hay nuevos mensajes Como Obtener Datos Del Textbox maickolmedina General 4 Miercoles, 13 Marzo 2013, 17:24 Ver último mensaje
datobinario
No hay nuevos mensajes SQLITE3 .schema: Obtener El Esquema De La ... jsbsan Bases de Datos 6 Miercoles, 24 Septiembre 2014, 06:06 Ver último mensaje
jsbsan
 

Publicar nuevo tema  Responder al tema  Página 1 de 1
 

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