[Resolvido] Split

Tenho uma lista com checkbox preciso pegar o valor, pra dar baixa, e fazer um update na tabela com atualiza data de pagto e tal.. mas o

vcod= Request.Form("Box"&Codigo(i))não traz dados nenhum, a variavel cod fica vazia .. causando erro no update. Aguardo ajuda !

veja meu Código !

Codigo = request.form("Box") 'Aqui você pega os id's separados por virgula
Codigo = split(Codigo,",") 'Separa os Ids por virgulas
For i=0 to Ubound(Codigo)

vcod= Request.Form("Box"&Codigo(i)) ' aqui você recupera o valor do checkbox um de cada vez e faz o update normal

ExpSql= "update TB_FINANCEIRO SET "

ExpSql=ExpSql &" DATA_PAGTO = '" & vDataPagto & "', QUITADO = " &vPago &"," ExpSql=ExpSql &" BAIXADO_POR = '" & vBaixadoPor & "' where CH_FIN= " & vcod response.write ExpSQl 'response.end cn.execute(ExpSql) On Error Resume Next

if Err <> 0 Then
Response.Write "Foi encontrado um erro (" & Err.Description & ")."
Response.End
End if

'Fim loop.
next