function cookievalue(pcook)
lhowlong=len(pcook)
lwhereis=instr(documents.cookie,pcook)
if lwhereis=0 then
cookievalue=false
else
lstartpos=len(documents.cookie)-lwhereis-lhowlong
lstartstring=right(documents.cookie,lstartpos)
do
lchar=left(lstartstring,1)
if lchar=";" then
cookievalue=lendstring
exit do
else
lendstring=lendstring & lchar
if len(lstartstring)=1 then
cookievalue=lendstring
exit do
else
lstartstring=right(lstartstring,len(lstartstring)-1)
end if
end if
loop
end if
end function
此文章不能满足您的需求？那就就Google一下吧：）
|
 |
|
| 在线教程首页 | 程序设计 | 电脑应用 | 平面设计 | 网页设计 | 多媒动画 | 管理策划 | 名家专栏 | 实用范文 | 贺词慰问 | 分类 | 专题 | 留言本 | 投稿 | 搜索 |