Brinsley Carnival

<%@ Language=VBScript %> <% Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "192.168.0.10" ' Required Mail.Port = 25 ' Optional. Port is 25 by default %> <% Function IsValidEmail(Email) Dim ValidFlag,BadFlag,atCount,atLoop,SpecialFlag,UserName,DomainName,atChr,tAry1 ValidFlag = False If (Email <> "") And (InStr(1, Email, "@") > 0) And (InStr(1, Email, ".") > 0) Then atCount = 0 SpecialFlag = False For atLoop = 1 To Len(Email) atChr = Mid(Email, atLoop, 1) If atChr = "@" Then atCount = atCount + 1 If (atChr >= Chr(32)) And (atChr <= Chr(44)) Then SpecialFlag = True If (atChr = Chr(47)) Or (atChr = Chr(96)) Or (atChr >= Chr(123)) Then SpecialFlag = True If (atChr >= Chr(58)) And (atChr <= Chr(63)) Then SpecialFlag = True If (atChr >= Chr(91)) And (atChr <= Chr(94)) Then SpecialFlag = True Next If (atCount = 1) And (SpecialFlag = False) Then BadFlag = False tAry1 = Split(Email, "@") UserName = tAry1(0) DomainName = tAry1(1) If (UserName = "") Or (DomainName = "") Then BadFlag = True If Mid(DomainName, 1, 1) = "." then BadFlag = True If Mid(DomainName, Len(DomainName), 1) = "." then BadFlag = True ValidFlag = True End If End If If BadFlag = True Then ValidFlag = False IsValidEmail = ValidFlag End Function %> Brinsley Carnival

Welcome About Info Community Contact Us Forms Sponsors Newsletters The Team Programme Dog Show

Menu

Read Newsletters

** Help Needed **

Team members urgently needed!

Help SAVE OUR CARNIVAL.

Brinsley Carnival

Join our Facebook page

Follow brinsleycarniva on Twitter

Please download this form and return as directed

Funding Application form (PDF)

Funding Application Form (Word)

Brinsley Carnival is commited to provide funding to local good causes using any excess monies we make from the Carnival itself and our Santa Runs in December.

Committee Meetings

The AGM is;

September TBA 7:30pm

TBA

Carnival Images

Carnival History

Fancy helping us out on putting together the History of Brinsley Carnival? email us for further information.

Photo Gallery of 2007 Carnival

Photo Gallery of 2008 Carnival

© 2009 Brinsley Carnival Team, managed by re:think-IT Consultancy Services / Steve Potter - G6HOQ. All rights reserved.
Design and Website by Fifteen Design - Graphic design agency Nottingham All other trademarks mentioned in this document or Web site are the property of their respective owners.