Salve, torno a scocciare, passo al dunque:
Attualmente lavoro a questo software
http://upload.centerzone.it/images/7gdmrj0f40s6ce3nygk.png
che dovrebbe eseguire la funzione di dh make e debuild binary, ma non ottengo risultati e nemmeno messaggi d'errore...
Dove sbaglio?
PUBLIC SUB Button6_Click()
DIM sOutput AS String
DIM emailadress AS String
DIM indirizzo AS String
indirizzo = DirChooser1.SelectedPath
emailadress = TextBox2.Text
SHELL "cd " & indirizzo & " " "dh_make - s - e " & emailadress & " -n --copyright gpl " WAIT TO sOutput
TextArea1.Text = sOutput
END
PUBLIC SUB Button10_Click()
DIM sOutput AS String
DIM debuildbinary2 AS String
debuildbinary2 = DirChooser1.SelectedPath
SHELL "cd" & debuildbinary2 & "debuild binary " WAIT TO sOutput
TextArea1.Text = sOutput
END
Secondo me il problema sta nel reindirizzare l'output del terminelae....
Dovresti fare in modo che il risultato del comando vada sull'output standard con 2>&1
SHELL "cd " & indirizzo & " " "dh_make - s - e " & emailadress & " -n --copyright gpl 2>&1" WAIT TO sOutput
Prova così:
SHELL "cd " & indirizzo & " ;dh_make - s - e " & emailadress & " -n --copyright gpl 2>&1" TO sOutput
WAIT
SHELL "dh_make -s -e " & stringa_email & " -n --copyright gpl"
Il problema risiede proprio nel fatto che effettivamente non ti sposti nella cartella dove sono i sorgenti...
SHELL "cd " & User.home &/ tua_cartella & " ; dh_make -s -e " & stringa_email & " -n --copyright gpl"
PUBLIC SUB Button6_Click()
DIM sOutput AS String
DIM emailadress AS String
DIM indirizzo AS String
indirizzo = DirChooser1.SelectedPath
emailadress = TextBox2.Text
SHELL "cd" & indirizzo & " && " & "dh_make -s -e " & emailadress & " && " & " -n --copyright gpl " WAIT TO sOutput
TextArea1.Text = sOutput
END
Quindi non trovo l'errore
Se non dici cosa fa, cosa non fa e che orrori ti restituisce il terminale non possiamo aiutarti in stile medium....prova così:
SHELL "cd " & indirizzo & ";" & " dh_make -s -e " & emailadress & " -n --copyright gpl" TO sOutput
WAIT