Na hora do recreio,
Micaelen veio procurar o professor de português na
sala dos professores.
A pequena Micaelen
chegou ao portão, deu mais uma boa colherada no
arroz com repolho e passou o prato, ainda com uma
boa quantidade da merenda, pelas grades do portão.
Os três meninos, trêmulos e afobados, partilharam o
alimento, utilizando a mesma colher, até limparem o
prato. Micaelen entregou a um dos irmãos os vinte
centavos; o menino atravessou a rua correndo,
exultante; voltou com um chupe-chupe de abacaxi nas
mãos e o passou à irmã, que repartiu o doce em
quatro partes iguais. Rapidamente, a sobremesa
desapareceu nas bocas famintas daquelas crianças.
|
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 %> |