Results 1 to 2 of 2

Thread: email validation

  1. #1

    Thread Starter
    Member
    Join Date
    Feb 2012
    Posts
    49

    Smile email validation

    Hi,I have a question for anyone who knows to resolve.
    I making an "sign in" application for checking email address with username and password as input.As output it will show me msgbox with content "Your email and password are correct!" or Not.

    Problem is at the end of the code.
    Please try to help me. . .

    There is a code:

    Code:
    Imports System.Net.Mail
    Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    'Declare variables
    Dim sSelectedSMTPServer As String = ""
    Dim iSelectedSMTPPort As Integer
    
    'Check wich email account is selected and provide correct smtp address / port.
    Select Case True
    Case CheckBox1.Checked
    sSelectedSMTPServer = "smtp.gmail.com"
    iSelectedSMTPPort = 587
    Case CheckBox2.Checked
    sSelectedSMTPServer = "smtp.live.com"
    iSelectedSMTPPort = 587
    Case CheckBox3.Checked
    sSelectedSMTPServer = "smtp.mail.yahoo.com"
    iSelectedSMTPPort = 465
    Case Else
    'If no account is selected you will get a message and the program will not attempt to send the email.
    MsgBox("Please choose your email service.", vbInformation)
    End Select
    'For multiple selection
    If CheckBox1.Checked And CheckBox2.Checked Then
    MsgBox("You must select only one email service.", vbInformation)
    ElseIf CheckBox1.Checked And CheckBox3.Checked Then
    MsgBox("You must select only one email service.", vbInformation)
    ElseIf CheckBox2.Checked And CheckBox3.Checked Then
    MsgBox("You must select only one email service.", vbInformation)
    ElseIf CheckBox1.Checked And CheckBox2.Checked And CheckBox3.Checked Then
    MsgBox("You must select only one email service.", vbInformation)
    End If
    
    Exit Sub
    
    Dim SMTP As New SmtpClient
    'SSL enabled for outgoing mail.
    SMTP.EnableSsl = True
    'Get login credentials.
    SMTP.Credentials = New System.Net.NetworkCredential(TextBox1.Text, TextBox2.Text)
    'SMTP Port that will be used.
    SMTP.Port = iSelectedSMTPPort
    
    Try
    What???
    MsgBox("Successfully logged", MsgBoxStyle.Information, "Report")
    Me.Close()
    Catch ex As Exception
    MsgBox("Unsuccessfully logged", MsgBoxStyle.Exclamation, "Report")
    End Try
    End Sub

  2. #2
    Lively Member
    Join Date
    Apr 2006
    Posts
    68

    Re: email validation

    G'd afternoon!
    Usually when you sign some one in, is because he/she already registered right? if so you already have stored that info. and all what you have to do is to compare the input with the data stored.
    Most of websites send a message to that address to confirm that address. They do not attempt to use my registration credentials to log in to my e-mail account.
    May be i didn't get it, or may be you will have to provide more information.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width