iOS Question I Need help to open external link from webView

[LusazDeveloper]

Hi. I am building an iOS app that has a webview and inside it will show a web page in which there's a link that must open a external app when it's clicked. I did it already in Android with Don Manfred's help. https://www.b4x.com/android/forum/threads/open-external-link-in-default-browser.104700/post-656209
That is exactly what I need but for iOS. It seems that there is not a PhoneIntents library in b4i. How can I solve it?

 

[mcqueccu]

Using B4XPages, and in other modules you can use. App is declared in the Main Module already

If Main.App.CanOpenURL(url) Then Main.App.OpenURL(url)

 

[LusazDeveloper]

Thank you so much @mcqueccu It works but not at all for me. The url parameter captures the wrong page. I mean it should capture the link inside a webview (for example and <a href="something.html"></a>), instead the webview_OverrideUrl(Url As String) method is sending me to see the same page (out in safari) that is already set into the webview.

PD: I think that it is because I call the webview.loadUrl in the creation of the page. But I'm not pretty sure.

 

[Erel]

What is the output of Log(Url)?

 

[LusazDeveloper]

This is the output of Log(Url)

https://200.31.1.1/umbral/umbralX/sis/reportes/agenda_alumno_movil.php?ce=200&anio=2024&codigo=A39

I changed the ip for obvious reasons. But as I was explaining to @mcqueccu that is the link that should be loaded first in the webview. When the webview_OverrideUrl method executes it takes me to that direction out in Safari.

Private Sub B4XPage_Created (Root1 As B4XView)
    Root = Root1
    'load the layout to Root
    Root.LoadLayout("Menu")
    B4XPages.SetTitle(Me,"Menu")
    B4XPages.GetManager.LogEvents = True
    
    Agenda.Initialize("Agenda")
    Agenda.RootPanel.LoadLayout("AgendaPage")
    
    TabPages.Initialize   
    InitPages
    
    CargarAgenda
End Sub

Sub CargarAgenda   
    wvAgendaTab.LoadUrl("https://"&cualURL&"/sis/reportes/agenda_alumno_movil.php?ce="&codigo_centro_educativo&"&anio="&anio_lectivo&"&codigo="&codigo_alumno)
End Sub

Sub wvAgendaTab_OverrideUrl (Url As String) As Boolean   
    If Main.App.CanOpenURL(Url) Then Main.App.OpenURL(Url)
    Return True
End Sub

 

[Erel]

Don't open the url automatically.
You need to let the user click on the link and then open it.

Start with this code to understand how this event works:

Sub wvAgendaTab_OverrideUrl (Url As String) As Boolean   
    Log(url)
    Return False
End Sub

 

[LusazDeveloper]

Thanks a lot @Erel . I finally understood how it works and figured it out. Since the secondary page url starts with a diferent string, to prevent the first page from loading automatically I used:

Sub wvAgendaTab_OverrideUrl (Url As String) As Boolean
    If Url.StartsWith("https://200") Then Return False
    Main.App.OpenURL(Url)       
End Sub