NAO TO CONSEGUINDO FAZER ESSE UPDATE
Kau meu velho
ta ai seu update rss
.CommandText = "UPDATE Usuarios SET " & _
" NomeUsuario =" & "'" & TxtNomeUsuario.Text & "'," & _
" Logadouro =" & "'" & Txt_Logradouro & "'," & _
" Cidade =" & "'" & TxtCidade.Text & "'," & _
" Estado =" & "'" & CboEstado.Text & "'," & _
" CEP =" & "'" & TxtCep.Text & "'," & _
" RG =" & "'" & Txt_RG.Text & "'," & _
" CPF =" & "'" & Txt_CPF.Text & "'," & _
" dat_cad = " & "#" & Txt_dataCadastro.Text & "#," & _
" dat_nasc = " & "#" & Txt_dataNasc.Text & "#," & _
" natur = " & "'" & Txt_Natural.Text & "'," & _
" Nascional = " & "'" & Txt_Nacional.Text & "'," & _
" Sexo = " & "'" & Cbo_Sexo.Text & "'," & _
" Est_Civ = " & "'" & cbo_EstCivil.Text & "'," & _
" complemento = " & "'" & Txt_Complemento.Text & "'," & _
" bairro = " & "'" & Txt_Bairro.Text & "'," & _
" tel_res = " & "'" & Txt_NumRes.Text & "'," & _
" ddd_res = " & "'" & Txt_DDDRes.Text & "'," & _
" tel_cel = " & "'" & Txt_NumCel.Text & "'," & _
" ddd_cel = " & "'" & Txt_DDDCel.Text & "'," & _
" email = " & "'" & Txt_Email.Text & "'" & _
" WHERE CodUsuario =" & "'" & TxtCodUsuario.Text & "'"
bom divertimento rass
abraços
ta ai seu update rss
.CommandText = "UPDATE Usuarios SET " & _
" NomeUsuario =" & "'" & TxtNomeUsuario.Text & "'," & _
" Logadouro =" & "'" & Txt_Logradouro & "'," & _
" Cidade =" & "'" & TxtCidade.Text & "'," & _
" Estado =" & "'" & CboEstado.Text & "'," & _
" CEP =" & "'" & TxtCep.Text & "'," & _
" RG =" & "'" & Txt_RG.Text & "'," & _
" CPF =" & "'" & Txt_CPF.Text & "'," & _
" dat_cad = " & "#" & Txt_dataCadastro.Text & "#," & _
" dat_nasc = " & "#" & Txt_dataNasc.Text & "#," & _
" natur = " & "'" & Txt_Natural.Text & "'," & _
" Nascional = " & "'" & Txt_Nacional.Text & "'," & _
" Sexo = " & "'" & Cbo_Sexo.Text & "'," & _
" Est_Civ = " & "'" & cbo_EstCivil.Text & "'," & _
" complemento = " & "'" & Txt_Complemento.Text & "'," & _
" bairro = " & "'" & Txt_Bairro.Text & "'," & _
" tel_res = " & "'" & Txt_NumRes.Text & "'," & _
" ddd_res = " & "'" & Txt_DDDRes.Text & "'," & _
" tel_cel = " & "'" & Txt_NumCel.Text & "'," & _
" ddd_cel = " & "'" & Txt_DDDCel.Text & "'," & _
" email = " & "'" & Txt_Email.Text & "'" & _
" WHERE CodUsuario =" & "'" & TxtCodUsuario.Text & "'"
bom divertimento rass
abraços
caraa esqueci muda no banco no cep, muda pra text, se deixar number ele vai da pal por causa do - ex. 11111-111
falowss
falowss
o cara mesmo assim não deu!
abs
abs
ta dando uma msg de tipo de dados incompativel na expressao de criterio, isso que eu troquei o cep!!
desde ja agradeço grande abraço
desde ja agradeço grande abraço
vc tem que formata a data assim o
dttexte = "& Format(dttexte,"dd/mm/yy") &"
se não posta para mim qual o banco que vc usa faleu
dttexte = "& Format(dttexte,"dd/mm/yy") &"
se não posta para mim qual o banco que vc usa faleu
O kau
vc mudo pra text o cep cara?
ahh e outra
na onde esta number la tipo o ddd telefone
ele nao aceita caracter diferente de numeros, deve ser por isso que ta dando pal, faz o teste usando somente numero em todos os campos
abraços
vc mudo pra text o cep cara?
ahh e outra
na onde esta number la tipo o ddd telefone
ele nao aceita caracter diferente de numeros, deve ser por isso que ta dando pal, faz o teste usando somente numero em todos os campos
abraços
cara eu mudei toda a estrutura do banco tudo que tinha numero fora o codusuario eu troquei para texto, tecnicamente nao era para estar dando esse erro né
abs
abs
olá pessoal eu vo encerrar este topico, o amigo CLEVERTON me ajudou, eu agradeço a todos que ajudaram nesse topico,
abs
abs
Tópico encerrado , respostas não são mais permitidas