Sub Process_Globals
'These global variables will be declared once when the application starts.
'These variables can be accessed from all modules.
Private manager As DbxAccountManager
Private key As String = "n4lxziw"
Private secret As String = "3wzun"
End Sub
Sub Globals
Private Button1 As Button
End Sub
Sub Activity_Create(FirstTime As Boolean)
If FirstTime Then
Log("START")
manager.Initialize(key, secret, "manager")
End If
Activity.LoadLayout("1")
End Sub
Sub Activity_Pause (UserClosed As Boolean)
End Sub
Sub Button1_Click
manager.LinkAccount
End Sub
Sub Manager_AccountReady (Success As Boolean)
ToastMessageShow ("Account Ready: " & Success,False)
If Success Then
For Each FileInfo As DbxFileInfo In manager.ListFiles("/")
Log(FileInfo.Name & ", " & FileInfo.IsFolder)
Next
End If
'manager.DownloadFile("/", "somefile", File.DirRootExternal, "somefile")
End Sub