% Ytd=LCase(Request("Tid")) Yid=LCase(Request("Pl")) Dtime=Trim(replace(Request("Dtime"),"?","")) SUrl=Trim(Request.QueryString) if len(SUrl)<=10 and len(SUrl)>=6 then Dtime=SUrl if Not Dtime="" then Strl="?"&Dtime STid="/Open-top" if Trim(Request("Ad"))="up" then YAd="up" SAd="down" else YAd="down" SAd="up" end if %>