• Sábado 21 de Diciembre de 2024, 16:13

Autor Tema:  Validar Ingreso De E-mail  (Leído 1625 veces)

seba_m

  • Miembro activo
  • **
  • Mensajes: 99
    • Ver Perfil
Validar Ingreso De E-mail
« en: Jueves 7 de Julio de 2005, 03:46 »
0
Buenas a todos,

NEcesito alguna rutina que valide el ingrso de e-mail, por ejemplo al estar el textbos vacio o al ingresar  "-"

Gracias

Hank

  • Nuevo Miembro
  • *
  • Mensajes: 3
    • Ver Perfil
Re: Validar Ingreso De E-mail
« Respuesta #1 en: Viernes 8 de Julio de 2005, 01:32 »
0
Código: Text
  1. Private Sub Command1_Click()
  2. d = InStr(1, Text1.Text, "@")
  3. If d Then
  4.  MsgBox "correo"
  5. End If
  6. End Sub
  7.  
SOMEHOW......

seba_m

  • Miembro activo
  • **
  • Mensajes: 99
    • Ver Perfil
Re: Validar Ingreso De E-mail
« Respuesta #2 en: Viernes 8 de Julio de 2005, 01:43 »
0
Gracias, pero en el caso de el ejemplo.com.ar se deben validar los puntos ?
y s ingreso en el campo un guin ?

GRacias

Hank

  • Nuevo Miembro
  • *
  • Mensajes: 3
    • Ver Perfil
Re: Validar Ingreso De E-mail
« Respuesta #3 en: Viernes 8 de Julio de 2005, 01:47 »
0
pues otra variable que anlize los puntos  :P
SOMEHOW......