TC官方合作论坛

标题: 【一只熊】cookies自动管理 [打印本页]

作者: 一只熊 时间: 2017-12-5 10:38
标题: 【一只熊】cookies自动管理
本帖最后由一只熊于 2017-12-5 10:43 编辑

对于cookies的管理相信一直苦恼很多新手小白们

现在【一只熊】提供个cookies 自动管理的工具类给大家。让大家开发更方便

var cookies
//获取cookies的正则语句: "Set-Cookie[^.]*?[^;];"
//如果存在则更新，不存在则添加
function CookiesManager_setCookie(head)
//cookie=""
if(head!="")
var setCookie=regexmatchtext(head,"Set-Cookie[^.]*?[^;];",false,true,true,false)
if(setCookie !=null && setCookie!="")
var n = arraysize(setCookie) //条件1
if(n!=-1 && setCookie[0]!="")
for(var i = 0; i < n; i++)
var cookie=string_mid(setCookie[i],"Set-Cookie:",";")
var cookie_key=string_mid(cookie," ","=")
var pos=strfind(cookies,cookie_key)
if(pos!=-1)
cookies=strreplace(cookies,cookie_key&"="&string_mid(cookies,cookie_key,";"),cookie)
else
cookies=cookies&cookie&";"
end
end
end
end
end
end

复制代码

字符串取中间信息方法string_mid，CookiesManager_setCookie 中有用到

//取两个字符串中间的信息
//参数1:源字符串
//参数2:要取的部分所在开头的字符串
//参数3:结束部分字符,默认为空,表示到到结尾
function string_mid(source,startStr,endStr)
var startpos
var endpos
var temp
if(startpos=="")
startpos=0
else
startpos=strfind(source,startStr)
end
temp=strsub(source,startpos+strlen(startStr),strlen(source))
if(endStr=="")
endpos=strlen(temp)
else
endpos=strfind(temp,endStr)
end
if(startpos==-1 || endpos==-1)
return ""
end
var ret=strsub(temp,0,endpos)
return ret
end

复制代码

作者: 一只熊 时间: 2017-12-5 10:38
好帖希望大家顶，有问题也可以回帖提问

作者: donggua11 时间: 2017-12-22 21:58
你好，我用tc7.0编译时出现> function CookiesManager_setCookie(head)，错误信息:函数定义中,不能识别的语法定义。还想请教一下如何用tc设置ie的Cookie，谢谢。

作者: 一只熊 时间: 2017-12-25 13:58

donggua11 发表于 2017-12-22 21:58
你好，我用tc7.0编译时出现> function CookiesManager_setCookie(head)，错误信息:函数定义中,不能识别的语 ...

tc貌似没提供设置iecookies的方法，，可以直接调用js设置ie cookies

作者: donggua11 时间: 2018-1-1 15:21
谢谢

欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/)