Scheme(Gauche)でCGI5 : (2004/10/15)

フォームの自動処理をやってみる
前回のヤツは忘れてください・・・
使い方は以下のように

html-bodyは、出力するhtml文字列
form-paramは、フォームを構成する入力欄のnameをkeyとしたハッシュテーブル

(defin form-param (make-hash-table))
;; 対象がtextやhiddenとかなら、valueに値をセット
(hash-table-put! form-param "input_str" "testtest")
;; 対象がラジオボタンとかなら自動的に"checked"を付加
(hash-table-put! form-param "btn1" "4")
;; 対象がcheckboxなら、リスト渡しで複数の項目にcheckedを付加
(hash-table-put! form-param "chk" (list "1" "4" "5"))


(display
  (html-form-fill
    html-body
    form-param))

: back