Salve a tutti, dovrei scaricare un file a mezzo ftp (Filezilla server), questo il codice che uso:
Dim sh As new shell
Dim failed As Boolean = false
dim cmd, retcode as String
’ Versione curl
Cmd=“cd C:\temp” + EndOfLine +“C:\bin\cURL -O -u ftpuser:ftpuser ftp://127.0.0.1/certificate/certificate.pfx”
’ Versionw wget
Cmd =“cd c:\temp” + EndOfLine + “wget ftp://ftpuser:ftpuser@127.0.0.1/certificate/certificate.pfx”
app.DoEvents
sh.Mode = 0
sh.Execute cmd
retcode=sh.Result
if (sh.ErrorCode<>0) then failed=true
retcode=ReplaceLineEndings(retcode,EndOfLine.Windows)
if left(retcode,7)=“cURL: (” then failed=true
return failed
ma in entrambi i casi (curl o wget) con Xojo non danno nessun risultato mentre da shell le linee di comando funzionano perfettamente: UAC disabilitato, qualcuno sa darmi una spiegazione al perch non riesco a scaricare il file con questo codice?
Grazie.