一个在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
http://www.itcnw.com/

• 打印文档
• 推荐好友
• 
• 返回顶部
• 增大字体
• 减少字体

• 上一篇文章：贴一段可以近视替代remote script的代码，或许有人用得着。
• 下一篇文章：ASP中查错之实例（尤其对初学者有帮助）！赖皮，昨天的错误原因找到了，不是你所说的，你不应该吃晚饭的...