if ($RS_UsersToRemind)
		{
			while(!$RS_UsersToRemind->EOF())
			{
				print  "$RS_UsersToRemind \n";
				my $test=eval $RS_UsersToRemind->Fields('idEnrollee')->{Value};
				print "test is : $test";
				my $SQL_UserUpdate = "update ClassRoster set Reminded={ fn NOW() } where idEnrollee = '".$RS_UsersToRemind->Fields('idEnrollee')->{Value}."';";
			    my $sender = new Mail::Sender
			    {
			        smtp => 'vaexch001.firstamericanmls.com', 
			        from => 'training@marketlinx.com'
			    };
			    (
			        ref ($sender->MailMsg( 
							{
			            to => "".$RS_UsersToRemind->Fields('emailAddress')->{Value}."",
								bcc => "training\@marketlinx.com, francisco.oquendo\@firstamericanmls.com,medwards\@marketlinx.com",
								subject => "REMINDER: ".$RS_UsersToRemind->Fields('Topic')->{Value}."",
								msg => 
"This message is to remind you that you are registered to attend ".$RS_UsersToRemind->Fields('Topic')->{Value}.".