<div dir="ltr">A ideia do thunderburd no linux me parece a melhor.. acabei não comentando porque originalmente pensava<div style>em windows.</div></div><div class="gmail_extra"><br clear="all"><div>Abraços<br><br> Daniel Ikenaga<br>
<a href="http://twitter.com/dialetica" target="_blank"><font size="1"><b>@dialetica</b></font></a><br></div>
<br><br><div class="gmail_quote">2013/3/15 Daniel Ikenaga <span dir="ltr"><<a href="mailto:oladani@gmail.com" target="_blank">oladani@gmail.com</a>></span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div dir="ltr">Pedro,<div><br>O que diferencia a porta 25 da 587. Antes (porta 25), seria possível enviar um email como sendo de outra<br></div><div>pessoa, note, que na configuração do pacote não há a exigência da senha de email. Também era possível</div>
<div>ler todos os emails que trafegam pelas conexões. Utilizando a outra porta e um protocolo diferente, passa</div><div>a ter três etapas, na primeira a troca de informação sobre a encriptação e a segunda o envio do usuário e</div>
<div>senha e após isso uma nova encriptação para o envio do email. Isso, a atual versão do pacote não faz.</div><div><br></div><div>///</div><div><div>List of options:</div><div><br></div><div>smtpServerSMTP server to contact. This can either be the mail server responsible for the destination addresses domain or</div>
<div>a smarthost provided by your ISP or institution.<b> SMTP AUTH is currently unsupported.</b></div><div class="im"><div><br></div><div>smtpPortSMTP port to use. Usually 25 but some institutions require the use of the submission service (port 587).</div>
<div><br></div></div><div>verboseShow detailed information about message submission. Useful for debugging.</div></div><div><div>///</div><div><br></div><div><br></div><div>Não encontrei formas de modificar a porta, tanto no socketConnection como no sendmail control. <br>
</div><div>Então, sem uma nova atualização, o pacote me parece inutilizável.</div><div><br></div><div>Uma saída que talvez seja interessante é enviar para uma base de dados (mysql por exemplo) e no servidor desta base</div>
<div>e, que também tenha sendmail 587, deixar um schedule rodando, veja o Cron (<a href="http://en.wikipedia.org/wiki/Cron" target="_blank">http://en.wikipedia.org/wiki/Cron</a>).</div><div><br></div><div>Acho que é uma forma...<br>
<br>Abraços<div class="gmail_extra"><div><br> Daniel Ikenaga<br> <a href="http://twitter.com/dialetica" target="_blank"><font size="1"><b>@dialetica</b></font></a><br></div>
<br><br><div class="gmail_quote">2013/3/13 Cleber N.Borges <span dir="ltr"><<a href="mailto:klebyn@yahoo.com.br" target="_blank">klebyn@yahoo.com.br</a>></span><div><div class="h5"><br><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">
<div text="#000000" bgcolor="#FFFFFF">
<div><br>
no help do pacote diz ter uma função 'sendmail_options'<br>
<br>
com um parametro 'smtpPortSMTP' especificamente<br>
para mudar a porta 25.<br>
<br>
-----------<br>
• smtpPortSMTP port to use. Usually 25 but some institutions<br>
require the use of the submission service (port 587).<br>
----------<br>
<br>
talvez vale a pena fazer um ultimo teste com esse detalhe...<br>
<br>
não vi a thread toda, se já tentou isso, me desculpe pela bola
fora,<br>
caso não, fica a dica<br>
<br>
<br>
cleber<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
Em 13/03/2013 17:31, Pedro Emmanuel Alvarenga Americano do Brasil
escreveu:<br>
</div><div><div>
<blockquote type="cite">
<div dir="ltr">
<div>Daniel,</div>
<div>
<br>
</div>
<div>Quando voce diz um sendmail
externo seria do tipo ter um thunderbird configurado e o bat
executaria o thunderbird e mandaria a mensagem com o arquivo
anexado?</div>
<div><br>
</div>
<div>Bom... tem alguns bacanas
na internet que ja colocaram umas coisas assim, mas se for
assim, eu preferiria fazer manualmente mesmo. Eu queria
simplificar e não complicar.</div>
<div><br>
</div>
<div>Quanto a função send.email
na mensagem anterior, voce tem algum comentário porque dá
aquele erro de conexão?</div>
<div><br>
</div>
<div>Abraço,</div>
</div>
<div class="gmail_extra"><br clear="all">
<div><font color="#000066" face="'courier new', monospace">Dr. Pedro
Emmanuel A. A. do Brasil</font>
<div><font color="#000066" face="'courier new', monospace">Curriculum
Lattes:
<span style="text-align:left"><a href="http://lattes.cnpq.br/6597654894290806" target="_blank">http://lattes.cnpq.br/6597654894290806</a></span> <br>
Instituto de Pesquisa Clínica Evandro Chagas<br>
Fundação Oswaldo Cruz<br>
Rio de Janeiro - Brasil<br>
Av. Brasil 4365, <br>
CEP 21040-360,<br>
Tel <a href="tel:55%2021%203865-9648" value="+552138659648" target="_blank">55 21 3865-9648</a><br>
email: <a href="mailto:pedro.brasil@ipec.fiocruz.br" target="_blank">pedro.brasil@ipec.fiocruz.br</a><br>
email: <a href="mailto:emmanuel.brasil@gmail.com" target="_blank">emmanuel.brasil@gmail.com</a><br>
<br>
---Apoio aos softwares livres<br>
<a href="http://www.zotero.org" target="_blank">www.zotero.org</a> - gerenciamento de
referências bibliográficas. <br>
<a href="http://www.broffice.org" target="_blank">www.broffice.org</a> ou <a href="http://www.libreoffice.org/" target="_blank">www.libreoffice.org</a> -
textos, planilhas ou apresentações.<br>
<a href="http://www.epidata.dk" target="_blank">www.epidata.dk</a> - entrada de dados.<br>
<a href="http://www.r-project.org" target="_blank">www.r-project.org</a> - análise de
dados.<br>
<a href="http://www.ubuntu.com" target="_blank">www.ubuntu.com</a> - sistema operacional</font></div>
</div>
<br>
<br>
<div class="gmail_quote">Em 13 de março de 2013 17:34, Daniel
Ikenaga <span dir="ltr"><<a href="mailto:oladani@gmail.com" target="_blank">oladani@gmail.com</a>></span>
escreveu:<br>
<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">
<div dir="ltr">Fiz alguns testes, mas, é mesmo a limitação
do package. Não é possível mudar a porta 25. Não
<div>consegui criar uma porta 25 em um servidor para
testar. </div>
<div><br>
</div>
<div>Penso em duas saídas:
<div>
<br>
</div>
<div>Instalar um servidor com porta 25, o que acho
arriscado, pois facilmente cairia na black list e
spam,</div>
<div>ou fazer um bat num sendmail externo para ler a
atualização de um arquivo que seria salvo do R.</div>
<div><br>
</div>
</div>
</div>
<div class="gmail_extra"><br clear="all">
<div>Abraços<span><font color="#888888"><br>
<br>
Daniel Ikenaga<br>
<a href="http://twitter.com/dialetica" target="_blank"><font size="1"><b>@dialetica</b></font></a><br>
</font></span></div>
<div>
<div>
<br>
<br>
<div class="gmail_quote">2013/3/13 Pedro Emmanuel
Alvarenga Americano do Brasil <span dir="ltr"><<a href="mailto:emmanuel.brasil@gmail.com" target="_blank">emmanuel.brasil@gmail.com</a>></span><br>
<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">
<div dir="ltr">
<div>Daniel,</div>
<div>
<br>
</div>
<div>Mesmo
mudando a porta, a messagem de erro continua.
Acredito que dentro da função deve ter um bug
que mantem a porta 25 apesar de informar outra
porta como argumento da função. </div>
<div><br>
</div>
<div>
<div><font color="#000066" face="courier new,
monospace">> sendmail(from, to,
subject,
body,control=list(smtpPortSMTP=587,verboseShow=TRUE,smtpServer="<a href="http://ASPMX.L.GOOGLE.COM" target="_blank">ASPMX.L.GOOGLE.COM</a>"))</font></div>
<div>
<div><font color="#000066" face="courier new,
monospace">Erro em socketConnection(host
= server, port = port, blocking = TRUE)
: </font></div>
<div><font color="#000066" face="courier new,
monospace"> não é possível abrir a
conexão</font></div>
<div><font color="#000066" face="courier new,
monospace">Além disso: Mensagens de
aviso perdidas:</font></div>
<div><font color="#000066" face="courier new,
monospace">In socketConnection(host =
server, port = port, blocking = TRUE) :</font></div>
<div><font color="#000066" face="courier new,
monospace"> <a href="http://ASPMX.L.GOOGLE.COM:25" target="_blank">ASPMX.L.GOOGLE.COM:25</a>
cannot be opened</font></div>
<div>
<br>
</div>
</div>
<div>Por enquanto vou fazendo
manualmente mesmo. </div>
<div><br>
</div>
<div>Abraço forte,</div>
<div><br>
</div>
<div>
<br>
</div>
<div><br>
</div>
</div>
</div>
<div class="gmail_extra">
<div><br clear="all">
<div><font color="#000066" face="'courier
new', monospace">Dr. Pedro Emmanuel A. A.
do Brasil</font>
<div>
<font color="#000066" face="'courier new',
monospace">Curriculum Lattes:
<span style="text-align:left"><a href="http://lattes.cnpq.br/6597654894290806" target="_blank">http://lattes.cnpq.br/6597654894290806</a></span> <br>
Instituto de Pesquisa Clínica Evandro
Chagas<br>
Fundação Oswaldo Cruz<br>
Rio de Janeiro - Brasil<br>
Av. Brasil 4365, <br>
CEP 21040-360,<br>
Tel <a href="tel:55%2021%203865-9648" value="+552138659648" target="_blank">55
21 3865-9648</a><br>
email: <a href="mailto:pedro.brasil@ipec.fiocruz.br" target="_blank">pedro.brasil@ipec.fiocruz.br</a><br>
email: <a href="mailto:emmanuel.brasil@gmail.com" target="_blank">emmanuel.brasil@gmail.com</a><br>
<br>
---Apoio aos softwares livres<br>
<a href="http://www.zotero.org" target="_blank">www.zotero.org</a> -
gerenciamento de referências
bibliográficas. <br>
<a href="http://www.broffice.org" target="_blank">www.broffice.org</a>
ou <a href="http://www.libreoffice.org/" target="_blank">www.libreoffice.org</a> -
textos, planilhas ou apresentações.<br>
<a href="http://www.epidata.dk" target="_blank">www.epidata.dk</a> -
entrada de dados.<br>
<a href="http://www.r-project.org" target="_blank">www.r-project.org</a>
- análise de dados.<br>
<a href="http://www.ubuntu.com" target="_blank">www.ubuntu.com</a> -
sistema operacional</font></div>
</div>
<br>
<br>
</div>
<div class="gmail_quote">Em 12 de março de 2013
15:16, Daniel Ikenaga <span dir="ltr"><<a href="mailto:oladani@gmail.com" target="_blank">oladani@gmail.com</a>></span>
escreveu:
<div>
<div><br>
<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">
<div dir="ltr">Desconheço a utilização
avançada de R, mas teu problema não
seria na porta 25?
<div><br>
</div>
<div>Faz mais de 2 mês que o Google
não opera mais com a porta 25, só
com a 587 em SSL, daí, </div>
<div>
se não houver compatibilidade com
smtp em ssl, fosse o caso de usar
outro servidor.</div>
<div><br>
</div>
</div>
<div class="gmail_extra"><br clear="all">
<div>Abraços<br>
<br>
Daniel Ikenaga<br>
<a href="http://twitter.com/dialetica" target="_blank"><font size="1"><b>@dialetica</b></font></a><br>
</div>
<br>
<br>
<div class="gmail_quote">
<div>
<div>On Mon, Mar 11, 2013 at 10:23
AM, Pedro Emmanuel Alvarenga
Americano do Brasil <span dir="ltr"><<a href="mailto:emmanuel.brasil@gmail.com" target="_blank">emmanuel.brasil@gmail.com</a>></span>
wrote:<br>
</div>
</div>
<blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left-width:1px;border-left-color:rgb(204,204,204);border-left-style:solid;padding-left:1ex">
<div>
<div>
<div dir="ltr">
<div>
Amigos de R, </div>
<div>
<br>
</div>
<div>Sei que essa questão volta algumas
vezes na lista mas estou
empacado. Estou fazendo um
data management de um
projeto em que consiste em
repetidas vezes, tipo toda
semana, verificar quantos
voluntários entraram no
proejto, dados
inconsistentes, dados
ausentes e coisas assim.
Então, eu consegui fazer
um script para esse fim em
que gera um arquivo com
algumas tabelas e
graficos. </div>
<div><br>
</div>
<div>Agora eu gostaria de incluir nesse
script o envio de um email
pra mim mesmo com esse
arquivo, para que eu possa
verificar e depois
encaminhar para os outros
participantes. Sei que
existe o sendmailR, mas
não estou conseguindo
fazer funcionar. Encontrei
um catatau de gente
referindo o mesmo erro em
diversos diferentes
foruns: </div>
<div><br>
</div>
<div>
<div><font color="#000066" face="courier new,
monospace">>
sendmail(from, to,
subject,
body,control=list(smtpServer="<a href="http://ASPMX.L.GOOGLE.COM" target="_blank">ASPMX.L.GOOGLE.COM</a>"))</font></div>
<div><font color="#000066" face="courier new,
monospace">Erro em
socketConnection(host
= server, port = port,
blocking = TRUE) : </font></div>
<div><font color="#000066" face="courier new,
monospace"> não é
possível abrir a
conexão</font></div>
<div><font color="#000066" face="courier new,
monospace">Além disso:
Mensagens de aviso
perdidas:</font></div>
<div><font color="#000066" face="courier new,
monospace">In
socketConnection(host
= server, port = port,
blocking = TRUE) :</font></div>
<div><font color="#000066" face="courier new,
monospace"> <a href="http://ASPMX.L.GOOGLE.COM:25" target="_blank">ASPMX.L.GOOGLE.COM:25</a>
cannot be opened</font></div>
<div>
<br>
</div>
</div>
<div><br>
</div>
<div>
Depois, consegui encontrar
essa função em um dos
foruns. O autor fala que
funciona, mas comigo tem
dado um erro de
conectividade e eu não
sabendo como dar a volta
nesse erro. Será que tem
alguma relação com o
proxy?</div>
<div>
<div><font color="#000066" face="courier new,
monospace"><br>
</font></div>
<div><font color="#000066" face="courier new,
monospace">>
send.email</font></div>
<div><font color="#000066" face="courier new,
monospace">function(to,
from, subject, </font></div>
<div><font color="#000066" face="courier new,
monospace"> message,
attachment=NULL, </font></div>
<div><font color="#000066" face="courier new,
monospace"> username,
password, </font></div>
<div><font color="#000066" face="courier new,
monospace"> server="<a href="http://smtp.gmail.com:587" target="_blank">smtp.gmail.com:587</a>", </font></div>
<div><font color="#000066" face="courier new,
monospace">
confirmBeforeSend=TRUE){ </font></div>
<div><font color="#000066" face="courier new,
monospace"> # to: a
list object of length
1. Using
list("Recipient" = "<a href="mailto:recip@somewhere.net" target="_blank">recip@somewhere.net</a>")
will send the message
to the address but </font></div>
<div><font color="#000066" face="courier new,
monospace"> # the
name will appear
instead of the
address. </font></div>
<div><font color="#000066" face="courier new,
monospace"> # from: a
list object of length
1. Same behavior as
'to' </font></div>
<div><font color="#000066" face="courier new,
monospace"> #
subject: Character(1)
giving the subject
line. </font></div>
<div><font color="#000066" face="courier new,
monospace"> #
message: Character(1)
giving the body of the
message </font></div>
<div><font color="#000066" face="courier new,
monospace"> #
attachment:
Character(1) giving
the location of the
attachment </font></div>
<div><font color="#000066" face="courier new,
monospace"> #
username: character(1)
giving the username.
If missing and you
are using Windows, R
will prompt you for
the username. </font></div>
<div><font color="#000066" face="courier new,
monospace"> #
password: character(1)
giving the password.
If missing and you
are using Windows, R
will prompt you for
the password. </font></div>
<div>
<font color="#000066" face="courier new,
monospace"> # server:
character(1) giving
the smtp server. </font></div>
<div><font color="#000066" face="courier new,
monospace"> #
confirmBeforeSend:
Logical. If True, a
dialog box appears
seeking confirmation
before sending the
e-mail. This is to </font></div>
<div><font color="#000066" face="courier new,
monospace"> #
prevent me
to send multiple
updates to a
collaborator while I
am working
interactively. </font></div>
<div>
<font color="#000066" face="courier new,
monospace"> </font></div>
<div><font color="#000066" face="courier new,
monospace"> if
(!is.list(to) |
!is.list(from))
stop("'to' and 'from'
must be lists") </font></div>
<div><font color="#000066" face="courier new,
monospace"> if
(length(from) > 1)
stop("'from' must have
length 1") </font></div>
<div><font color="#000066" face="courier new,
monospace"> if
(length(to) > 1)
stop("'send.email'
currently only
supports one recipient
e-mail address") </font></div>
<div><font color="#000066" face="courier new,
monospace"> if
(length(attachment)
> 1)
stop("'send.email' can
currently send only
one attachment") </font></div>
<div>
<font color="#000066" face="courier new,
monospace"> if
(length(message) >
1){ </font></div>
<div><font color="#000066" face="courier new,
monospace">
stop("'message' must
be of length 1") </font></div>
<div><font color="#000066" face="courier new,
monospace"> message
<- paste(message,
collapse="\\n\\n") </font></div>
<div><font color="#000066" face="courier new,
monospace"> } </font></div>
<div><font color="#000066" face="courier new,
monospace"> </font></div>
<div><font color="#000066" face="courier new,
monospace"> if
(is.null(names(to)))
names(to) <- to </font></div>
<div><font color="#000066" face="courier new,
monospace"> if
(is.null(names(from)))
names(from) <-
from </font></div>
<div><font color="#000066" face="courier new,
monospace"> if
(!is.null(attachment))
if
(!file.exists(attachment))
stop(paste("'",
attachment, "' does
not exist!", sep="")) </font></div>
<div><font color="#000066" face="courier new,
monospace"> </font></div>
<div><font color="#000066" face="courier new,
monospace"> if
(missing(username))
username <-
winDialogString("Please
enter your e-mail
username", "") </font></div>
<div><font color="#000066" face="courier new,
monospace"> if
(missing(password))
password <-
winDialogString("Please
enter your e-mail
password", "") </font></div>
<div>
<font color="#000066" face="courier new,
monospace"> </font></div>
<div><font color="#000066" face="courier new,
monospace">
require(rJython) </font></div>
<div><font color="#000066" face="courier new,
monospace"> rJython
<- rJython() </font></div>
<div><font color="#000066" face="courier new,
monospace"><br>
</font></div>
<div><font color="#000066" face="courier new,
monospace">
rJython$exec("import
smtplib") </font></div>
<div><font color="#000066" face="courier new,
monospace">
rJython$exec("import
os") </font></div>
<div><font color="#000066" face="courier new,
monospace">
rJython$exec("from
email.MIMEMultipart
import
MIMEMultipart") </font></div>
<div><font color="#000066" face="courier new,
monospace">
rJython$exec("from
email.MIMEBase import
MIMEBase") </font></div>
<div><font color="#000066" face="courier new,
monospace">
rJython$exec("from
email.MIMEText import
MIMEText") </font></div>
<div><font color="#000066" face="courier new,
monospace">
rJython$exec("from
email.Utils import
COMMASPACE,
formatdate") </font></div>
<div><font color="#000066" face="courier new,
monospace">
rJython$exec("from
email import
Encoders") </font></div>
<div><font color="#000066" face="courier new,
monospace">
rJython$exec("import
email.utils") </font></div>
<div><font color="#000066" face="courier new,
monospace"><br>
</font></div>
<div><font color="#000066" face="courier new,
monospace">
mail<-c( </font></div>
<div><font color="#000066" face="courier new,
monospace"> #Email
settings </font></div>
<div><font color="#000066" face="courier new,
monospace">
paste("fromaddr = '",
from, "'", sep=""), </font></div>
<div><font color="#000066" face="courier new,
monospace">
paste("toaddrs = '",
to, "'", sep=""), </font></div>
<div><font color="#000066" face="courier new,
monospace"> "msg =
MIMEMultipart()", </font></div>
<div><font color="#000066" face="courier new,
monospace">
paste("msg.attach(MIMEText('",
message, "'))",
sep=""), </font></div>
<div><font color="#000066" face="courier new,
monospace">
paste("msg['From'] =
email.utils.formataddr(('",
names(from), "',
fromaddr))", sep=""), </font></div>
<div><font color="#000066" face="courier new,
monospace">
paste("msg['To'] =
email.utils.formataddr(('",
names(to), "',
toaddrs))", sep=""), </font></div>
<div><font color="#000066" face="courier new,
monospace">
paste("msg['Subject']
= '", subject, "'",
sep="")) </font></div>
<div><font color="#000066" face="courier new,
monospace"> </font></div>
<div><font color="#000066" face="courier new,
monospace"> if
(!is.null(attachment)){ </font></div>
<div><font color="#000066" face="courier new,
monospace"> mail
<- c(mail, </font></div>
<div><font color="#000066" face="courier new,
monospace">
paste("f = '",
attachment, "'",
sep=""), </font></div>
<div><font color="#000066" face="courier new,
monospace">
"part=MIMEBase('application',
'octet-stream')", </font></div>
<div><font color="#000066" face="courier new,
monospace">
"part.set_payload(open(f,
'rb').read())", </font></div>
<div><font color="#000066" face="courier new,
monospace">
"Encoders.encode_base64(part)", </font></div>
<div><font color="#000066" face="courier new,
monospace">
"part.add_header('Content-Disposition',
'attachment;
filename=\"%s\"' %
os.path.basename(f))", </font></div>
<div><font color="#000066" face="courier new,
monospace">
"msg.attach(part)") </font></div>
<div><font color="#000066" face="courier new,
monospace"> } </font></div>
<div><font color="#000066" face="courier new,
monospace"><br>
</font></div>
<div><font color="#000066" face="courier new,
monospace">#SMTP
server credentials </font></div>
<div>
<font color="#000066" face="courier new,
monospace"> mail
<- c(mail, </font></div>
<div><font color="#000066" face="courier new,
monospace">
paste("username = '",
username, "'",
sep=""), </font></div>
<div><font color="#000066" face="courier new,
monospace">
paste("password = '",
password, "'",
sep=""), </font></div>
<div><font color="#000066" face="courier new,
monospace"><br>
</font></div>
<div><font color="#000066" face="courier new,
monospace">#Set SMTP
server and send email,
e.g., google mail SMTP
server </font></div>
<div><font color="#000066" face="courier new,
monospace">
paste("server =
smtplib.SMTP('",
server, "')",
sep=""), </font></div>
<div><font color="#000066" face="courier new,
monospace">
"server.ehlo()", </font></div>
<div><font color="#000066" face="courier new,
monospace">
"server.starttls()", </font></div>
<div><font color="#000066" face="courier new,
monospace">
"server.ehlo()", </font></div>
<div><font color="#000066" face="courier new,
monospace">
"server.login(username,password)", </font></div>
<div><font color="#000066" face="courier new,
monospace">
"server.sendmail(fromaddr,
toaddrs,
msg.as_string())", </font></div>
<div><font color="#000066" face="courier new,
monospace">
"server.quit()") </font></div>
<div><font color="#000066" face="courier new,
monospace"><br>
</font></div>
<div><font color="#000066" face="courier new,
monospace">
message.details <- </font></div>
<div>
<font color="#000066" face="courier new,
monospace">
paste("To:
", names(to), " (",
unlist(to), ")",
"\n", </font></div>
<div><font color="#000066" face="courier new,
monospace">
"From: ",
names(from), " (",
unlist(from), ")",
"\n", </font></div>
<div><font color="#000066" face="courier new,
monospace">
"Using server: ",
server, "\n", </font></div>
<div><font color="#000066" face="courier new,
monospace">
"Subject: ",
subject, "\n", </font></div>
<div><font color="#000066" face="courier new,
monospace">
"With Attachments: ",
attachment, "\n", </font></div>
<div><font color="#000066" face="courier new,
monospace">
"And the message:\n",
message, "\n",
sep="") </font></div>
<div><font color="#000066" face="courier new,
monospace"><br>
</font></div>
<div><font color="#000066" face="courier new,
monospace"> if
(confirmBeforeSend) </font></div>
<div>
<font color="#000066" face="courier new,
monospace"> SEND
<-
winDialog("yesnocancel",
paste("Are you sure
you want to send this
e-mail to ",
unlist(to), "?",
sep="")) </font></div>
<div><font color="#000066" face="courier new,
monospace"> else
SEND <- "YES" </font></div>
<div><font color="#000066" face="courier new,
monospace"> </font></div>
<div><font color="#000066" face="courier new,
monospace"> if (SEND
%in% "YES"){ </font></div>
<div><font color="#000066" face="courier new,
monospace">
jython.exec(rJython,mail) </font></div>
<div><font color="#000066" face="courier new,
monospace">
cat(message.details) </font></div>
<div><font color="#000066" face="courier new,
monospace"> } </font></div>
<div>
<font color="#000066" face="courier new,
monospace"> else
cat("E-mail Delivery
was Canceled by the
User") </font></div>
<div><font color="#000066" face="courier new,
monospace">}</font></div>
<div><font color="#000066" face="courier new,
monospace"><br>
</font></div>
<div><font color="#000066" face="courier new,
monospace">
<div>from
<-
list("Recipient" = "<a href="mailto:emmanuel.brasil@gmail.com" target="_blank">emmanuel.brasil@gmail.com</a>")</div>
<div>to
<-
list("Recipient" = "<a href="mailto:emmanuel.brasil@gmail.com" target="_blank">emmanuel.brasil@gmail.com</a>")</div>
<div>subject
<-
paste0("Pendencias
Nomograma de
",Sys.time())</div>
<div>
<div>message
<- "Mensagem
automática com
relatório de
pendências do
projeto
Nomograma."</div>
<div>attachment
<-
'c:/banco/nomograma/Controle_recrutamento.doc'</div>
<div>>
send.email(to,from,subject,message,attachment,'<a href="mailto:emmanuel.brasil@gmail.com" target="_blank">emmanuel.brasil@gmail.com</a>','...',confirmBeforeSend=FALSE)<br>
</div>
</div>
</font></div>
<div>
<font color="#000066" face="courier new,
monospace">
<div>Erro
em
jython.exec(rJython,
mail) : (62,
'Connection
refused')</div>
<div><br>
</div>
</font></div>
<div><font color="#000066" face="courier new,
monospace">Qualquer
luz é bem vinda. </font></div>
<div><font color="#000066" face="courier new,
monospace"><br>
</font></div>
<div><font color="#000066" face="courier new,
monospace">Abraço
forte,</font></div>
</div>
<div>
<br>
</div>
<div><font color="#000066" face="'courier new',
monospace">Dr. Pedro
Emmanuel A. A. do Brasil</font>
<div><font color="#000066" face="'courier new',
monospace">Curriculum
Lattes:
<span style="text-align:left"><a href="http://lattes.cnpq.br/6597654894290806" target="_blank">http://lattes.cnpq.br/6597654894290806</a></span> <br>
Instituto de Pesquisa
Clínica Evandro Chagas<br>
Fundação Oswaldo Cruz<br>
Rio de Janeiro -
Brasil<br>
Av. Brasil 4365, <br>
CEP 21040-360,<br>
Tel <a href="tel:55%2021%203865-9648" value="+552138659648" target="_blank">55
21 3865-9648</a><br>
email: <a href="mailto:pedro.brasil@ipec.fiocruz.br" target="_blank">pedro.brasil@ipec.fiocruz.br</a><br>
email: <a href="mailto:emmanuel.brasil@gmail.com" target="_blank">emmanuel.brasil@gmail.com</a><br>
<br>
---Apoio aos softwares
livres<br>
<a href="http://www.zotero.org" target="_blank">www.zotero.org</a> -
gerenciamento de
referências
bibliográficas. <br>
<a href="http://www.broffice.org" target="_blank">www.broffice.org</a> ou <a href="http://www.libreoffice.org/" target="_blank">www.libreoffice.org</a> -
textos, planilhas ou
apresentações.<br>
<a href="http://www.epidata.dk" target="_blank">www.epidata.dk</a> -
entrada de dados.<br>
<a href="http://www.r-project.org" target="_blank">www.r-project.org</a> -
análise de dados.<br>
<a href="http://www.ubuntu.com" target="_blank">www.ubuntu.com</a> -
sistema operacional</font></div>
</div>
</div>
<br>
</div>
</div>
_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>)
e forneça código mínimo
reproduzível.<br>
</blockquote>
</div>
<br>
</div>
<br>
_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>)
e forneça código mínimo reproduzível.<br>
</blockquote>
</div>
</div>
</div>
<br>
</div>
<br>
_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>)
e forneça código mínimo reproduzível.<br>
</blockquote>
</div>
<br>
</div>
</div>
</div>
<br>
_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>)
e forneça código mínimo reproduzível.<br>
</blockquote>
</div>
<br>
</div>
<br>
<fieldset></fieldset>
<br>
<pre>_______________________________________________
R-br mailing list
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.</pre>
</blockquote>
<br>
</div></div></div>
<br>_______________________________________________<br>
R-br mailing list<br>
<a href="mailto:R-br@listas.c3sl.ufpr.br" target="_blank">R-br@listas.c3sl.ufpr.br</a><br>
<a href="https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br" target="_blank">https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br</a><br>
Leia o guia de postagem (<a href="http://www.leg.ufpr.br/r-br-guia" target="_blank">http://www.leg.ufpr.br/r-br-guia</a>) e forneça código mínimo reproduzível.<br></blockquote></div></div></div><br></div></div></div></div>
</blockquote></div><br></div>