 |
建站必读 |
 |
|
|
|
| |
| 当前位置：首页 -> 建站必读 -> ASP技术 |
|
一个在vbscript中读取cookie的程序函数,献给大家(request.cookie("cookiename")不行),见内 |
function cookievalue(pcook)
lhowlong=len(pcook)
lwhereis=instr(document.cookie,pcook)
if lwhereis=0 then
cookievalue=false
else
lstartpos=len(document.cookie)-lwhereis-lhowlong
lstartstring=right(document.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
|
| |
|
| |
本站关键词： |
|
|
|
|
|
