border

Miembros:
Mensajes:
Temas:
Online:

Ultimo Miembro:

 
 

Cuenta Bancaria en EEUU
  #1 (permalink)  
Antiguo 16-12-2006, 02:13:24
Un Nuevo Amigo
 
Registrado: nov 2006
Posts: 26
AngelGod Valoración +2
Predeterminado Validad formato del Mail en un Txt

Hola Camaradas .

les platico que valide en un txt para que solo aceptara números pero ahora se me ocurrio que la hora de que el usuario escriera su mail en un txt el sistema lo obligara a escribir correctamente el formato de un mail.
espero que puedan darme sus opiniones !!!

Thanks!!!

Dios Les Bendiga.
Responder Con Cita
  #2 (permalink)  
Antiguo 16-12-2006, 09:02:13
Avatar de J.M.Movilla
Administrator
 
Registrado: dic 2002
Ubicación: BURGOS - ESPAÑA
Posts: 5.431
J.M.Movilla Valoración +2
Predeterminado

Sólo tienes que exigir que el texto contenga el carácter "@", y el carácter "." en una posición posterior.

Código:
If Trim(Text1.Text) = "" Then Exit Sub
n = InStr(Text1.Text, "@") 
If n = 0 Then
    msgbox("Introduzca correctamente la dirección de correo.")
    Text1.SetFocus
    Exit Sub
End If
If InStr(n + 1, Text1.Text, ".") = 0 Then
    msgbox("Introduzca correctamente la dirección de correo.")
    Text1.SetFocus
    Exit Sub
End If
__________________
José María Movilla Cuadrado
______________________

Visual Basic Videos Programacion Foro Programacion
Tutoriales Programacion Trucos Programacion Codigos Programacion
Responder Con Cita
Respuesta


Herramientas
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Trackbacks are habilitado
Pingbacks are habilitado
Refbacks are habilitado


Temas Similares
Tema Autor Foro Respuestas Último Mensaje
E-mail Insomnia17 VBA (Excel, Word, Outlook, Access) 2 09-02-2005 08:52:41
E-Mail con vb6 mcrex1 Visual Basic 6.00 1 20-12-2004 01:36:58
Enviar e-mail guerald Visual Basic.NET 2003 & 2005 0 30-11-2004 14:41:53
madar e-mail amatxo Visual Basic.NET 2003 & 2005 4 17-09-2004 01:00:00
enviar mail con vb chi_flao Visual Basic 6.00 1 28-02-1970 05:31:23


La franja horaria es GMT. Ahora son las 02:23:23.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2008, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO 3.1.0
A vBSkinworks Design

Alojado en el servicio Premium de Masquewebs | Diseño mejorado por MasqueWebs

right