USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Arquivo texto sem formatação
FKNMALTA
FRANCA
SP - BRASIL
ENUNCIADA !
Postada em 28/04/2008 17:11 hs         
Quando é gravado a informação na tabela o campo por exemplo telefone fica (16)1234-5678...como faço para que no arquivo texto saia sem a formatação, ficando 1612345678...estou usando assim:
Print #1, rdcli!telefone;rdcli!CPF;.......
   
Tiranossauro
DOIS IRMÃOS
RS - BRASIL
ENUNCIADA !
Postada em 28/04/2008 22:46 hs            
supondo que a formatação é padrão então pode usar assim
 
iif(telefone <> ""; mid(telefone, 2,2) & mid(telefone, 5,4) & mid(telefone, 10,4);"")  
   
Treze
Pontos: 2843 Pontos: 2843
SÃO VICENTE
SP - BRASIL
ENUNCIADA !
Postada em 29/04/2008 11:15 hs            
pode fazer também:
 
dim Telelefone as string
Dim numero As String
For f = 1 To Len(rdcli!telefone)
Telefone= Mid(rdcli!telefone, f, 1)
If IsNumeric(Telefone) Then
numero= numero & telefone
End If
Next f
 
Print #1, numeo,....
 
 
   
Página(s): 1/1    

CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página