% UnCheck screenWidth=Request.Cookies("screenWidth") Select Case screenWidth Case 800 RightWidth=10 Case 960 RightWidth=10 Case 1024 RightWidth=10 Case 1152 RightWidth=74 Case 1280 RightWidth=138 Case 1360 RightWidth=178 Case 1440 RightWidth=218 Case 1600 RightWidth=258 Case 1680 RightWidth=298 Case 1920 RightWidth=418 Case 2084 RightWidth=500 Case Else RightWidth=1 End Select If ShowRight=1 Then %> <% ElseIf ShowRight=2 then %>
<% end If %>