Replace em endereço de email

[interlokk 0]

É o seguinte como eu faço pra substituir um endereço de email de forma que fique visivel somente o que está antes da arroba, tipo: nome@servidor.com substituir por nome ou nome@xxxxxxxxxxEu sei que uso o replace mas como indentifico o que é ednereço?Vlew.

[DackAle 0]

cara esquema é você ir trocando isolado cada caractere...faz assim localiza a posição do @ com o instr... e guarda a posicao...agora com o mid pega só esse caractere e da um replace... faz um looping e vai somando mais um e trecando cada caractere...ou mais facil... conta quantos caracteres tem depois do arroba e poe em X...exemplodackale@gmail.com.brtem 12 depois do arroba... faz um looping pra ele adicionar tantos X depois do arroba... é mais facil ainda...se precisar de ajuda só berrar...

[interlokk 0]

Opa, vamos ver como fica. Vlew pessoal!...Editando: funcionou belaza aqui. REsolvi um problemão. Valew mesmo pessoal!!!

[Salgado 4]

Quer pegar só o que tem antes do arroba?

ASP

1. email = "usuario@provedor.web"
   
2. Usuario = Left(email,InStr(email,"@"))
   
3. Response.Write Usuario
   

[DackAle 0]

ASP

[*]

[*]email = "dackale@gmail.com"

[*]tamanho = len(email)

[*]acha = instr(email,"@")

[*]final = tamanho - acha

[*]if acha > 0 then

[*]FOR I=1 TO final

[*]X = X & "X"

[*]NEXT

[*]end if

[*]

[*]response.write left(email,acha) & X

 

Algo que fiz... rs

só pra não perder a viagem

[mx loco 1]

Quer pegar só o que tem antes do arroba?

ASP

[*]email = "usuario@provedor.web"

Usuario = Left(email,InStr(email,"@"))

Response.Write Usuario

<{POST_SNAPBACK}>

um pequeno detalhe que você esqueceu salgado...

 

ele esta escrendo o arroba

 

 

 

ASP

[*]

[*]email = "usuario@provedor.web"

[*]Usuario = replace(Left(email,InStr(email,"@")), "@", "")

[*]Response.Write Usuario

[*]

 

agora funfa legal http://forum.imasters.com.br/public/style_emoticons/default/joia.gif

[dark0 0]

Como eu sou 'deferente', huahuahua

 

eu faço assim:

ASP

[*]<%

[*]email = "dark0@email.com"

[*]a = split(email,"@")

[*]response.write a(0)

[*]%>

[Salgado 4]

um pequeno detalhe que você esqueceu salgado...

 

ele esta escrendo o arroba

<{POST_SNAPBACK}>

É só diminuir 1 no InStr que ele passa a não pegar o @:

ASP

1. email = "usuario@provedor.web"
   
2. Usuario = Left(email,(InStr(email,"@")-1))
   
3. Provedor = Right(email,(InStr(email,"@")-1))
   
4. Response.Write Usuario &"<BR>"
   
5. Response.Write Provedor
   

[DackAle 0]

Como eu sou 'deferente', huahuahua

 

eu faço assim:

ASP

[*]<%

email = "dark0@email.com"

a = split(email,"@")

response.write a(0)

%>

<{POST_SNAPBACK}>

Em cima da sua ideia dava pra fazer algo mais pratico pro krinha

 

ASP

[*]<%

[*]email = "dark0@email.com"

[*]a = split(email,"@")

[*]total = len(a(1))

[*]FOR I=1 TO total

[*]x = x & "x"

[*]NEXT

[*]response.write a(0) & "@" & x

[*]%>

 

um pouco menor do que a anterior...

[dark0 0]

ué, do jeito q eu falei tb funciona.. eu testei aqui antes de postar heheabraço

[DackAle 0]

ué, do jeito q eu falei tb funciona.. eu testei aqui antes de postar hehe

 

abraço

<{POST_SNAPBACK}>

Dark0, o dono do topico queria que fosse mostrado a primeira parte do email e o resto (provedor.com.br) fosse mostrado como x

 

exemplo

 

dark0@xxxxxxxxxxxx

 

o que você fez captura a primeira parte do email no caso "dark0" rsss

 

Funciona mais faltava o resto ahahahaha dai só melhorei o codigo que tinha feito emcima do seu =)

 

Abraços

[dark0 0]

huahuahuaeu nao tinha lido completamente a duvida inicialentaum OKz

[Mário Monteiro 179]

essa galera tava inspirada pra ajudar...o que teve de variedade de codigo...

[dark0 0]

heheisso que élegalcada um faz do seu jeito, e a gente ve varios modos de se fazer a mesma coisa.

[Mário Monteiro 179]

É o verdadeiro espírito de um fórum... http://forum.imasters.com.br/public/style_emoticons/default/bye1.gif

com certeza http://forum.imasters.com.br/public/style_emoticons/default/joia.gif http://forum.imasters.com.br/public/style_emoticons/default/clap.gif

[interlokk 0]

Putz...tem coisa bem pratica aê...uns nem usaram replace. Por isso que eu gosto de ASP...dá pra fazer de várias maneiras. Abraços.

[DackAle 0]

depois desse momento lindo de ajuda geral, é hora de estourarmos um champgne e tomarmos um toddynho que tal ? HAHAHAHAHHAe que bom que deu certa, nessa brincaeira surgiu uns 4 codigos diferentes ahahahaha

[dark0 0]

huahuahuahuahuaessa foi boa dackalehuauhauhahuamas, forum eh bom por issoaprendemos uns com os outros, heheabraço

[mx loco 1]

huahuahuahuahua

 

essa foi boa dackale

 

huauhauhahua

 

mas, forum eh bom por isso

 

aprendemos uns com os outros, hehe

 

abraço

<{POST_SNAPBACK}>

mas por enquanto estou aprendendo hehe :D

[Mário Monteiro 179]

depois desse momento lindo de ajuda geral, é hora de estourarmos um champgne e tomarmos um toddynho

esse cara é um poeta...