Hola descargando un archivo de forma correcta y luego intento copiarlo y a pesar de que verifico antes que exista y SI existe por que me da el mensaje desde el código obtengo este error ...
CODIGO:
CODIGO:
B4X:
Sub dd_Complete(Job As HttpJob)
Job.Release
ProgressDialogHide
If Job.Success=True Then
If Main.dbSQL.IsInitialized Then
Main.dbSQL.Close
End If
Try
If Not(File.Exists(File.DirInternalCache, "comercios.rar")) Then
'el flujo del código pasa por aqui por lo que el archivo existe
Msgbox("existe","")
Else
Msgbox("NO existe","")
End If
File.Copy(File.DirInternalCache, "comercios.rar", File.DirInternal, "comercios.rar")
Msgbox("Actualizado correctamente ","")
Catch
Msgbox(LastException,"")
End Try
Else
Msgbox("Fallo la actualización","")
End If
Activity.Finish
End Sub