Jump to content

Cannot find all email addresses without an @ in a text file


Recommended Posts

#include <MsgBoxConstants.au3>
#include <array.au3>

$File = FileOpen(@DesktopDir & "\email addresses 11-17-2015.txt")
$aArray = FileReadToArray($File)

For $i=0 To UBound($aArray)-1
    Local $x = StringInStr($aArray[$i],"@")
        If @error Then
            MsgBox(0,0,$aArray[$i] & " on line " & $i+1 & " is not a valid address.")
        EndIf
Next

MSgBox(0,0,"Done")

I have a list of 3600 email addresses and I need to check if there is an @ symbol in the email address. This is my code. I only get a message box with "Done" every time no matter what is in the email list. Here's an example list that I want to msgbox "Tedyahoo.com on line 3 is not a valid address."

Ted@charter.net
Ted@gmail.com
Tedyahoo.com
Ted@AOL.com

 

Get Scite to add a popup when you use a 3rd party UDF -> http://www.autoitscript.com/autoit3/scite/docs/SciTE4AutoIt3/user-calltip-manager.html

Link to comment
Share on other sites

"Not found" is returned in the Return value not in @error.

#include <MsgBoxConstants.au3>
#include <array.au3>

$File = FileOpen(@DesktopDir & "\email addresses 11-17-2015.txt")
$aArray = FileReadToArray($File)

For $i=0 To UBound($aArray)-1
    If StringInStr($aArray[$i],"@") = 0 Then MsgBox(0,0,$aArray[$i] & " on line " & $i+1 & " is not a valid address.")
Next

MSgBox(0,0,"Done")

 

My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2024-07-28 - Version 1.6.3.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example Scripts
OutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - Download
Outlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - Wiki
PowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - Wiki
Task Scheduler (2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki

Standard UDFs:
Excel - Example Scripts - Wiki
Word - Wiki

Tutorials:
ADO - Wiki
WebDriver - Wiki

 

Link to comment
Share on other sites

:)

My UDFs and Tutorials:

Spoiler

UDFs:
Active Directory (NEW 2024-07-28 - Version 1.6.3.0) - Download - General Help & Support - Example Scripts - Wiki
ExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example Scripts
OutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - Wiki
OutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - Download
Outlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - Wiki
PowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - Wiki
Task Scheduler (2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki

Standard UDFs:
Excel - Example Scripts - Wiki
Word - Wiki

Tutorials:
ADO - Wiki
WebDriver - Wiki

 

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

×
×
  • Create New...