求教DCef3的chrome浏览器如何实现网站自动登录

Question

求教DCef3的chrome浏览器如何实现网站自动登录

Answer 1

//   执行一下 JavaScript 就可以了
procedure TMyFrm.Chromium1LoadEnd(TObject *Sender, ICefBrowser * const browser, ICefFrame * const frame, int httpStatusCode);
var 
 JScript : String;
begin
  //  登录 CSDN
  if Chromium1.DocumentURL.IndexOf('http://passport.csdn.net/accout/login?') = 0 then  //  检查URL是否CSDN登录页
  begin
    JScript := 'document.getElementById("username").value="csdn";';                       //  输帐号
    JScript := JScript + 'document.getElementById("password").value="123456";';    //  输密码
    JScript := JScript + 'document.getElementsByClassName("logging")[0].click();";  //  以上的帐号密码正确这个点击就能登录进去
    Chromium1.ExecuteJavaScript(JScript, '', 0);   //  执行以上的脚本
  end;
end;