Primo errore --> non puoi fare una doppia assegnazione, a meno che non vuoi concatenare e allora cambia così:
codice:
PAPERINO = oRs("ID_CATEGORIA") = Rs("ID_CATEGORIA")
codice:
PAPERINO = oRs("ID_CATEGORIA") & Rs("ID_CATEGORIA")
Qui dopo avere assegnato all'arrai, l'ID_CATEGORIA splittato devi scorrere l'array:
codice:
arr_dalform2 = split(Rs("ID_CATEGORIA")," - ")
for i = 1 To ubound(arr_dalform2)
CATEGORIA0 = ARR_DALFORM2(0,i)
CATEGORIA12 = ARR_DALFORM2(1,i)&" "& ARR_DALFORM2(2,i)
next
Su quest'ultimo comunque non sono proprio certo, ma sulla doppia assegnazione di sopra, ti posso dire che è sbagliata.