
|
|
<%Select Case Request.Querystring("x")
Case "1"
If (siti_cat<=10) Then
min = 1
max = siti_cat
Else
min = 1
max = 10
End If
Case "2"
If (siti_cat<=20) Then
min = 11
max = siti_cat
Else
min = 11
max = 20
End If
Case "3"
If (siti_cat<=30) Then
min = 21
max = siti_cat
Else
min = 21
max = 30
End If
Case "4"
If (siti_cat<=40) Then
min = 31
max = siti_cat
Else
min = 31
max = 40
End If
Case "5"
If (siti_cat<=50) Then
min = 41
max = siti_cat
Else
min = 41
max = 50
End If
Case "6"
If (siti_cat<=60) Then
min = 51
max = siti_cat
Else
min = 51
max = 60
End If
Case "7"
If (siti_cat<=70) Then
min = 61
max = siti_cat
Else
min = 61
max = 70
End If
Case "8"
If (siti_cat<=80) Then
min = 71
max = siti_cat
Else
min = 71
max = 80
End If
Case "9"
If (siti_cat<=90) Then
min = 81
max = siti_cat
Else
min = 81
max = 90
End If
Case "10"
If (siti_cat<=100) Then
min = 91
max = siti_cat
Else
min = 91
max = 100
End If
Case "11"
If (siti_cat<=110) Then
min = 101
max = siti_cat
Else
min = 101
max = 110
End If
Case "12"
If (siti_cat<=120) Then
min = 111
max = siti_cat
Else
min = 111
max = 120
End If
Case "13"
If (siti_cat<=130) Then
min = 121
max = siti_cat
Else
min = 121
max = 130
End If
End Select%>
|