iOS Question Posting to Facebook

[GEoffT]

I have scoured the Forum and tried several things, but still can't post to Facebook in B4i. Had no problems in B4a.

I have tried the both ways in the code below

first method gives me
-canOpenURL: failed for URL: "(null)" - error: "Invalid input URL"
second does nothing

Any help gratefully received

            Dim su As StringUtils
            Dim s As String
           
            s= "fb://publish/profile/#me?text=iphone Test"
            Dim app As Application
            If app.CanOpenUrl(s) Then
                app.OpenUrl(s)
                Log ("s = " & s)
            Else
                Dim mhud As HUD
                mhud.ToastMessageShow(s,True)
            End If

'  OR

            Dim WebView1 As WebView
            WebView1.Initialize("webface")
            WebView1.LoadHtml("<a href='https://www.facebook.com/sharer/sharer.php?u=encodedurl&t=encodedtext'>iphone test</a>")

 

[Erel]

Have you added fb to the #QueriesScheme: https://www.b4x.com/android/forum/threads/ios-9-important-changes.59457/ ?

 

[GEoffT]

Yes I have Erel. I get the following message logged.

-canOpenURL: failed for URL: "(null)" - error: "Invalid input URL"

 

[Erel]

You need to URL encode the text value.

Dim s As String = $"fb://publish/profile/#me?text=${su.EncodeUrl("iphone Test", "UTF8")}"$

 

[GEoffT]

Thanks Erel.....still not posting to wall, but it is opening facebook! Onwards and upwards

 

[GEoffT]

Sorry Erel, I think I am being stupid.......

I am trying the similar as above with Twitter (code below) .

I didn't think I needed a #QueriesSchemes for https and yet app.CanOpenUrl is returning false

        Case "T"
            Dim s As String
            Dim su As StringUtils
            s= $"https://twitter.com/intent/tweet?text=${su.EncodeUrl(message, "UTF8")}"$
       
            Log ("s = " & s)
            If app.CanOpenUrl(s ) Then
                app.OpenURL(s)
            Else
                Dim mhud As HUD
                mhud.ToastMessageShow(s ,True)
                Log ("s = " & s)
            End If

 

[Erel]

I've tested it with this code:

Log(App.CanOpenURL($"https://twitter.com/intent/tweet?text=test"$))

It returns true.

Note that you don't need to check CanOpenUrl for https.