19/05/2023: A causa di un errore sono stati cancellati, insieme ad account creati da bot, alcuni account legittimi. Si prega di leggere qui: https://www.gambas-it.org/smf/index.php?topic=9733.0
PUBLIC SUB Button1_Click()IF NOT Exist(DirView1.Current & "/csv2ov2") THENCOPY user.home & "/.poiconvert/csv2ov2" TO DirView1.Current & "/csv2ov2" 'copio il file nella cartella di destinazione come richiesto dallo scriptWAIT ENDIF SHELL "cd " & DirView1.Current 'sposto la shell nella cartella richiesta dallo scriptSHELL "chmod +x " & DirView1.Current & "/csv2ov2" 'rendo eseguibile lo script'SHELL "dir " & DirView1.Current 'prova per vedere se la shell punta a quella directorySHELL DirView1.Current & "/csv2ov2" ' eseguo lo script'WAIT FileView1.Refresh 'aggiorno le liste dei file FileView2.Refresh 'codice dove elimino il file creato per la conversione END
#!/bin/bash## csv2ov2## traduzione files punti di interesse da formato csv a formato ov2 per tomtom## i files da tradurre devono essere nella cartella di questo script## i files ov2 saranno creati nella medesima cartella## bopecho > temp1echo >> temp1echo >> temp1echo >> temp1 # creo un file con 4 righe vuotefor file in `ls *.csv ` ; do # per ogni elemento della directory corrente ... a=${#file} # lunghezza nome file let 'b = a - 4' # calcola lunghezza nome file senza estensione noext=${file:0:b} # estrae nome file senza estensione echo sto processando $noext cat temp1 $file > temp2 # aggiunge le 4 righe in testa al file (necessario a gpsbabel) gpsbabel -i tomtom_asc -f temp2 -o tomtom -F $noext.ov2 # trasforma in formato per tomtomdonerm -f temp1 temp2 # elimina files temporanei## eop
e come si concatenano più comandi SHELL???
PUBLIC SUB Button1_Click()IF NOT Exist(user.Home & "/csv2ov2") THENCOPY user.home & "/.poiconvert/csv2ov2" TO User.Home & "/csv2ov2" 'copio il file script nella cartella homeWAIT ENDIF COPY DirView1.Current & "/" & FileView1.Current TO user.Home & "/" & FileView1.Current 'copio anche il file interessato nella home come richiesto dallo scriptWAIT SHELL "chmod +x csv2ov2" 'rendo lo script eseguibileWAIT SHELL "./csv2ov2" 'lancio lo scriptWAIT SHELL "rm -f csv2ov2 " & FileView1.Current 'elimino i file usati per la conversioneWAIT FileView2.Reload Message.Info("Conversione Effettuata") END
più chiaro di così non si poteva... grazie mille
oppure execnon execute
Exec ["umount -t smbs /mnt/pippo"]
shell "gksudo umount -t smbs /mnt/pippo"