Update - VBWEB


	Fórum
	Visual Basic

Responder

Voltar

Autor

Assunto: Update

Moreti

SÃO PAULO
SP - BRASIL

Postada em 16/11/2005 09:43 hs

Pessoal tenho o seguinte problema.

Tenho 10 textbox com 10 checbox onde gravo as informações em uma tabela.

Tenho que gravar em uma outra tabela em um único campo essas informações !

Mas é o seguinte :

Se o usuário clicar em apenas 5 checbox está dando erro, mas se clicar nas nas 10 checbox atualiza.

ex:

cliquei em 4 checbox

No campo da tabela deverá ficar assim

teste1 teste2 teste3 teste4

se eu for alterar desmarcando o checbox 2 deverá ficar assim:

teste1 teste3 teste4

Estou fazendo assim:

Apago todo o conteudo do campo e verifico o que está marcado e gravo vovamente.

Obrigado

Elieser Topassi

SÃO JOSÉ DO RIO PRETO
SP - BRASIL

Postada em 16/11/2005 11:18 hs

A sua logica esta correta. Vc deve realmente apagar tudo e gravar novamente apenas o que esta marcado...

Agora, qto a dar erro, qual o erro que da? é erro (excessao) mesmo, ou simplesmente um resultado indesejado? explica melhor o que ta acontecendo...

Ah, mostra tb o codigo que vc esta usando pra gravar...

Flw!

Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net

e-mail/msn: elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
"O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)

Moreti

SÃO PAULO
SP - BRASIL

Postada em 16/11/2005 11:49 hs

Elieser, ai está :

Sql = "UPDATE TB_ENDERECO SET " & _
"CLI_OPCIONAIS = " & NVL(OP1, "C") & NVL(OP2, "C") & NVL(OP3, "C") & NVL(OP4, "C") & _
" WHERE CLIENTE = '" & txtCli.Text & "'"

Onde NVL é uma função onde trato se a string é Null OP1 , OP2 , OP3 ETC .. são variáveis que eu pego de outra tela "C" para informar se é caracter,data,numero, moeda,nesse caso é caracter

O que está ocorrendo se eu clicar nas 10 checbox ele grava, mas se eu clicar em apenas 5 ou 1 ou nenhuma ele não grava, fala que existe null

Coloquei um msgbox SQL para ver como ele está mandando para o banco, veja:

UPDATE TB_ENDERECO SET CLI_OPCIONAIS = NULL''B''C''D''E''F''G''H''I''J' WHERE CLIENTE = '1254'

Nesse caso eu só alterei a primeira checbox e deu erro:

Sintax error (missing operator) in query expression 'NULL'A''

Obrigado

Daniel

SÃO PAULO
SP - BRASIL

Postada em 16/11/2005 12:55 hs

Moreti porque vc não faz assim, só tenho dúvida se a sua função irá aceitar a concatenação OP + a variável t:

dim xy as string

for t=1 to 10

xy=xy & iif(isnull(nvl(OP & t,"C")),"",nvl(OP & t,"C"))

next t

Sql = "UPDATE TB_ENDERECO SET " & _
"CLI_OPCIONAIS = " & xy & " & _
" WHERE CLIENTE = '" & txtCli.Text & "'"

dsmn

Página(s): 1/1

Seu Nome:
Seu eMail:		ALTERAR PARA MODO HTML
Mensagem: [:)] = [:P] = [:(] = [;)] = HTML DESLIGADO

VOLTAR