<% '************************************************************************** 'Author: Darryl Johnstone '© This code may not be reused, resold without the permission of the Author! 'Created Date: January 21, 2003 'Purpose: NBFDEA start page '************************************************************************** Response.Expires = 0 Response.Buffer = false Dim intMessage, strUserName, strPassword, dbConn, blnLogin, adminRS, strSQL blnLogin = trim(request("login")) strUserName = trim(request("username")) strPassword = trim(request("password")) If blnLogin="yes" Then 'set connection Set dbConn = Server.CreateObject("ADODB.Connection") 'connection string and open dbConn.ConnectionString="DSN=swd_master_mysql" dbConn.Open strUserName = replace(strUserName,"'","''") strPassword = replace(strPassword,"'","''") strSQL = "SELECT admin_id FROM admins WHERE username='" & strUserName & "' AND password = '" & strPassword & "' " &_ "AND NBFDEA_member = true" Set adminRS = Server.CreateObject("ADODB.Recordset") adminRs.Open strSQL, dbConn If not(adminRS.bof or adminRS.eof)Then session("NBFDEA") = adminRS(0) Else 'clean up set adminRS = nothing set dbConn = nothing response.redirect("NBFDEA_login.asp?error=1") End If End If 'clean up set adminRS = nothing set dbConn = nothing If session("NBFDEA") = "" or IsEmpty(session("NBFDEA")) or IsNull(session("NBFDEA")) Then response.redirect("NBFDEA_login.asp?error=2") End If %> Welcome to the NBFDEA Site

An important article about S.A.R.S.
is now available in the NEWS section.

 


NOTICE OF NEXT MEETING

The summer meeting will be held Friday, August 22, 2003 at the Complexe Deux Rivieres, Tracadie-Sheila, NB.  The meeting will begin at 9 am.  Members of the Executive will meet the previous evening at 6:30 pm.

Complexe Deux Rivieres can be seen by visiting www.complexe2rivieres.ca.  Reservations MUST be made early (by Late April, Early May) if you are planning to attend.  The rates for one cabin is $139.00 per night (two rooms).  Make plans with someone else and the rate is more than reasonable.  Be sure to stipulate single or double beds.

Our meeting is held on Friday to accommodate those who want to make a weekend out of it.

Please download and read a copy
 of previous Meetings Minutes.

 

  
 

This website was designed for the New Brunswick Funeral Directors and Embalmers Association by Specialty Web Design.  Websites for the Funeral Industry.