質問: sql & "where" end if sql= sql & fldname & "=yes" end if next とやってみたのですが、ぜんぜん駄目みたいです。 根本的にどこか間違ってますよね・・・。 直すところを教えてください。 お願いします。
回答: aspではvbやphpのようにフォームの項目を配列として取り扱うことは出来ません。下記のように行えばいいんじゃないでしょうか。 dim tatemonocount dim strsql dim strwhere tatemonocount = 2 '自分で件数を明記する strwhere = "" for i = 0 to tatemonocount if request.form("tetemono(" & i & ")") <> "" then strwhere = strwhere & "文字列と添え字iから作成されるフィールド名" = -1 end if next strsql="select * from [データ] " if strwhere <> "" then strsql = strsql & strwhere end if 'sqlの実行