[Resolvido] Split

[weslei.conexao 0]

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

[xanburzum 169]

esta gerando algum erro ???

e faça uma pesquisa no fórum que existem tópicos ensinando seu uso correto , pode te ajudar

[weslei.conexao 0]

Esse é o erro que se dá devido a variavel vcod estar vazia, pois Request. Form("Box"&Codigo(i)) nao está atribuindo valor variavel.

ja pesquisei no forum o uso do split, pelo que vi to usando certo. só preciso corrigir essa variavel q não recebi valor ..

Microsoft OLE DB Provider for ODBC Drivers error '80040e14' 
[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'CH_FIN='. 

[weslei.conexao 0]

Opa consegui era só

vcod= Codigo(i)

!!

perfeito !!

[xanburzum 169]

ok, beleza...