Hola a todos,

estoy intentando implentar la salida a un textarea de una instrucción via Shell, tengo un boton que me trae la ruta a un textedit y con otro boton ejecuto la llamada que deberia mostrarse en un textarea, en consola la linea que armo se ejecuta sin problemas y en gambas no obtengo ningun error, simplemente no hace nada.

También dejo una captura parcial del formulario

Gracias de antemano!!!

Este es el código que utilizo
 

Código:

 
Public Sub btnSELECepub_Click()

  If Dialog.OpenFile() Then Return
    txtRUTAepub.Text = Dialog.Path

End

Public Sub btnCHECKEAR_Click()

  Dim hproceso As Process

  hproceso = Shell ("epubcheck" & "4" & "txtRUTAepub.text") For Read As "Proceso"
End

Public Sub Proceso_read()

  Dim salida As String

  txtRESULTADOS.ReadOnly = True

  salida = Read #Last, Lof(Last)
  txtRESULTADOS.text &= salida

End

Archivos adjuntos

---

hproceso = Shell ("epubcheck" & "4" & "txtRUTAepub.text") For Read As "Proceso"

txtRUTAepub.text se encuentre entrecomillado y no debería estarlo.
Luego, te propongo la siguiente manera de hacerlo:

Código:

Public Sub btnSELECepub_Click()

  If Dialog.OpenFile() Then Return
  txtRUTAepub.Text = Dialog.Path

End

Public Sub btnCHECKEAR_Click()

  'Dim hproceso As Process
  Dim s As String

  Shell "epubcheck 4 " & txtRUTAepub.text & " 2>&1" To s
 
  txtRESULTADOS.text = s
 
End

' Public Sub Proceso_read()
'
'   Dim salida As String
'
'   txtRESULTADOS.ReadOnly = True
'
'   salida = Read #Last, Lof(Last)
'   txtRESULTADOS.text &= salida
'
' End

Hola Tincho, gracias por tu ayuda pero tu propuesta me tira un error

Archivos adjuntos

---

Hola Tincho, gracias por tu ayuda pero tu propuesta me tira un error

Si, es verdad, el error es que olvide un AND, ponelo así:
  Shell "epubcheck 4 " & txtRUTAepub.text & "2>&1" To s
Debería funcionar
Corregí el código que puse antes también.
Saludos.

Hola tincho, no funciona, pero me ya me muestra en el textarea el error, que creo entender que significa.

el 4 después de epubcheck es un argumento del script (indica la versión de epubcheck), probe con un AND entre la llamada al script y el 4 pero tampoco funciona, no sé si para los argumentos la declaración debe cambiar

---

Bueno Tincho, ya lo encontré, pero no entiendo el porqué. El 4 que es un valor argumento necesita un espacio despues antes de cerrar las comillas, en otras pruebas que hice con programas no se necesita el espacio adicional antes del cierre de las comillas.

Gracias por tu ayuda

PD: como cierro el hilo para que figure como solucionado

Archivos adjuntos

---

El 4 que es un valor argumento necesita un espacio despues antes de cerrar las comillas

Si eso es, creo, siempre así, en unix los argumentos van separados por un espacio.
Saludos.