Welcome to using Rebol!!
For debugging, I would probably put a print statement after the argument
assignment.
arguments: parse/all system/script/args none
print "arguments:"
print mold arguments
or, perhaps better,
arguments: parse/all system/script/args none
print ["arguments:" mold arguments]
The function mold turns whatever arguments is into a string.
Hope this helps.
--Stan
-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of
PSA102
Sent: Sunday, August 15, 2004 11:34 PM
To: Rebol Listserv
Subject: [REBOL] Help with script to send
Can someone help me with the script below. The error message is:
"Component: "System Port" 1.1.2.5 (30-Sep-2003/16:57:26)
Script: "User Preferences" (20-May-2001/21:08:16-4:00)
Script: "Send message with attachment script" (8-Aug-2004)
** Script Error: Invalid argument:
** Where: to-file
** Near: to file! :value"
I presume the problem is that the words messagefile, addressfile, etc. are
not properly typed or the
argument values are not properly loaded into them.
The first argument, messagefile, is the filename (drive,path, and filename)
of a text file that contains
the message to be sent. The message consists of lines, each 60 characters
or less, ending with an 0D0A.
The second argument, addressfile, is a text file with email addresses in it
(one per line). Attachfile is
a file with one or more filenames in it. This script is to be used to
distribute messages with one or
more attachments to a community email list.
The Rebol file is loaded by a REXX script that is also included below.
- - - - - - - - - - -
REBOL [
Title: "Send message with attachment script"
File: %sendattach6.r
Author: "jwirt"
Date: 8-8-04
Purpose: { Load an email script from command line, two arguments.
Uses REBOL 2.5.8.3.1 }
]
arguments: parse/all system/script/args none
addressfile: to-file first arguments
messagefile: to-file next arguments
attachfiles: to-file next arguments
members: make block!
message: make string!
attachfiles: make block!
message: read/lines messagefile
members: load addressfile
attachfiles: [%test1.txt %test2.txt]
send/attach members message attachfiles
. . . . . . . .
/* test shell for send attachment */
messagefile="message.txt"
addrfile="localaddresses.txt"
attachfile = "test1.txt"
address cmd
ok=directory("d:\rebol")
"rebol.exe sendattachtest6.r" addrfile read messagefile attachfile
address
--
To unsubscribe from the list, just send an email to rebol-request
at rebol.com with unsubscribe as the subject.
--
To unsubscribe from the list, just send an email to rebol-request
at rebol.com with unsubscribe as the subject.
