Hi melis,
On Thursday, April 04, 2002, 8:21:10 PM, you wrote:
m> So i wrote a script to send messages to my friend. But i cant send
m> more than 45 Characters?
The answer is in the source of SEND:
>> source send
send: func [
{Send a message to an address (or block of addresses)}
address [email! block!] "An address or block of addresses"
message "Text of message. First line is subject."
/only "Send only one message to multiple addresses"
/header "Supply your own custom header"
header-obj [object!] "The header to use"
/local smtp-port content do-send
][
; ... snipped
if not header [
header-obj: make system/standard/email [
subject: copy/part message any [find message newline 50]
]
]
; ... snipped
]
If the message contains a newline character, SEND takes as the
subject the text up to the first newline character; if not, SEND
takes as the subject the first 50 characters.
To avoid this behavior, just use the /header refinement of SEND:
send/header
[EMAIL PROTECTED]
"Message content"
make system/standard/email [Subject: "SMS text here"]
m> PS: How can i limit the text to 160 Characters?
copy/part text 160
Regards,
Gabriele.
--
Gabriele Santilli <[EMAIL PROTECTED]> -- REBOL Programmer
Amigan -- AGI L'Aquila -- REB: http://web.tiscali.it/rebol/index.r
--
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the
subject, without the quotes.
