Per verifica ho fatto comparire la variabile a monitor con il comando msgbox, e la stringa risulta corretta, ma mi sembra che comunque il comando non viene lanciato.
per cercare di avere qualche riscontro ho aggiunto il maggiore (>) alla fine del mio comando per vere l'output del comando su un file, ma il file non viene scritto
qualcuno ha qualche idea?
Codice: Seleziona tutto
Sub at (oEvent as variant )
dim pippo2 as string
dim comando as string
dim file2 as string
dim file as string
dim file1 as string
dim pro as string
file=thisComponent.DrawPage.forms.Commessa.Documenti.getByName("percorso").currentValue
pro=thisComponent.DrawPage.forms.Commessa.Documenti.Protocollo.getByName("Protocollo").currentValue
file2=ConvertFromUrl( file )
file1="'" + file2 + "'"
file3=pro + " " + file1
comando=("/usr/bin/xattr -w com.apple.metadata:kMDItemFinderComment " + file3 + " >/Users/antoniomantica/prova" )
msgbox (comando)
shell (comando)
End Sub