Hi Yoshi
Here is a little proc that reads all the form vars and returns them as a list. you can use it like that if you want them in an array:
array set Formvars [z_as_getform]
# ==========================================================
# z_as_getform -- get form parameters
#
# USAGE: z_as_getform [-tolower]
#
# RETURN: tuple list of form values
# ==========================================================
proc z_as_getform {args} {
global Page
set L {}
set f [ns_conn form]
if ![string length $f] {
return $L
}
set fsize [ns_set size $f]
set i 0
while { $i < $fsize } {
set key [ns_set key $f $i]
set val [ns_set value $f $i]
set lkey [string tolower $key]
if [string match -tolower $args] {
lappend L $lkey $val
} else {
lappend L $key $val
}
incr i
}
return $L
}
