dim SortPath
      SortPath=request.QueryString("SortPath")
  dim idCount'记录总数
  dim pages'每页条数
      if request.cookies("Style")="Shopwindow" or request.cookies("Style")="" then
          pages=12
        elseif request.cookies("Style")="List" then
          pages=10
        elseif request.cookies("Style")="Brief" then
          pages=5
        end if
  dim pagec'总页数
  dim page'页码



默认为 if request.cookies("Style")="Shopwindow" or request.cookies("Style")="" then
我想让他始终显示为  List 样式

dim SortPath 
SortPath=request.QueryString("SortPath") 
dim idCount'记录总数 
dim pages'每页条数 

Rsponse.cookies("Style")="List"    '既然只要显示为List样式 那么别的判断就可以去掉了 如果这个在别的地方没什么用也可以不写
pages=10 
dim pagec'总页数 
dim page'页码

去掉判断
 if request.cookies("Style")="Shopwindow" or request.cookies("Style")="" then
          pages=12
        elseif request.cookies("Style")="List" then
          pages=10
        elseif request.cookies("Style")="Brief" then
          pages=5
        end if  

改为
    Rsponse.cookies("Style")="List"  

undefined

undefined

undefined

undefined