Ciao Star-Dust, ci siamo quasi,
ma non è ancora perfetto
anzitutto l'esempio che tu mi hai mandato dovrebbe servire per condividere i file.Infatti questo metodo l'avevo già utilizzato per spedire la mail.
A me serve visualizzare il pdf.
posto de esempi che funzionano al 90%
Esempio 1 (funziona solo se il visualizzatore è Acrobat) ho provato con altri visualizzatori e non riescono a mostrare a video il pdf
	
	
	
	
	
	
	
	
	
		   [/B]
If Not(rp.Check(rp.PERMISSION_WRITE_EXTERNAL_STORAGE)) Then
       'MsgboxAsync("E' need this permission because reasons so press Allow.", "Important info")
      ' Wait For Msgbox_Result (Result As Int)
       rp.CheckAndRequest(rp.PERMISSION_WRITE_EXTERNAL_STORAGE)
       Wait For Activity_PermissionResult (Permission As String, havePermission As Boolean)
       If havePermission = False Then
           ToastMessageShow("Sorry, can't continue, press button to try again.", True)
           Return
       End If
   End If
 
   Log("We have permission")
    Public shared As String
    shared = rp.GetSafeDirDefaultExternal("shared")
    File.Copy(File.DirAssets, "esempio.pdf", shared, "esempio_shared.pdf")
    Dim i As Intent
    i.Initialize(i.ACTION_VIEW, "content://" & File.Combine(shared,"esempio_shared.pdf"))
    i.SetType("application/pdf")
    i.Flags = 1 + 268435456
    StartActivity(i)
[B]
	 
	
	
		
	
 
Esempio 2 con l'utilizzo del file provider, funziona con tutti i visualizzatori, solo che è impostata la modalità STREAM e quindi mi presenta una lista di applicazioni Gmail, Whatsup ecc ecc in quanto cerca di condividere il file
	
	
	
	
	
	
	
	
	
		   [/B]
If Not(rp.Check(rp.PERMISSION_WRITE_EXTERNAL_STORAGE)) Then
       'MsgboxAsync("E' need this permission because reasons so press Allow.", "Important info")
      ' Wait For Msgbox_Result (Result As Int)
       rp.CheckAndRequest(rp.PERMISSION_WRITE_EXTERNAL_STORAGE)
       Wait For Activity_PermissionResult (Permission As String, havePermission As Boolean)
       If havePermission = False Then
           ToastMessageShow("Sorry, can't continue, press button to try again.", True)
           Return
       End If
   End If
   Log("We have permission")
    Public shared As String
    shared = rp.GetSafeDirDefaultExternal("shared")
    File.Copy(File.DirAssets, "esempio.pdf", shared, "esempio_shared.pdf")
    Dim in As Intent
    in.Initialize(in.ACTION_SEND, "")
   in.SetType("application/pdf")         'it is not related to the file itself.
' Io credo che il problema sia in questa riga ma non conosco le opzioni da inserire nel Intent.PutExtra
   in.PutExtra("android.intent.extra.STREAM",  CreateFileProviderUri(shared, "esempio_shared.pdf"))
   in.Flags = 1
    StartActivity(in)
[B]
	 
	
	
		
	
 
' Io credo che il problema sia in questa riga ma non conosco le opzioni da inserire nel Intent.PutExtra
   in.PutExtra("android.intent.extra.STREAM",  CreateFileProviderUri(shared, "esempio_shared.pdf"))
sai per caso dove posso reperirle ???
ci dovrebbe qualcosa tipo android.intent.extra.APRIFILE ecc