Microsoft VBScript runtime error '800a01a8'

Object required: 'subLst'

/programacao_resp.asp, line 26