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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Localizar texoto em text
Roßerto
Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843
SAO PAULO
SP - BRASIL
Postada em 30/08/2007 15:31 hs            
Eu tbm, fiz essa rotina para capturar o retorno do TEF (Transfêrencia Eletrônica de Fundos)
 
 
 
 
     
Miro Aguiar
SÃO PAULO
SP - BRASIL
Postada em 30/08/2007 17:09 hs            
pessoal deu certo memso...porem precisava que o ultimo caractere que é ";" fosse excluído..
e tambem preciso gravar os parametros..qual é a rotina?...ou seja o que hoje é localhost, pode ser que eu tenha ue configuralo par aoutro endereço...
TÓPICO EDITADO
   
Roßerto
Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843
SAO PAULO
SP - BRASIL
Postada em 30/08/2007 17:47 hs            
Miro, o ';' vc pode tirar usando o REPLACE
 
        If Left(Trata, 15) = "StreamingServer" Then
            Resultado = Trim(Mid(Trata, InStr(Trata, "=") + 1)) 
            Resultado =  Replace(Resultado,";","")
        End If
 
Gravar os parametros é exatamente como gravar um textbox
 
        If Left(Trata, 15) = "StreamingServer" Then
            Tb.AddNew
            Tb!Campo  = Trim(Mid(Trata, InStr(Trata, "=") + 1)) 
            Tb.Update
        End If
 
Exemplo acima está sendo usado a conexão DAO, mude para a sua conexão.
 
 
     
Miro Aguiar
SÃO PAULO
SP - BRASIL
Postada em 31/08/2007 15:45 hs            
Cara não entendi a parte de edição....tem algum material ou exemplo?,..
 
abraços
     
Página(s): 2/2     « ANTERIOR  


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