09-02-2021, 04:51
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
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