Hola a todos!

Non riesco a far funzionare questa condizione:
codice:
cb_pmr = request.form("cb_pmr")

if cb_pmr = "cb_pmr" then
response.write "Devi selezionare una cb_pmr"
else
DIM ARR_DALFORM_cb_pmr
ARR_DALFORM_cb_pmr = split(cb_pmr, "-")
cb_pmr0 = ARR_DALFORM_cb_pmr(0)
response.write cb_pmr0 &"
"
cb_pmr12 = ARR_DALFORM_cb_pmr(1) &" "& ARR_DALFORM_cb_pmr(2)
response.write cb_pmr12 &"
"
end if
Se dal form arriva valore cb_pmr restituisce:
Error Type:
Microsoft VBScript runtime (0x800A0009)
Subscript out of range: '[number: 1]'