コンボボックスで選択された情報がAccess(データベース)へ登録され、その情報を表示する一覧画面があります。一度登録された情報を更新するために、更新ボタンを作成し、ページ遷移した時に、元々登録されたいた情報を保持したまま表示させたいのですが、どのようにしたらいいですか?(変更しない情報もある場合手間を省くため)
コンボボックスには2種類あり、1種類はベタ打ちで選択肢を記述したもの、もう1種はAccessにあるデータマスタからSQLで作られています。
ベタ打ちの方は
Quadruple(strItem,strA,strB,strC,strD,flg,ByRef obj)
select Case flg
select "0"
strCheckA = "selected"
select "1"
strCheckB = "selected"
select "2"
strCheckC = "selected"
select "3"
strCheckD = "selected"
End select
という関数で、
Call Quadruple("Item01","","A","B","C",DbCur.Fields(0).Value,obj)
で呼び出しているのですが、これは登録された情報を維持しながら表示させることができています。
しかし、もう一つのコンボボックスが同じようにできません。
Combo(strItem,strTable,strSdate,intChange,ByRef obj)
という関数で、
Call Combo("Item02","データマスタ",2003/11/11",True,obj)
で呼び出しています。しかし表示されるのは空白のコンボボックスです。
DbCur.Fields(1).Value
をどこかに入れないといけないのはわかりますが、どのようにすればいいのかわかりません。
もし何かヒントでもわかる方いましたらアドバイスお願いします。