You're gonna laugh Sorex - but forgive my inadequacies
Where be the CSV? HIHIHI
Where be the CSV? HIHIHI
Sub Globals
Private WebCaptcha As WebView
Dim ww As WebViewExtras
Dim Javascript As String
End Sub
Sub Activity_Create(FirstTime As Boolean)
WebCaptcha.Initialize("webCaptcha")
Activity.AddView(WebCaptcha,0,0,100%x,100%y)
ww.addJavascriptInterface(WebCaptcha,"B4A")
Dim html As String=File.ReadString(File.DirAssets,"src.html")
WebCaptcha.LoadHtml(html)
End Sub
Sub webCaptcha_PageFinished (Url As String)
Javascript="B4A.CallSub('Process_HTML', false, document.documentElement.outerHTML)"
ww.executeJavascript(WebCaptcha, Javascript)
End Sub
Sub Process_Html(Html As String)
Dim m As Matcher
Html=Html.ToLowerCase.Replace(Chr(0x22),"").Replace(CRLF," ").Replace(Chr(13),"").Replace(">"," >")
m = Regex.Matcher("<iframe[^>]*src=(.*?) ", Html)
Do While M.Find
Log("Found: " & M.Group(1))
Loop
End Sub
<!DOCTYPE html>
<html>
<body>
<iframe src="http://www.ibm.com"></iframe>
<iframe id=myframe src="http://www.google.com" width=666></iframe>
<iframe
id=myframe
src="https://www.b4x.com"
width=666
></iframe>
</body>
</html>
I get logged out when I skip to another page randomly