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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  SUBSTITUIR LETRAS NO ARQUIVO TEXTO
Treze
Pontos: 2843 Pontos: 2843
SÃO VICENTE
SP - BRASIL
Postada em 06/06/2008 19:12 hs            
Colega desculpe não sei onde estava com a cabeça o caractere é o 301 mesmo, então
Faça da forma abaixo que vai funcionar
 
Do Until EOF(arqori)
Line Input #arqori, linha
If Mid$(linha, 301, 1) = "1" Then
  Mid$(linha, 301, 1) = " " 'Substituindo caracter
End If
Print #arqdest, linha
 
Foi falta de atenção minha desculpe o código acima resolve o problema
 
     
LUIZ PEDRO
SAO PAULO
SP - BRASIL
Postada em 06/06/2008 19:22 hs            
Isso ai amigo, agora sim funcionou ! valeu pela ajuda mais uma vez !
     
Treze
Pontos: 2843 Pontos: 2843
SÃO VICENTE
SP - BRASIL
Postada em 06/06/2008 19:38 hs            
fecha o tópico pra nós!
 
Até precisando estamos ai
 
     
LUIZ PEDRO
SAO PAULO
SP - BRASIL
Postada em 06/06/2008 19:50 hs            
Treze

e se eu precisar substituir um intervalo, por exemplo da coluna 300 a 500, como eu faria ?
     
Treze
não registrado
Postada em 06/06/2008 20:15 hs   
Você pode tentar assim
 
If Mid$(linha, 300, 200) = Mid$(linha, 300, 200) Then
  Mid$(linha, 300, 200) = " " 'Substituindo caracter
End If
     
LUIZ PEDRO
SAO PAULO
SP - BRASIL
Postada em 11/06/2008 16:57 hs            
E ai Treze

Desculpe a demora, mas estou na correria, fiz o teste e nao consegui substituir os caracteres dentro da faixa que preciso.
     
Página(s): 3/4     « ANTERIOR    PRÓXIMA »


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



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