VB.NET - GRAVANDO NO BANCO DE DADOS SEM A MASCARA
Boa noite,
Pessoal,
Tenho no meu Form, um MaskedBox onde tenho uma máscara de CPF___.___.___-__.
Até aqui tudo Ok. Acontece que criei uma consulta no BDAccess pelo CPF e preciso que no BDAccess
o CPF fique gravado sem máscara, só os números:tipo: 12789521560. Como posso conseguir isso,
por favor?
VISUAL STUDIO 2010
Obrigado
JMRF
Utilize o metodo replace
pegue tudo que for . e substitua por [Ô][Ô]
e tudo q for - e substitua por [Ô][Ô]
Obrigado Luis,
Conforme ninguém havia me dado uma dica, batalhei até há uma hora a rás e
Consegui resolver assim:
selcom.CommandText = [Ô]UPDATE tb_Cad_Clientes SET nome = [ô][Ô] & (txtnome.Text & Space(50)).Substring(0, 50) & [Ô][ô], endereco = [ô][Ô] & txtend.Text & [Ô][ô], numero = [Ô] & txtnum.Text _
& [Ô], complemento = [ô][Ô] & txtcompl.Text & [Ô][ô], bairro = [ô][Ô] & txtbairro.Text & [Ô][ô], cidade = [ô][Ô] & txtcidade.Text & [Ô][ô], uf = [ô][Ô] & cmbuf.Text _
& [Ô][ô], cep = [ô][Ô] & Maskedcep.Text & [Ô][ô], telefone = [ô][Ô] & txttel.Text & [Ô][ô], telefone_tipo = [ô][Ô] & cmbtel.Text _
& [Ô][ô], celular = [ô][Ô] & txtcel.Text & [Ô][ô], celular_tipo = [ô][Ô] & cmbcel.Text & [Ô][ô], celular1 = [ô][Ô] & txtcel1.Text & [Ô][ô], celular1_tipo = [ô][Ô] & cmbcel1.Text _
& [Ô][ô], paciente = [ô][Ô] & cmbpaciente.Text & [Ô][ô], cpf = [ô][Ô] & (Maskedcpf.Text.Replace([Ô],[Ô], [Ô][Ô])).Replace([Ô]-[Ô], [Ô][Ô]) & [Ô][ô], ci = [ô][Ô] & txtci.Text _
& [Ô][ô], orgao_emissor = [ô][Ô] & txtoe.Text & [Ô][ô], estado_civil = [ô][Ô] & cmbeciv.Text & [Ô][ô], sexo = [ô][Ô] & cmbsex.Text _
& [Ô][ô], data_nascimento = [ô][Ô] & Maskeddt_nasc.Text & [Ô][ô], e_mail =[ô][Ô] & txte_mail.Text & [Ô][ô], data_cadastro =[ô][Ô] & Maskeddt_cad.Text & [Ô][ô], observacoes = [ô][Ô] & txtobservacoes.Text & [Ô][ô] [Ô] _
& [Ô]WHERE cod_cliente = [Ô] & acod_cliente(dgvestoque.CurrentRow.Index + 1)
Obrigado
JMRF
Tópico encerrado , respostas não são mais permitidas