刚好有需要将协议登录返回set-cookie里的ck导入到ads中,经过研究来给大家发下我的解决办法: 试了一下自用ok,发出来分享一下,如有问题欢迎指正! .版本 2 .子程序 _cks2json_forBrowser, 文本型 .参数 lpcks, 文本型, 数组 .参数 domain, 文本型 .局部变量 json, zyJsonValue .局部变量 arr, 文本型, , "0" .局部变量 arr2, 文本型, , "0" .局部变量 x .局部变量 i, 整数型 .局部变量 value, 文本型 json.创建 (, , , , ) .计次循环首 (取数组成员数 (lpcks), i) arr = 分割文本 (子文本替换 (lpcks <i>, “; ”, “;”, , , 真), “;”, ) .计次循环首 (取数组成员数 (arr), x) arr2 = 分割文本 (arr [x], “=”, ) .如果 (x = 1) .如果 (取数组成员数 (arr2) = 2) json.置文本 (“[” + 到文本 (i - 1) + “].name”, arr2 [1]) json.置文本 (“[” + 到文本 (i - 1) + “].value”, arr2 [2]) .否则 json.置文本 (“[” + 到文本 (i - 1) + “].name”, arr2 [1]) json.置文本 (“[” + 到文本 (i - 1) + “].value”, “”) .如果结束 json.置文本 (“[” + 到文本 (i - 1) + “].domain”, domain) .否则 .如果真 (取数组成员数 (arr2) = 2) json.置文本 (“[” + 到文本 (i - 1) + “].” + arr2 [1], arr2 [2]) .如果真结束 .如果结束 .计次循环尾 () .计次循环尾 () value = json.到文本 (, , , ) json.销毁 () 返回 (value) |