Spanish upload file con sftp

Buenos días, alguien podrá darme alguna pista.
Estoy tratando de armar una aplicación que saque una foto y suba esta a una carpeta de un servidor con sftp.
Para ver de armar esto, utilice un ejemplo que hace Erel en
https://www.b4x.com/android/forum/threads/android-sftp-based-on-jsch-tutorial.26994/
el programa no tira errores pero no sube la foto como esperaba.
Alguien me puede orientar donde me estoy equivocando

ub Process_Globals
Dim sftp1 As SFtp
End Sub

Sub Globals
Dim ListView1 As ListView
Dim arch As String
End Sub

Sub Activity_Create(FirstTime As Boolean)
If FirstTime Then
sftp1.Initialize("sftp1", "user", "pass", "ip", 22)
sftp1.SetKnownHostsStore(File.DirRootExternal,"clave.txt")
End If
Activity.LoadLayout("1")
sftp1.UploadFile (File.DirRootExternal ,"foto.jpg","/fotocel/")
End Sub


Sub sftp1_PromptYesNo (Message As String)
Dim res As Int = Msgbox2(Message, "", "Yes", "", "No", Null)
sftp1.SetPromptResult(res = DialogResponse.POSITIVE)
End Sub

Sub Activity_Resume
sftp1.Activity_Resume
End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

Sub sftp1_ShowMessage (Message As String)
Msgbox(Message, "")
End Sub

Sub Button1_Click
sftp1.CloseNow
ExitApplication
End Sub

Ese es un ejemplo de conexión sftp, te faltan cosas, como manejar el evento EventName_UploadCompleted.

En este hilo tienes un ejemplo completo de como hacerlo.

https://b4x.com/android/forum/threads/android-sftp-based-on-jsch-tutorial.26994/page-2

Hola dar2o3, gracias por la respuesta.
Ya había estado mirando ese ejemplo y tampoco conseguí que funcione
Voy a mirarlo nuevamente, gracias