Siga a @_contee na CONFECOM
A partir de segunda-feira, dia 14/12, acompanhe a cobertura online da 1ª Conferência Nacional de Comunicação na página da CONTEE no Twitter. A CONFECOM acontecerá em Brasília até o dia 17/12 e discutirá os principais temas relacionados à comunicação no Brasil. Veja aqui a programação completa da atividade.
A 1ª Conferência Nacional de Comunicação (1ª Confecom) terá uma programação de painéis que dará subsídios aos debates dos 15 grupos de trabalho que estarão reunidos para discutir a comunicação no Brasil. A conferência está programada para o Centro de Convenções Ulysses Guimarães, em Brasília, entre os dias 14 e 17 de dezembro.
A CONTEE irá acompanhar a atividade e fará a cobertura online na página da CONTEE no Twitter. Siga: http://twitter.com/_contee
Durante a CONFECOM, a Confederação irá lançar e distribuir a sua Revista CONTEÚDO – Especial Comunicação – Veja AQUI (LINK PARA: http://www.contee.org.br/noticias/contee/nco231.asp)
Programação da CONFECOM
Ao todo, serão quatro painéis no dia 15, terça-feira. Às 9h começa o painel internacional, com a presença do deputado argentino Gustavo Granero, também secretário-geral da Federação Argentina dos Trabalhadores de Imprensa, representando a sociedade civil, e do norte-americano Eli Noam, professor de finanças e economia e diretor do Instituto de Teleinformação da Universidade de Columbia, nos EUA, para representar a sociedade civil empresarial. Para Marcelo Bechara, presidente da Comissão Organizadora Nacional (CON), ambos podem contribuir para o debate brasileiro. “Convidamos os dois para que eles tragam experiências de outras realidades para o Brasil.”
Às 10h30 se iniciam os três painéis simultâneos de acordo com os eixos que norteiam a 1ª Confecom: Produção de conteúdo; Meios de distribuição; e Cidadania: direitos e deveres. Cada painel terá um representante indicado por cada segmento. “São pessoas com profundo conhecimento da comunicação”, elogia Bechara. “E o formato com mediação serve para tornar a conversa mais dinâmica e estimular a interlocução entre os painelistas”, destaca. Os painéis contarão com os seguintes participantes.
Eixo 1:
- Sociedade civil: Murilo César Ramos, professor da Universidade de Brasília
- Sociedade civil empresarial: Walter Vieira Ceneviva, vice-presidente executivo do Grupo Bandeirantes e jurista
- Poder público: Silvio Da-Rin, Secretário do Audiovisual do Ministério da Cultura e documentarista
Mediadora: Renata Fan, jornalista
Eixo 2:
- Sociedade civil: Celso Schröder, secretário-geral da Fenaj
- Sociedade civil empresarial: Frederico Nogueira, vice-presidente do Grupo Bandeirantes
- Poder público: Marcelo Bechara, consultor jurídico do Ministério das Comunicações
Mediador: Samuel Possebom, jornalista
Eixo 3:
- Sociedade civil: Luiza Erundina, deputada federal
- Sociedade civil empresarial: César Rômulo Silveira Neto, superintendente-executivo da Telebrasil
- Poder público: José Romão, jurista e pesquisador e ex-diretor do Dejus/Ministério da Justiça
Mediador: Lalo Leal, professor da USP
Abaixo, a programação completa da 1ª Confecom
Dia 14 de dezembro de 2009
9h - Abertura do credenciamento
17h – Plenária de votação do regimento interno da etapa nacional
19h – Abertura solene e homenagem a Daniel Herz
Dia 15 de dezembro de 2009
9h às 11h – Credenciamento de suplentes
9h – Painel internacional
10h30 – Painéis simultâneos por Eixo-Temático
12h – Intervalo para almoço
14h – Grupos de Trabalho (turno I)
19h - Jantar
Dia 16 de dezembro de 2009
9h – Grupos de Trabalho (turno II)
12h – Intervalo para almoço
14h30 – Plenária final (turno I)
19h - Jantar
Dia 17 de dezembro de 2009
9h – Plenária final (turno II)
12h – Intervalo para almoço
13h30 – Plenária final (turno III)
16h - Encerramento
Fonte: Assessoria CONFECOM, com informações da Redação
" & 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: Siga a @_contee na CONFECOM" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/contee/nco232.asp" & vbCrLf Else strBody = "O link abaixo é uma sugestão de leitura: Siga a @_contee na CONFECOM" sstrBody = strBody & "O link abaixo é uma sugestão de leitura: Siga a @_contee na CONFECOM" & vbCrLf strBody = strBody & vbCrLf strBody = strBody & "http://www.contee.org.br/noticias/contee/nco232.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 %>