精易模块，网页_Cookie合并更新，这里建议更新一下

小小n

精易模块，网页_Cookie合并更新，这里建议更新一下。
同个响应头中的出现多个同名Cookie的Set-Cookie，我就遇到过几次，用精易的网页访问会出现Cookie不对的情况；

  

子程序名	返回值类型	公开	备 注
网页_Cookie合并更新	文本型		返回更新后的Cookie
参数名	类 型	参考	可空	数组	备 注
旧Cookie	文本型
新Cookie	文本型

变量名	类 型	静态	数组	备 注
局_旧Cookie组	文本型		0
局_新Cookie组	文本型		0
局_计次	整数型
新Cookie数	整数型
局_新Cookie组_1	文本型		0

' 初步格式化
旧Cookie ＝ 删全部空 (旧Cookie)
新Cookie ＝ 删全部空 (新Cookie)
' 开始更新Cookie
局_旧Cookie组 ＝ 分割文本 (旧Cookie, “;”, )
局_新Cookie组_1 ＝ 分割文本 (新Cookie, “;”, )
新Cookie数 ＝ 取数组成员数 (局_新Cookie组_1)
计次循环首 (新Cookie数, 局_计次)
' 新Cookie自身进行倒序更新
' 主要解决部分网站，在同个响应头中的多个Set-Cookie中，更新多次同名Cookie；例如：
' Set-Cookie: P1=123456;
' Set-Cookie: P1=456789;
' 这种不多见情况下,后面加入的Set-Cookie才是最新的;故需要对局_新Cookie组进行倒序自我更新；
如果真 (内部_数组成员是否存在1 (局_新Cookie组, 内部_Cookie取名 (局_新Cookie组_1 [新Cookie数 ＋ 1 － 局_计次])) ＝ 假)
加入成员 (局_新Cookie组, 局_新Cookie组_1 [新Cookie数 ＋ 1 － 局_计次])

计次循环尾 ()
计次循环首 (取数组成员数 (局_旧Cookie组), 局_计次)
如果真 (内部_数组成员是否存在1 (局_新Cookie组, 内部_Cookie取名 (局_旧Cookie组 [局_计次])) ＝ 假)
加入成员 (局_新Cookie组, 局_旧Cookie组 [局_计次])

计次循环尾 ()
' 去除无效的Cookie
旧Cookie ＝ “”
计次循环首 (取数组成员数 (局_新Cookie组), 局_计次)
如果真 (到小写 (取文本右边 (局_新Cookie组 [局_计次], 8)) ≠ “=deleted”)
旧Cookie ＝ 旧Cookie ＋ 局_新Cookie组 [局_计次] ＋ “; ”

计次循环尾 ()
旧Cookie ＝ 取文本左边 (旧Cookie, 取文本长度 (旧Cookie) － 2)
' 对重复的Cookie进行合并
旧Cookie ＝ 文本_去重复文本 (旧Cookie, “; ”)
返回 (旧Cookie)

.版本 2<br /> <br /> .子程序 网页_Cookie合并更新, 文本型, 公开, 返回更新后的Cookie<br /> .参数 旧Cookie, 文本型, 参考<br /> .参数 新Cookie, 文本型<br /> .局部变量 局_旧Cookie组, 文本型, , "0"<br /> .局部变量 局_新Cookie组, 文本型, , "0"<br /> .局部变量 局_计次, 整数型<br /> .局部变量 新Cookie数, 整数型<br /> .局部变量 局_新Cookie组_1, 文本型, , "0"<br /> <br /> ' 初步格式化<br /> 旧Cookie ＝ 删全部空 (旧Cookie)<br /> 新Cookie ＝ 删全部空 (新Cookie)<br /> ' 开始更新Cookie<br /> 局_旧Cookie组 ＝ 分割文本 (旧Cookie, “;”, )<br /> 局_新Cookie组_1 ＝ 分割文本 (新Cookie, “;”, )<br /> 新Cookie数 ＝ 取数组成员数 (局_新Cookie组_1)<br /> .计次循环首 (新Cookie数, 局_计次)<br />     ' 新Cookie自身进行倒序更新<br />     ' 主要解决部分网站，在同个响应头中的多个Set-Cookie中，更新多次同名Cookie；例如：<br />     ' Set-Cookie: P1=123456;<br />     ' Set-Cookie: P1=456789;<br />     ' 这种不多见情况下,后面加入的Set-Cookie才是最新的;故需要对局_新Cookie组进行倒序自我更新；<br />     .如果真 (内部_数组成员是否存在1 (局_新Cookie组, 内部_Cookie取名 (局_新Cookie组_1 [新Cookie数 ＋ 1 － 局_计次])) ＝ 假)<br />         加入成员 (局_新Cookie组, 局_新Cookie组_1 [新Cookie数 ＋ 1 － 局_计次])<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> .计次循环首 (取数组成员数 (局_旧Cookie组), 局_计次)<br />     .如果真 (内部_数组成员是否存在1 (局_新Cookie组, 内部_Cookie取名 (局_旧Cookie组 [局_计次])) ＝ 假)<br />         加入成员 (局_新Cookie组, 局_旧Cookie组 [局_计次])<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> ' 去除无效的Cookie<br /> 旧Cookie ＝ “”<br /> .计次循环首 (取数组成员数 (局_新Cookie组), 局_计次)<br />     .如果真 (到小写 (取文本右边 (局_新Cookie组 [局_计次], 8)) ≠ “=deleted”)<br />         旧Cookie ＝ 旧Cookie ＋ 局_新Cookie组 [局_计次] ＋ “; ”<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 旧Cookie ＝ 取文本左边 (旧Cookie, 取文本长度 (旧Cookie) － 2)<br /> ' 对重复的Cookie进行合并<br /> 旧Cookie ＝ 文本_去重复文本 (旧Cookie, “; ”)<br /> 返回 (旧Cookie)

专业老白二十年

根据不同的需求来改吧应该。。。。

klh412

内部_数组成员是否存在1    这个是什么？？？

小小n

lsxisme 发表于 2016-11-22 21:36
COOK1=COOK1+COOK2
这样不就可以了吗？？

精易 网页_Cookie合并更新 处理流程如下：
1.读取数条 Set-Cookie，例如(Set-Cookie: A=1; Set-Cookie: A=2; )
2.首次处理结果: Cookie: A=1; A=2;  因为A=2为新，客户Duan也好服务器也好都遵循后来者为新的规则，所以，使用第二次使用此Cookie时并不会有问题
3.第二次使用此Cookie后进行Cookie处理时,网页_Cookie合并更新就会把他处理成Cookie: A=1;而丢掉A=2;
实际上，A=2才是新的cookies，那么当你第三次使用cookies时就会出问题了

花诗雨露

COOK1=COOK1+COOK2
这样不就可以了吗？？

花诗雨露

看不懂。有点复杂。

有没有好的合并更新？？？

A—小哲

一般都是替换新的..

小小n

CRstudio 发表于 2016-10-22 17:21
这个还是根据自己需要修改，有的网站可能两个都需要呢？

同名Cookie不会两个都需要的，他是服务器经过两次处理后，把两次要更新的同个Cookie附加到响应头了；
浏览器都是按“后加为新”的规则处理，所有浏览器不存在这样的问题，精易里的是，第一次处理两个都保留。当你再次更新cookie的时候，这个逻辑规则会使旧的保留，新的被遗弃；

happyweeks365

进来学习一下

日渐消瘦

这个还是根据自己需要修改，有的网站可能两个都需要呢？