(18)  If login not found, make sure it is a email address, and create login record
•      IF oRS.EOF THEN
•        IF INSTR(cUsername,"@")>0 AND LEN(cPassword)>=4 THEN
•          oConn.BeginTrans
•          AddRecord "View.Application","Email_,Group_,Password_,Status__lookup_",_
•            "'"+cUsername+"','Applicant','"+cPassword+"','New Application'"
•          NewLine
•   NewLine
•   Center
•   BeginBorder
•          BeginBox "cellpadding=5 width=300 cellspacing=3","bgcolor="+cLightBlue
•            Write Bold("Application with email address "+cUsername+" was added to the database.  Please log in again.")
•          EndBox
•          EndBox
•          NewLine
•          NewLine
•        ELSE
•          LoginOptions
•        END IF