CTB particpa de reunião com centrais e reforça defesa pela manutenção das cotas
A secretaria de Combate ao Racismo da CTB participou no último dia 11, ao lado das centrais sindicais CUT,CGT, CGTB de uma reunião com o Secretário Edson Santos, na SEPPIR (Secretaria de Promoção da Igualdade Racial). No encontro as centrais assumiram o compromisso de, mais uma vez, unificar seus esforços na defesa da manutenção das COTAS para estudantes não brancos nas universidades públicas.
Valmira Luzia e o secretário Edson Santos
Segundo Valmira Luzia, secretária de Combate ao Racismo da CTB, a luta pelo direito a formação intelectual para todos e todas é a garantia da participação democrática da população nas esferas da sociedade e principalmente no trabalho. "Atualmente a população negra ocupa a base da pirâmide econômica no país, pois obrigados ao exercício do trabalho precário, sem oportunidade de ascensão e vitimas da discriminação e opressão", afirmou a secretária.
De acordo com o ouvidor Humberto Adami Santos Junior, a participação do movimento sindical através das centrais reafirma para toda a sociedade a importância da aplicação das políticas afirmativas como instrumento de inclusão social.
"A CTB repudia a ação impetrada na justiça pelo fim das cotas e continuará empreendendo esforços para fortalecer as ações de construção de uma sociedade classista e igualitária que garanta, renda , emprego digno e equidade social para todos e todas", reafirmou Valmira Luzia.
Fipir
Já entre os dias 11 e 13, a secretária de Combate ao Racismo, representou a CTB no VIII Encontro Nacional do Fórum Intergovernamental de Promoção da Igualdade Racial (FIPIR), em Brasília. O objetivo do evento é pactuar com os gestores de todo o país as políticas prioritárias para 2010.
No encontro também foram definidas as ações para o próximo ano que serão realizadas em todos os Estados, elas terão o objetivo de intensificar a criação de mecanismos de combate à discriminação racial contra negros, índios e outros povos no Brasil.
Também fizeram parte da pauta o Estatuto da Igualdade Racial, o Plano Nacional de Promoção da Igualdade Racial (PLANAPIR), e as resoluções da II Conferência Nacional de Promoção da Igualdade Racial (II CONAPIR), realizada no último mês de junho.
Fonte: Portal CTB
" & vbCrLf 'Response.Write strReferringPage & "
" & vbCrLf ' Read in and set the initial values of our message parameters strFromName = Trim(Request.Form("txtFromName")) strFromEmail = Trim(Request.Form("txtFromEmail")) strToEmail = Trim(Request.Form("txtToEmail")) strSubject = "www.contee.org.br" strBody = Trim(Request.Form("txtMessage")) ' I set the body message to a message that referenced the page the ' user arrived from. This makes it great if you place a link to it ' from your different articles, but can be weird if people link in ' from other web sites. If strBody = "" Then If strReferringPage = "" Or InStr(1, strReferringPage, "www.contee.org.br", 1) = 0 Then strBody = "" strBody = strBody & "O link abaixo é uma sugestão de leitura: CTB particpa de reunião com centrais e reforça defesa pela manutenção das cotas" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/msoc/nmsoc999.asp" & vbCrLf Else strBody = "O link abaixo é uma sugestão de leitura: CTB particpa de reunião com centrais e reforça defesa pela manutenção das cotas" sstrBody = strBody & "O link abaixo é uma sugestão de leitura: CTB particpa de reunião com centrais e reforça defesa pela manutenção das cotas" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/msoc/nmsoc999.asp" & vbCrLf End If End If ' Quick validation just to make sure our parameters are somewhat valid bValidInput = True bValidInput = bValidInput And strFromName <> "" bValidInput = bValidInput And IsValidEmail(strFromEmail) bValidInput = bValidInput And IsValidEmail(strToEmail) ' If valid send email and show thanks, o/w show form If bValidInput Then ' Set up our email object and send the message Set objCDONTS = Server.CreateObject("CDONTS.NewMail") objCDONTS.From = strFromName & " <" & strFromEmail & ">" objCDONTS.To = strToEmail objCDONTS.Subject = strSubject objCDONTS.Body = strBody objCDONTS.Send Set objCDONTS = Nothing ' Show our thank you message ShowThanksMsg Else If "http://" & Request.ServerVariables("HTTP_HOST") & strThisPage = strReferringPage Then Response.Write "Foi encontrado erro no preenchimento. Por favor confira os dados:" & "
" & vbCrLf End If ' Show our information retrieval form ShowReferralForm strThisPage, strFromName, strFromEmail, strToEmail, strBody End If ' End of page logic... subs and functions follow! %> <% ' Subroutines and Functions that encapsulate some functionality ' and make the above code easier to write... and read. ' A quick email syntax checker. It's not perfect, ' but it's quick and easy and will catch most of ' the bad addresses than people type in. Function IsValidEmail(strEmail) Dim bIsValid bIsValid = True If Len(strEmail) < 5 Then bIsValid = False Else If Instr(1, strEmail, " ") <> 0 Then bIsValid = False Else If InStr(1, strEmail, "@", 1) < 2 Then bIsValid = False Else If InStrRev(strEmail, ".") < InStr(1, strEmail, "@", 1) + 2 Then bIsValid = False End If End If End If End If IsValidEmail = bIsValid End Function ' I made this a function just to get it out of the ' logic and make it easier to read. It just shows the ' form that asks for the input Sub ShowReferralForm(strPageName, strFromName, strFromEmail, strToEmail, strBody) ' I use script_name so users can rename this script witout having to change the code. %> <% '
The Message to be sent:
'Subject: < %= strSubject % >
'Body: < %= strBody % >
End Sub ' This just shows our thank you message... probably didn't need to ' be a function, but since I made the form one I figured I'd do this ' for consistency. Sub ShowThanksMsg() %>Sua mensagem foi enviada com sucesso. <% End Sub %>