<% 'Option Explicit Dim L_gb, i , L_gb_1, k, L_gb_2, j Dim img_bg(3) Dim img_bg_1(8) Dim img_bg_2(24) L_gb = Request("L_gb") L_gb_1 = Request("L_gb_1") L_gb_2 = Request("L_gb_2") for i=1 to 2 img_bg(i) = "n" next for i=1 to 7 img_bg_1(i) = "n" next for i=1 to 24 img_bg_2(i) = "n" next img_bg(L_gb) = "s" If L_gb_1 = "" Then img_bg_1(1) = "s" Else img_bg_1(L_gb_1) = "s" End If If L_gb = "2" Then img_bg_1(1) = "n" If L_gb_2 = "" Then img_bg_2(1) = "s" Else img_bg_2(L_gb_2) = "s" End If End If If L_gb = "3" Then img_bg_1(1) = "n" If L_gb_2 = "" Then img_bg_2(24) = "s" img_bg(2) = "s" Else img_bg_2(L_gb_2) = "s" End If End If ' { If L_gb_2 = "" Then img_bg_2(1) = "s" End If } ' If L_gb_1 = "" and L_gb_2 = "" Then img_bg_2(1) = "s" Else img_bg_2(L_gb_2) = "s" End If %> Untitled Document
<% If L_gb = "1" Then %> <% End If %>