Private Sub AdvancedWebView1_onPageError(errorCode As Int, description As String, failingUrl As String)
If failingUrl.Contains("whatsapp")Then
Dim Intent1 As Intent
Intent1.Initialize(Intent1.ACTION_VIEW, failingUrl)
StartActivity(Intent1)
End If
End Sub