Aprender e Ensinar: encontro reúne 50 professores finalistas em Brasília

Educadores de todo o Brasil, que desenvolvem projetos de tecnologia social, debatem o tema. Concurso premiará cinco iniciativas, uma de cada região do país.  

Professores visitam o projeto de tecnologia social de Produção  Agroecológica Sustentável (PAIS), em Cidade Ocidental (GO)

Com a presença de 50 professores de todas as regiões do Brasil, a Revista Fórum e a Fundação Banco do Brasil realizaram o Encontro de Finalistas do Concurso Aprender e Ensinar, em  Brasília, nos dias 10 e 11 de setembro. O  evento é uma oportunidade de os professores debaterem o tema tecnologia social e trocarem suas experiências desenvolvidas na sala de aula.

O Concurso Aprender e Ensinar está na sua segunda edição. Serão premiadas cinco iniciativas dessas 50 reunidas na capital federal, uma de cada região do Brasil. Para Jorge Streit, presidente da Fundação Banco do Brasil, “o fato de ser um dos finalistas já é motivo de grande honra para o participante”. O concurso recebeu 3.075 inscrições, 650 foram classificadas.

“A tecnologia social começa a entrar nas escolas e tem um potencial muito grande”, diz Streit. Ao promover o concurso em parceria com a Fórum, a FBB pretende difundir o conceito e multiplicar iniciativas. Segundo Streit, a tecnologia social orienta toda a atuação da instituição. Para as próximas edições do concurso, a Fundação buscará uma aproximação com o Banco do Brasil e seus gerentes de contas, espalhados por todo o país, para ampliar o número de projetos.

Na mesa de abertura, o vice-presidente do Banco do Brasil Robson Rocha ressaltou que esses educadores transformam a realidade. Além disso, destacou que o Concurso Aprender e Ensinar ocorre num momento histórico propício do país, em relação aos avanços sociais. “30 milhões de pessoas saíram da miséria”, avalia.

A abertura do evento contou também com a presença de Michele Lopes, da Rede de Tecnologia Social. Ela destacou que a FBB participou da criação da rede e hoje é uma das mantenedoras. Em seu site, a RTS disponibiliza um espaço aberto de conhecimento, onde é possível cadastrar experiências desenvolvidas. “Há pessoas que já desenvolvem tecnologias sociais e desconhecem o conceito”, afirma.

Para Maria do Pilar, secretária de Educação Básica do MEC, essas atitudes têm o poder de transformar a educação. “Estão ligadas à vida real e aos problemas reais das escolas”, destaca Pilar.

Na opinião do editor da Revista Fórum, Rovai, o Encontro dos Finalistas é a parte mais especial do prêmio. “É uma oportunidade para cada um qualificar ainda mais os seus projetos.” Os cinco vencedores do Concurso Aprender e Ensinar ganharão uma viagem a Dakar, no Senegal, participar do Fórum Social Mundial, de 2011.

Fonte: Revista Fórum

 

ENVIE A MATÉRIA:

 

<% Dim objCDONTS ' Email object Dim strFromName ' From persons' real name Dim strFromEmail, strToEmail ' Email addresses Dim strSubject, strBody ' Message Dim strThisPage ' This page's URL Dim strReferringPage ' The referring page's URL Dim bValidInput ' A boolean indicating valid parameters ' Retrieve this page name and referring page name strThisPage = Request.ServerVariables("SCRIPT_NAME") strReferringPage = Request.ServerVariables("HTTP_REFERER") ' Debugging lines: 'Response.Write strThisPage & "
" & 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: Aprender e Ensinar: encontro reúne 50 professores finalistas em Brasília" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/educacao/nedu1784.asp" & vbCrLf Else strBody = "O link abaixo é uma sugestão de leitura: Aprender e Ensinar: encontro reúne 50 professores finalistas em Brasília" sstrBody = strBody & "O link abaixo é uma sugestão de leitura: Aprender e Ensinar: encontro reúne 50 professores finalistas em Brasília" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/educacao/nedu1784.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. %>
Seu nome:
Seu e-mail:
Para:
 
<% '

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 %>