Hello. Thank you for your help for new users.
I need to share a txt file by bluetooth and other aps in my phone, and I been reading all about it and couldn't find a solution.
I found this that opens many apps to share with, in my phone, but not the bluetooth option.
Dim share As MESShareLibrary
share.sharebinary("file://" & File.DirRootExternal & "/SipAsistencia/Asistencia/"&Main.cursoelegido&"_"&Main.day&Main.month&Main.year&".txt", "text/txt", "Share the love!", "This is the text to go in the body!")
This other code seems to be more apropiate, and shows bluetooth and all other apps to share, but it sends an html file with the txt file name included, instead of the txt file
Dim share As Intent
Dim archivo As String = "file://" & File.DirRootExternal &"/SipAsistencia/Asistencia/1A2016_16112016.txt"
share.Initialize(share.ACTION_SEND,"")
share.SetType("text/plain")
share.PutExtra("android.intent.extra.TEXT", archivo)
share.WrapAsIntentChooser("Share text via")
StartActivity(share)
Could someone help me with this?
I need to share a txt file by bluetooth and other aps in my phone, and I been reading all about it and couldn't find a solution.
I found this that opens many apps to share with, in my phone, but not the bluetooth option.
Dim share As MESShareLibrary
share.sharebinary("file://" & File.DirRootExternal & "/SipAsistencia/Asistencia/"&Main.cursoelegido&"_"&Main.day&Main.month&Main.year&".txt", "text/txt", "Share the love!", "This is the text to go in the body!")
This other code seems to be more apropiate, and shows bluetooth and all other apps to share, but it sends an html file with the txt file name included, instead of the txt file
Dim share As Intent
Dim archivo As String = "file://" & File.DirRootExternal &"/SipAsistencia/Asistencia/1A2016_16112016.txt"
share.Initialize(share.ACTION_SEND,"")
share.SetType("text/plain")
share.PutExtra("android.intent.extra.TEXT", archivo)
share.WrapAsIntentChooser("Share text via")
StartActivity(share)
Could someone help me with this?
Last edited: