#Region Project Attributes
#ApplicationLabel: DrpBx.Test
#VersionCode: 1
#VersionName:
'SupportedOrientations possible values: unspecified, landscape or portrait.
#SupportedOrientations: unspecified
#CanInstallToExternalStorage: False
#AdditionalJar:dropbox-android-sdk-6.0.0.aar
#AdditionalJar:dropbox-core-sdk-6.0.0
#AdditionalJar: androidx.legacy:legacy-support-core-utils
#AdditionalJar: jackson-core-2.7.4.jar
#MultiDex: true
#End Region
Sub Process_Globals
Dim auth As DbxAuth
Dim Dropbox As DropboxV2
Dim client As DbxClientV2
Dim config As DbxRequestConfig
Dim dbxFiles As DbxUserFilesRequests
Dim dbxSharing As DbxUserSharingRequests
Dim dbxUsers As DbxUserUsersRequests
Dim token As String
Dim dbxPath As String = "Apps\DrpBx.Test\SubFolder\"
Dim MyPath As String=File.DirInternal
Dim MyFile As String ="TestLogfile.txt"
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("Layout")
auth.Initialize("App_Key")
dummy = "sl.BuNxatYjIkXBIN ... etc" .....Short term token from "auth.startOAuth2Authentication"
If dummy <> "" Then
token = dummy
Log("Token available (Activity Create. Try to enable Dropbox with this token")
config.Initialize("",token,"de-de",5)
Dim dbxhost As DbxHost
dbxhost.Initialize
client.Initialize("Dropbox",config,token,dbxhost)
dbxFiles = client.files
dbxFiles.setEventname("dbxFiles")
dbxSharing = client.sharing
dbxSharing.setEventname("dbxSharing")
dbxUsers = client.users
dbxUsers.setEventname("dbxUsers")
DropboxEnabled = True
Else
DropboxEnabled = False
End If
Dropbox.Initialize("")
End Sub