' GMail Sender
    ' By Elektro
    '
    ' Usage Examples :
    ' GMailSender("Username@Gmail.com", "Password", "Email Subject", "Message Body", "Receiver@Address.com")
    '
    ''' <summary>
    ''' Sends an e-mail through GMail service.
    ''' </summary>
    ''' <param name="Username">Indicates the GMail account username.</param>
    ''' <param name="Password">Indicates the GMail account password.</param>
    ''' <param name="Subject">Indicates e-mail subject.</param>
    ''' <param name="Body">Indicates e-mail body.</param>
    ''' <param name="Addresses">Indicates the address(es) to send.</param>
    Private Sub GMailSender(ByVal Username As String,
                            ByVal Password As String,
                            ByVal Subject As String,
                            ByVal Body As String,
                            ByVal Addresses As String)
 
            Using MailSetup As New System.Net.Mail.MailMessage
 
                MailSetup.Subject = Subject
                MailSetup.To.Add(Addresses)
                MailSetup.From = New System.Net.Mail.MailAddress(Username)
                MailSetup.Body = Body
 
                Using SMTP As New System.Net.Mail.SmtpClient("smtp.gmail.com")
                    SMTP.Port = 587
                    SMTP.EnableSsl = True
                    SMTP.Credentials = New Net.NetworkCredential(Username, Password)
                    SMTP.Send(MailSetup)
                End Using ' SMTP
 
            End Using ' MailSetup
 
    End Sub

CHCP 1252 >NUL
editv64 -m -p "Esciba la contraseña >>" "PASSWORD"
Echo %PASSWORD%

if %op%==Yes goto LOCK
if %op%==yes goto LOCK

:PLAY
start test.txt

if EXIST "test.txt" goto NOTLOCKED
if NOT EXIST "test.txt" goto LOCKED