ivanomonti Expert Licensed User Longtime User Nov 25, 2014 #1 Hi, community b4i can start by calling code, the same for email, share, map!
Erel B4X founder Staff member Licensed User Longtime User Nov 25, 2014 #2 There is no intent system in iOS. You can send mails from your app: Mails and SMS messages Other specific apps might register for a custom url. See this page: http://wiki.akosma.com/IPhone_URL_Schemes Upvote 0
There is no intent system in iOS. You can send mails from your app: Mails and SMS messages Other specific apps might register for a custom url. See this page: http://wiki.akosma.com/IPhone_URL_Schemes
ivanomonti Expert Licensed User Longtime User Nov 26, 2014 #3 hi, I do not know if questop may be right to publish a post in your facebook page Code: dim s as string = "fb://publish/profile/#me?text=I love b4i" CallFacebookPublish(s) Code: Sub CallFacebookPublish(s As String) Dim app As Application If app.CanOpenUrl(s) Then app.OpenUrl(s) End Sub result null :-( Upvote 0
hi, I do not know if questop may be right to publish a post in your facebook page Code: dim s as string = "fb://publish/profile/#me?text=I love b4i" CallFacebookPublish(s) Code: Sub CallFacebookPublish(s As String) Dim app As Application If app.CanOpenUrl(s) Then app.OpenUrl(s) End Sub result null :-(
Erel B4X founder Staff member Licensed User Longtime User Nov 27, 2014 #4 Try to find Facebook documentation about this scheme. Upvote 0
ivanomonti Expert Licensed User Longtime User Nov 27, 2014 #5 following commands scheme fb, I can not send post problem > app.CanOpenUrl(s) = false ??? Code: ' facebook = fb://publish/?text=posso ospitare cani di media e grande taglia presso la mia abitazione publicato su job2go il 25112014140556 Dim s As String = "fb://publish/?text=" & colRoot.Get(3) & """ publicato su job2go il " & colRoot.Get(13) CallFacebookPublish(s) Code: Sub CallFacebookPublish(s As String) Dim app As Application If app.CanOpenUrl(s) Then app.OpenUrl(s) Else Dim mhud As HUD mhud.ToastMessageShow(s,True) End If End Sub Upvote 0
following commands scheme fb, I can not send post problem > app.CanOpenUrl(s) = false ??? Code: ' facebook = fb://publish/?text=posso ospitare cani di media e grande taglia presso la mia abitazione publicato su job2go il 25112014140556 Dim s As String = "fb://publish/?text=" & colRoot.Get(3) & """ publicato su job2go il " & colRoot.Get(13) CallFacebookPublish(s) Code: Sub CallFacebookPublish(s As String) Dim app As Application If app.CanOpenUrl(s) Then app.OpenUrl(s) Else Dim mhud As HUD mhud.ToastMessageShow(s,True) End If End Sub
ivanomonti Expert Licensed User Longtime User Nov 27, 2014 #6 interesting source > http://getsharekit.com/docs/#text Upvote 0
ivanomonti Expert Licensed User Longtime User Nov 27, 2014 #7 HI, using all of the examples, the pattern fb does not pass, it always returns false Code: Dim s As String = "fb://publish/profile/me?text=" & colRoot.Get(3) & " publicato su job2go il " & colRoot.Get(13) CallFacebookPublish(s) Sub CallFacebookPublish(s As String) Dim app As Application If app.CanOpenUrl(s) Then app.OpenUrl(s) Else Dim mhud As HUD mhud.ToastMessageShow(s,True) End If End Sub app = Not initialized. Last edited: Nov 27, 2014 Upvote 0
HI, using all of the examples, the pattern fb does not pass, it always returns false Code: Dim s As String = "fb://publish/profile/me?text=" & colRoot.Get(3) & " publicato su job2go il " & colRoot.Get(13) CallFacebookPublish(s) Sub CallFacebookPublish(s As String) Dim app As Application If app.CanOpenUrl(s) Then app.OpenUrl(s) Else Dim mhud As HUD mhud.ToastMessageShow(s,True) End If End Sub app = Not initialized.
Erel B4X founder Staff member Licensed User Longtime User Nov 27, 2014 #8 Is Facebook installed on your device? Upvote 0
ivanomonti Expert Licensed User Longtime User Nov 27, 2014 #10 Also putting the url encoding same problem app = Not initialized. Code: Sub CallFacebookPublish(s As String) Dim su As StringUtils s = su.EncodeUrl(s,"UTF8") Dim app As Application If app.CanOpenUrl(s) Then app.OpenUrl(s) Else Dim mhud As HUD mhud.ToastMessageShow(s,True) End If End Sub Upvote 0
Also putting the url encoding same problem app = Not initialized. Code: Sub CallFacebookPublish(s As String) Dim su As StringUtils s = su.EncodeUrl(s,"UTF8") Dim app As Application If app.CanOpenUrl(s) Then app.OpenUrl(s) Else Dim mhud As HUD mhud.ToastMessageShow(s,True) End If End Sub
Erel B4X founder Staff member Licensed User Longtime User Nov 27, 2014 #11 App is a special object. It doesn't need to be initialized. It is also a mistake to url encode the whole string as you break it. Upvote 0
App is a special object. It doesn't need to be initialized. It is also a mistake to url encode the whole string as you break it.
ivanomonti Expert Licensed User Longtime User Nov 27, 2014 #12 not that this is incompatible with ipad Upvote 0
ivanomonti Expert Licensed User Longtime User Nov 27, 2014 #13 I can not explain Erel, all commands fb:// do not go, as if they were incompatible Upvote 0
Erel B4X founder Staff member Licensed User Longtime User Nov 27, 2014 #14 Search for Facebook documentation about this. It is probably a private "api" which they changed. Upvote 0
Pendrush Well-Known Member Licensed User Longtime User Mar 21, 2015 #15 No solution for FB share without their SDK Upvote 0
valentino s Active Member Licensed User Longtime User Dec 16, 2015 #16 I've made this two working tests: Code: WebView1.LoadHtml("<a href='fb://profile'>test</a>") and Code: App.OpenUrl("fb://profile") fb://post/ doesn't work as it is written here: http://wiki.akosma.com/IPhone_URL_Schemes However this works: Code: WebView1.LoadHtml("<a href='https://www.facebook.com/sharer/sharer.php?u=encodedurl&t=encodedtext'>test</a>") Upvote 0
I've made this two working tests: Code: WebView1.LoadHtml("<a href='fb://profile'>test</a>") and Code: App.OpenUrl("fb://profile") fb://post/ doesn't work as it is written here: http://wiki.akosma.com/IPhone_URL_Schemes However this works: Code: WebView1.LoadHtml("<a href='https://www.facebook.com/sharer/sharer.php?u=encodedurl&t=encodedtext'>test</a>")