search.asp

来自「网胜B2B电子商务蓝色风格2008SP6.0.1普及版」· ASP 代码 · 共 54 行

<!--#include file="../member/head.asp"-->
<!--#include file="../member/checkrole.asp"-->

<%

  Response.Buffer = true
  Response.ExpiresAbsolute=now()-1
  Response.Expires=0
  Response.CacheControl="no-cache"
  
call checkuser("sj")
  if issession=0 then
gsid=Replace_Text(request.Cookies("Yxmemberid"))
else
gsid=session("id")
end if
if Not ChkPost then 
    response.write "<script language='javascript'>"
	response.write"parent.location.href='"&HOPE_InstallDir&"login/login1.asp';</SCRIPT>"
	response.end
end if





 '^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
'处理种类的id号 
sortid=Replace_Text(request("p_z_Z_RootCategory"))                                   '第一类
CategoryId=split(Replace_Text(request("p_z_Z_CategoryId1")),",")

typeid=CategoryId(0)                                                                 '第二类

if ubound(CategoryId)>=1 then
    typeid_2=CategoryId(1)                                                               '第三类     
else
    typeid_2=0
end if
if typeid="" then
   typeid=0
end if
if typeid_2="" then
   typeid_2=0
end if
brand=request("brandnew")
if sorid="" then 
response.Write("<script>alert('您没有选择类别！');self.location='index.html';</script>") 
 if brand<>"" then 
  response.Redirect sortid&"-"typeid&"-"typeid_2 &"-"brand&".html"
 else
  response.Redirect sortid&"-"typeid&".html"    
%>