分享一段刚编的Set-Cookie转换为导入指纹浏览器的json格式ck

会走路的哈哈镜

刚好有需要将协议登录返回set-cookie里的ck导入到ads中，来论坛发现只能找到类似的代码（指路：有大概知道怎么把普通cookie转换json格式的cookie吗？_精易论坛 (125.la)）
遂改一改，试了一下自用ok，发出来分享一下，如有问题欢迎指正！

  

子程序名	返回值类型	公开	备 注
_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)

.版本 2<br /> <br /> .子程序 _cks2json_forBrowser, 文本型<br /> .参数 lpcks, 文本型, 数组<br /> .参数 domain, 文本型<br /> .局部变量 json, zyJsonValue<br /> .局部变量 arr, 文本型, , "0"<br /> .局部变量 arr2, 文本型, , "0"<br /> .局部变量 x<br /> .局部变量 i, 整数型<br /> .局部变量 value, 文本型<br /> <br /> json.创建 (, , , , )<br /> .计次循环首 (取数组成员数 (lpcks), i)<br />     arr ＝ 分割文本 (子文本替换 (lpcks <i>, “; ”, “;”, , , 真), “;”, )<br />     .计次循环首 (取数组成员数 (arr), x)<br />         arr2 ＝ 分割文本 (arr [x], “=”, )<br />         .如果 (x ＝ 1)<br />             .如果 (取数组成员数 (arr2) ＝ 2)<br />                 json.置文本 (“[” ＋ 到文本 (i － 1) ＋ “].name”, arr2 [1])<br />                 json.置文本 (“[” ＋ 到文本 (i － 1) ＋ “].value”, arr2 [2])<br />             .否则<br />                 json.置文本 (“[” ＋ 到文本 (i － 1) ＋ “].name”, arr2 [1])<br />                 json.置文本 (“[” ＋ 到文本 (i － 1) ＋ “].value”, “”)<br /> <br />             .如果结束<br /> <br />             json.置文本 (“[” ＋ 到文本 (i － 1) ＋ “].domain”, domain)<br />         .否则<br />             .如果真 (取数组成员数 (arr2) ＝ 2)<br />                 json.置文本 (“[” ＋ 到文本 (i － 1) ＋ “].” ＋ arr2 [1], arr2 [2])<br />             .如果真结束<br /> <br />         .如果结束<br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> value ＝ json.到文本 (, , , )<br /> json.销毁 ()<br /> 返回 (value)

漫夜幽魂

xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx

jinaikuo

感谢分享

yangdoudou

感谢分享

陈枫

666666666666666

按键大师

666666666666666666666666666

一指温柔

感谢分享

一指温柔

感谢分享

豆豆灰常开心

感谢楼主分享！

查过

感谢分享，很给力！~