Cabe destacar que, no início desta linha de edições e tendo em vista as nossas frentes de trabalho, a LINHA MESTRA pretende ser modesta. Porém, na caminhada, ao envolver os leitores numa grande rede, esta revista virtual pretende vôos mais arrojados, implementando uma quantidade mais diversificada de serviços aos professores e às escolas. LINHA MESTRA está aberta à contribuição de todos aqueles que possuam idéias - e textos - para fortalecer os movimentos em prol de uma leitura democrática e plural; por extensão, em prol de uma sociedade democrática e feliz. Os interessados podem submeter os seus textos ao Conselho Editorial para serem devidamente analisados. A Comissão Editorial enfatiza a importância e a necessidade do respeito às diferentes perspectivas teórico-metodológicas sobre leitura, linguagem, educação e ensino no Brasil. E entende que as diferenças defendidas e expressas pelas entidades são fundamentais para o enfrentamento dos desafios da área da leitura no Brasil. Que os leitores-navegadores tenham a crítica como a principal energia para movimentar todas os textos trazidos pela LINHA MESTRA. |
Copyright ©2006, by ALB/Campinas, SP, Brasil
|
<% dim done done = request.form("done") if done = "" then done = "No" %> <% Else if request.form("done") = "Yes" then 'sets variables dim email, sendmail, remet, remmail, dest email = request.form("email") remet = request.form("remet") remmail = request.form("remmail") dest = request.form("dest") Set sendmail = Server.CreateObject("CDONTS.NewMail") 'put the webmaster address here sendmail.From = remmail 'The mail is sent to the address entered in the previous page. sendmail.To = email 'Enter the subject of your mail here sendmail.Subject = "Indicação de Website" 'send a specific page or send a site url dim url url = Request.ServerVariables("HTTP_REFERER") 'This is the content of thr message. sendmail.Body = "Site recomendado pelo seu amigo!" & _ vbCrlf & vbCrlf & "Seu amigo " & remet & " entrou no site da ALB e indicou o link:" & _ vbCrlf & url & vbCrlf 'this sets mail priority.... 0=low 1=normal 2=high sendmail.Importance = 1 sendmail.Send 'Send the email! 'response.redirect Request.ServerVariables("HTTP_REFERER") Response.write " Indicação enviada para: " & email & "" End if End if %> |