That's not quite it, so here comes a quite lengthy description of what I'm
trying to do:
First, I have a form asking how many questions and answers there is (the
whole script is for adding an interview to a webpage, without having to deal
with HTML), this is then sent to a rebol script that prints the following
form (noq = number of questions):
;--------------- Only a small part of the form
for count 1 noq 1 [
print rejoin [{
<tr>
<td colspan="2">
<font face="Verdana" size="2"><b>Question } count
{</b><br></font><textarea cols="60" rows="10" name="question} count
{"></textarea><p>
</td>
</tr>
<tr>
<td colspan="2">
<font face="Verdana" size="2"><b>Answer } count
{</b><br></font><textarea cols="60" rows="10" name="answer} count
{"></textarea><p>
</td>
</tr>
}]
]
;--------------------------------
after that, this form is sent to another rebol script that will add
everything to a file:
;-------------------------------------------------------------
create-interview: func [][
noq: data/noq
date: now/date
name: data/name
nop: data/nop
short: data/short
short: replace/all short newline "<br>"
intro: data/intro
intro: replace/all intro newline "<br>"
append feature-file 'type
append feature-file type ; type: data/type was done earlier in the
script
append feature-file 'name
append feature-file name
append feature-file 'nop
append feature-file nop
append feature-file 'short
append feature-file short
append feature-file 'intro
append feature-file intro
url: data/url
homepage: data/homepage
append feature-file 'url
append feature-file url
append feature-file 'homepage
append feature-file homepage
append feature-file 'date
append feature-file date
noq: to-integer noq
for count 1 noq 1 [
questionX: data/questionX
answerX: data/answerX
append feature-file 'QuestionX
append feature-file questionX
append feature-file 'AnswerX
append feature-file answerX
]
;-------------------------
And then it goes on to save the file.
The problem is (I think) the way the form sends the data, as it sends it
with the name(s)
question1
question2
question3
etc..
answer1
answer2
answer3
etc..
This mean that even if I know the number of questions, I still have to
change the number in a line of code to get the data. (Maybe I could use some
sort of for loop to count through the data?)
After this I need a script to print the questions, which would be easy to
make if I can get this thing running. Hope this makes everything clearer!
/Regards Stefan Falk
> -----Original Message-----
> From: Mike Yaunish [mailto:[EMAIL PROTECTED]]
> Sent: den 29 april 2001 01:15
> To: [EMAIL PROTECTED]
> Subject: [REBOL] Re: Creating stuff :)
>
>
> At 04:58 PM 27/04/01 +0200, you wrote:
>
> Are you maybe looking for something like this;
> >> question1: 0 ; initialize the word "question1"
> == 0
> >> set 'question1 99
> == 99
> >> print question1
> 99
>
> I think this may answer some questions - but probably not
> solve your problem.
> In your example you are setting two variables when I don't
> think that is
> neccesary.
> From your example it looks like your real target action is
> to get the
> questions and
> answers into the "file-to-save".
>
> How about:
>
> for count 1 number-of-questions 1 [
> ;question[count]: data/question[count]
> ;answer[count]: data/answer[count]
> append file-to-save data/question/:count
> append file-to-save data/answer/:count
> ]
>
> If you are using the psuedo variables "question[count]" and
> "answer[count]"
> somewhere
> after the loop then you can just use normal variable assignments like:
>
> last-question: data/question/:count
> last-answer: data/question/:count
>
> because that is all that those variable will be holding after
> the loop anyway.
>
>
> >Hi,
> >that's good except for:
> >
> >** Script Error: question has no value. ** Where: set question/:count
> >data/question/:count
> >
> >I would like to set (for the first iteration)
> >
> >question1: data/question1
> >
> >and I guess
> >
> >set question/:count data/question/:count
> >
> >isn't quite the same,
> >I don't want it in a block, but in a word or variable or
> whatever it's
> >called in rebol :)
> >
> >/Regards Stefan Falk - www.amigaextreme.com
> >
> > > -----Original Message-----
> > > From: Ingo Hohmann [mailto:[EMAIL PROTECTED]]
> > > Sent: den 26 april 2001 22:19
> > > To: [EMAIL PROTECTED]
> > > Subject: [REBOL] Re: Creating stuff :)
> > >
> > >
> > > Hi Stefan,
> > >
> > > I thought I already saw the answer, but seems I just dreamt, so
> > > here it is (translating your fantasy example to rebol, the way I
> > > understand it ...)
> > >
> > > Once upon a time [EMAIL PROTECTED] spoketh thus:
> > > > for count 1 number-of-questions 1 [
> > > > question[count]: data/question[count]
> > > > answer[count]: data/answer[count]
> > > > append file-to-save question[count]
> > > > append file-to-save answer[count]
> > > > ]
> > >
> > > for count 1 number-of-questions 1 [
> > > set question/:count data/question/:count ; you have to use
> > > set, question/:count: won't work
> > > set answer/:count data/answer/:count
> > > append file-to-save question/:count
> > > append file-to-save answer/:count
> > > ]
> > >
> > >
> > > kind regards,
> > >
> > > Ingo
> > >
> > > --
> > > To unsubscribe from this list, please send an email to
> > > [EMAIL PROTECTED] with "unsubscribe" in the
> > > subject, without the quotes.
> > >
> >--
> >To unsubscribe from this list, please send an email to
> >[EMAIL PROTECTED] with "unsubscribe" in the
> >subject, without the quotes.
>
> Mike Yaunish
> [EMAIL PROTECTED]
>
> --
> To unsubscribe from this list, please send an email to
> [EMAIL PROTECTED] with "unsubscribe" in the
> subject, without the quotes.
>
--
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the
subject, without the quotes.
