Been trying to solve this using content resolvers and feeling really silly as cannot get any working.
The line in provided code to link to the normal non samsung browser:
Dim cr As Cursor = r.RunStaticMethod("android.provider.Browser", "getAllVisitedUrls", Array As Object(r.Target), _
Array As String("android.content.ContentResolver"))
obviously needs replacing, I have tried all the differences I can think of, ie:
Dim cr As Cursor = r.RunStaticMethod("android.app.sbrowser", "history", Array As Object(r.Target), _
Array As String("android.content.ContentResolver"))
and the b4a application crashes every time at this line. I have tried replacing android.app.sbrowser with all manner of strings ie com.sec.android.app.sbrowser, android.provider.sbrowser from the samsung help page and sure its something I have not totally understood about contentresolvers but still cannot get it working.