B4A Library Share Library - Beta!

Hi folks,

This has been raised many times on the forum, unfortunately the intent library in B4A seems to have problems placing images as attachment.

Please find attached a new share library.

This library has the option to show the share window, and I've tested it works with following:

Facebook
Twitter
Messaging
Picasa
WhatsApp
Email client

It does not work with the default GMail (Google Mail) app. I've searched online and it is an issue with GMail app itself I think (many people have raised similar issue). Will keep looking for a solution.

It also lessens down the share code for images to 2 lines

I need your help in testing this library!

Please feedback whether it works or not.

Sample code:

Dim share As MESShareLibrary
share.sharebinary("file:/" & File.DirDefaultExternal & "/Image1.png", "image/png", "Do you see this?")

Enjoy!

-Bill

 

[vb1992]

Nice work, have you tried to also pass text message along with the image?

That would be helpful in many ways.

Something like this

Dim share As MESShareLibrary

share.sharebinary("Visit basic4ppc.com today","file:/" & File.DirDefaultExternal & "/Image1.png", "image/png", "Do you see this?")

 

[vb1992]

Tested and worked for:

-Facebook
-Text/Sms attachment
-Gmail - (google mail app) (yes mine worked!)


Failed:

-Yahoo Mail app

 

[ssg]

Hi vb1992,

Thanks for testing. Strange that it works with your Gmail. Did you try sending the mail out? On my device, in the compose screen it shows the attachment, but when I click send, the email does not attach the file.

Also good suggestion about the text part. Gimme some time to add that in!

Cheers!

 

[vb1992]

1) The Yahoo error is:

"Read access denied."

2) Gmail, yes it attached, but I should have hit send, I just did, and you are correct, no attachment made it to the receiving end.

3) I think the biggest thing is that you are able to connect to the Facebook App, regular intents were bringing me to a web browser to add the photo to facebook, while your library brings up the facebook app, that alone is awesome, since we live in a facebook sharing world

 

[ssg]

No idea whats the issue with yahoo and gmail... hmm...

And yep... I badly needed this for facebook (and twitter) sharing...

Cheers!

 

[ssg]

Ok, this is the CAPITAL of weirdness!

if you use "file:///bla bla bla" (with 3 slashes instead of 2), the file gets attached to the gmail and it can be sent out!!!

what a shocker!

Please try to test with 3 slashes on other apps and report in! It works for twitter and facebook too!!

Mucho Gracias!

 

[magarcan]

Nice!! I was waiting for some like this.

Thanks for your job :sign0060:

 

[ssg]

Hi all,

Library in first post updated with 1 extra parameter for text.

Pass in empty string if you dont wanna use it.

The text auto fills in your email content or your twitter message (not working with facebook somehow)...

Give it a test!

Goodest luck!

 

[vb1992]

Nice let me test it out fully, with text, and extra /

 

[ssg]

For those who cant get the library to work.. here is how to call it:

Dim share As MESShareLibrary
share.sharebinary("file://" & File.DirDefaultExternal & "/picture1.png", "image/png", "Share the love!", "This is the text to go in the body!")

Please let me know if you're having trouble launching the intents with this..

Cheers!

 

[Dave O]

Great stuff, just added a "Share" menu item to my first app with 2 lines of copied code.

Thanks!

 

[ssg]

Great! now you should "share" you app with us

Cheers!

 

[Jack Cole]

It seems to have some problems. For Google+, it will share the message text but no image. Facebook, it pulls the image but no text. Gmail seems to work.

 

[ssg]

I think lots of people are having issues with facebook's text sharing thing. There seems to be an issue with it.

Are you able to share text via the standard share feature in B4A?

It might be that Facebook and Google+ need some different type of texts set up to share.

 

[Jack Cole]

I've not yet tried just sharing text using the intent method on Facebook. It does seem to be a widespread issue. I did find one place that said adding this worked:

shareCaptionIntent.putExtra(Intent.EXTRA_TITLE, "my awesome caption in the EXTRA_TITLE field");

I don't know if that could be put into your library or not.

 

[ssg]

I tried adding that intent... seems to be launching the browser.

Attached a sample if you could give it a try (don't have a proper program to test with now), use the new title parameter.

Cheers!

 

[Jack Cole]

Didn't seem to do anything different. Thanks for trying though. Here is where I was reading about it.

 

[ssg]

Hmm... no idea why it doesn't work.. will test it more soon, hope can get it to work.

Cheers!

 

[Omar]

No Attachment

Hey ssg,

I tried the attachment option with both double and triple slashes but unfortunately there was no attachment with Gmail.

Although it shows the attachment as added to the message, it is not actually sent with the message which is strange.