文件已上传：https://www.pan38.com/share.php?code=XHUZM 提取码：8888
整浏览器控制流程，包含启动参数配置、Cookie枚举解析、JSON格式转换和状态监控功能16。使用时需配合队长模块和E2EE支持库，通过9222调试端口实现浏览器控制47。代码中特别处理了HttpOnly和Secure等安全属性，确保完整提取百度登录态Cookie69。
.版本 2
.支持库 e2ee
.支持库 spec
.程序集 窗口程序集启动窗口
.程序集变量 局标签页组, 队长标签页组
.程序集变量 局浏览器路径, 文本型
.程序集变量 局_配置文件, 文本型
.子程序 _启动窗口创建完毕
局浏览器路径 ＝ 取运行目录 () ＋ “\chrome.exe”
局配置文件 ＝ 取运行目录 () ＋ “\config.ini”
.如果真 (文件是否存在 (局浏览器路径) ＝ 假)
信息框 (“未检测到chrome浏览器，请放置chrome.exe到程序目录”, 0, , )
结束 ()
.如果真结束
按钮刷新Cookie.禁止 ＝ 真
按钮_置入Cookie.禁止 ＝ 真
.子程序 按钮启动浏览器被单击
.局部变量 局启动参数, 文本型
.局部变量 局_是否成功, 逻辑型
局_启动参数 ＝ “--remote-debugging-port=9222 --user-data-dir=” ＋ 局_配置文件
局_是否成功 ＝ 局_标签页组.创建 (局_浏览器路径, 局_启动参数, , , , )
.如果 (局_是否成功)
按钮_刷新Cookie.禁止 ＝ 假
按钮_置入Cookie.禁止 ＝ 假
标签_状态.标题 ＝ “浏览器已启动，准备获取Cookie”
.否则
信息框 (“浏览器启动失败，请检查路径”, 0, , )
.如果结束
.子程序 按钮刷新Cookie_被单击
.局部变量 局json, zyJsonValue
.局部变量 局数量, 整数型
.局部变量 cookies列表, 队长_Cookie数据, , "0"
.局部变量 计次a, 整数型
.局部变量 g, 文本型
.局部变量 i, 整数型
.局部变量 列表, 存取列表
.局部变量 jsonck, 文本型
局_json.创建 (, , , , )
局_数量 ＝ 局_标签页组[1].ck_枚举 (, cookies列表)
.计次循环首 (取数组成员数 (cookies列表), i)
列表.置值 (“//[” ＋ 到文本 (i) ＋ “].name”, cookies列表[i].name)
列表.置值 (“//[” ＋ 到文本 (i) ＋ “].path”, cookies列表[i].path)
列表.置文本 (“//[” ＋ 到文本 (i) ＋ “].value”, cookies列表[i].value)
列表.置文本 (“//[” ＋ 到文本 (i) ＋ “].domain”, cookies列表[i].domain)
列表.置双精度小数 (“//[” ＋ 到文本 (i) ＋ “].expires”, cookies列表[i].expires)
列表.置长整数 (“//[” ＋ 到文本 (i) ＋ “].size”, cookies列表[i].size)
列表.置逻辑值 (“//[” ＋ 到文本 (i) ＋ “].httpOnly”, cookies列表[i].httpOnly)
列表.置逻辑值 (“//[” ＋ 到文本 (i) ＋ “].session”, cookies列表[i].session)
列表.置逻辑值 (“//[” ＋ 到文本 (i) ＋ “].secure”, cookies列表[i].secure)
.计次循环尾 ()
jsonck ＝ 列表.到JSON (假, , , , )
编辑框_Cookie数据.内容 ＝ jsonck
标签_状态.标题 ＝ “已获取” ＋ 到文本 (局_数量) ＋ “条Cookie数据”
.子程序 按钮置入Cookie_被单击
.局部变量 cookies, 文本型
.局部变量 列表, 存取列表
.局部变量 i, 整数型
cookies ＝ 编辑框_Cookie数据.内容
.如果真 (cookies ≠ “”)
列表.从JSON载入 (cookies, , , , )
.计次循环首 (列表.取数量 (“//”), i)
局_标签页组[1].ck_设置 (
列表.取文本 (“//[” ＋ 到文本 (i) ＋ “].name”, “”),
列表.取文本 (“//[” ＋ 到文本 (i) ＋ “].value”, “”),
列表.取文本 (“//[” ＋ 到文本 (i) ＋ “].domain”, “”),
列表.取文本 (“//[” ＋ 到文本 (i) ＋ “].path”, “/”),
列表.取双精度小数 (“//[” ＋ 到文本 (i) ＋ “].expires”, 0),
列表.取逻辑值 (“//[” ＋ 到文本 (i) ＋ “].httpOnly”, 假),
列表.取逻辑值 (“//[” ＋ 到文本 (i) ＋ “].secure”, 假)
)
.计次循环尾 ()
信息框 (“Cookie置入完成”, 0, , )
.如果真结束
.子程序 按钮访问百度被单击
局标签页组[1].跳转 (“https://www.baidu.com”, , , )
标签_状态.标题 ＝ “正在访问百度...”
.子程序 按钮清除Cookie被单击
局标签页组[1].ck_清除 (, , )
编辑框Cookie数据.内容 ＝ “”
标签状态.标题 ＝ “Cookie已清除”
.子程序 _启动窗口将被销毁
局_标签页组.销毁 (, , )
