Ir para conteúdo
Fórum Script Brasil
  • 0

Duvidas De Consulta


Fábio Viana

Pergunta

Ola estou com uma duvida

Não sei bem se é aqui que eu pergunto.

Eu fiz o sequinte programinha em vba do access para modificar um conteudo de um campo.

Dim db As DAO.Database

Dim rs As DAO.Recordset

Dim Conteudo As String

Dim Localiza1Barra As Integer

Dim PrimeiroEmail As String

Set db = CurrentDb()

Set rs = db.OpenRecordset("teste")

rs.MoveFirst

Do Until rs.EOF

Conteudo = rs("email").Value

Localiza1Barra = InStr(Conteudo, "/") - 1

If Localiza1Barra > 0 Then

PrimeiroEmail = Left(Conteudo, Localiza1Barra)

Else

PrimeiroEmail = Conteudo

End If

rs.Edit

rs("novoemail").Value = PrimeiroEmail

rs.Update

rs.MoveNext

Loop

Uso o codigo acima para caso a pessoa cadastre 2 E-mail juntos. Ex: primeiro@exemplo.com/segundo@exemplo.com

e quero que apareça so o primeiro E-mail.

O codigo funciona mas queria fazer isso com sql. Tem como?

Obrigado pela atenção

Fábio

Link para o comentário
Compartilhar em outros sites

2 respostass a esta questão

Posts Recomendados

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,8k
×
×
  • Criar Novo...