Chrome OCX,Miniblink,VB6 chromium,Chrome core only one dll

**xiaoyao** · Feb 7th, 2021, 12:59 PM

download ocx

miniblinkx_ocx.zip
download node.dll from here:
https://github.com/weolar/miniblink49/releases
GitHub - imxcstar/vb6-miniblink-SBrowser: Miniblink control made with vb6 encapsulates all APIs of miniblink free version
https://github.com/imxcstar/vb6-miniblink-SBrowser

GitHub - weolar/miniblink49: a lighter, faster browser kernel of blink to integrate HTML UI in your app. A small, lightweight browser kernel to replace wke和libcef
https://github.com/weolar/miniblink49

Miniblink - Free small open source browser control
https://miniblink.net/index.html

Everyone has been waiting, miniblink is finally open sourced! ! - Know almost
https://zhuanlan.zhihu.com/p/22663686

Miniblink: the world's smallest Chrome-based browser control-VBForums
https://www.vbforums.com/showthread....ight=miniblink

test code:

Code:

SBrowser1.LoadHtml "<font color='red'>ocx test </font>"

SBrowser1.Visible = True
SBrowser1.LoadURL "http://www.baidu.com"
'"http://127.0.0.1:83/webForm.htm"

PLEASE input value or click by JAVASCRIPT:

Code:

Private Sub Command4_Click()
SBrowser1.RunJs "document.getElementById(""name1"").value='abc123'"
MsgBox "check"
SBrowser1.RunJs "document.getElementById(""submit1"").click()"
MsgBox "Web Form Value=" & SBrowser1.RunJs("return document.getElementById(""name1"").value")
End Sub

Carefully packaged, easy to call code：

Code:

Function GetValueByid(ID As String) As String
    GetValueByid = SBrowser1.RunJs("return document.getElementById(""" & ID & """).value")
End Function
Function ClickWebID(ID As String) As String
    ClickWebID = SBrowser1.RunJs("document.getElementById('" & ID & "').click();return 'ok'")
End Function
Function SetValueByid(ID As String, Value As String) As String
    SetValueByid = SBrowser1.RunJs("document.getElementById('" & ID & "').value='" & Value & "' ;return 'ok'")
End Function

Private Sub Command5_Click()
MsgBox "GetValueByid result=" & GetValueByid("name1")
MsgBox "SetValueByid result=" & SetValueByid("name1", "abc123")
 'MsgBox "ClickWebID result=" & ClickWebID("submit1")
MsgBox "ClickWebID('submit1') result=" & ClickWebID("submit1")
MsgBox "ClickWebID('submit2') result=" & ClickWebID("submit2")
End Sub

HTM CODE FOR TEST:
NEED SAVE HTM FILE WITH UTF8 FORMAT (<meta charset="UTF-8">)

Code:

<!DOCTYPE html>
  <html>
  <head>
  <meta charset="UTF-8">
  <script>
  function quzhi() {
  var text1 = document.getElementById("name1").value; //取得文本框的值
document.getElementById("name2").value=text1;
  alert(text1);//网页提示框
  }
 
  </script>
  </head>
  <body>
  <input type="text" id="name1" value="joy">
  <input type="text" id="name2" value="">
  <br />
  <input type="button" value="GetValue,Put to 'name2'" onclick="quzhi()" id="submit1">
  </body>
  </html>

download ocx

miniblinkx_ocx.zip

Thread: Chrome OCX,Miniblink,VB6 chromium,Chrome core only one dll

Thread Tools

Display

Threaded View

Chrome OCX,Miniblink,VB6 chromium,Chrome core only one dll

Posting Permissions