![]() |
| encap sdk probleme avec le scheme tcp | |
| cr8825 | 10-Feb-2009/12:51:21+1:00 |
| bonjour, je voudrais faire un petit executable rebol pour l'envoie de mail avec parametre. voici la source
rebol[]
#include %/H/rebol/rebol-sdk-276/source/mezz.r
#include %/H/rebol/rebol-sdk-276/source/prot.r
parms: system/options/args
either none? parms [
to: []
msg: ""
][
to: load parms/1
msg: parms/2
]
system-name: first parse read dns://127.0.0.1 "."
set-net [
RobotMail@rebol.cc
"fdexchange"
""
"161.165.45.120"
8080
generic
]
header: make system/standard/email [
Subject: join "Message de " system-name
Organization: "Sendmail.exe REBOL compilation"
Content-Type: "text/html"
]
if (none? to) or (empty? to) [to: [test@test.cc]]
if (none? msg) or (empty? msg) [msg: "programme sendmail par rebol"]
send/header to msg header
voici mon probleme lors de l'execution du sendmail.exe ** Script Error: tcp has no value ** Where: open-proto ** Near: scheme: tcp host: either all ** Press enter to quit... ai je oublié quelque chose ?????? merci d'avance | |
| cr8825 | 10-Feb-2009/14:57:23+1:00 |
| bon j'ai trouvé le probleme est la variable "TO" je l'ai remplacé par TODEST et c'est ok merci | |
|
Login required to Post. | |