0

こんにちは、データベースにエントリを書き込むフォームを作成しています。このフォームは開いて編集できます。以前の回答でフォームを開く必要があります。フォームのフィールドの一部はピックリストです。ピックリスト オプションを表示する配列を作成しました。フォームが送信されると、選択したオプションがデータベースに挿入されます。ただし、フォームを再度開くと、その選択はピックリスト ボックスに表示されず、配列の最初の項目が表示されます。

私が使用しているコードは次のとおりです。

dim options, ar1, selectedvalue1, val1

selectedvalue1=Request.Form("pref")

ar1=array("Phone","Email","Trial","Employee","Beta")

for each val1 in ar1
options=options & "<option value=""" & val1 & """"
if val1=selectedvalue1 then options=options & " selected"
options=options & ">" & val1
next

<BR><BR>Preference: <form method="post"><select name="pref">
 <%=options%>
</select><br>
4

2 に答える 2

0

For Each ループでは、「val1」という名前の変数を使用していますが、ループ内では「val」変数のみを参照しています。このため、値はオプションに設定されていません。

ループを次のように変更します。

for each val1 in ar1
options=options & "<option value=""" & val1 & """"
if val1=selectedvalue1 then options=options & " selected"
options=options & ">" & val1
next
于 2015-02-27T20:21:10.970 に答える
0

ありがとうルーク。いくつかの変更を加える必要がありました。データベースに「dboptions」を問い合わせています。このコードは機能しています:

dim options, ar1, val1

ar1=array("Phone","Email","Trial","Employee","Beta")

for each val1 in ar1
options=options & "<option value=""" & val1 & """"
if val1=dboptions then 
options=options & " selected"
End If
options=options & ">" & val1
next

<BR><BR>Preference: <select name="pref">
 <%=options%>
</select><br>
于 2015-03-02T16:53:45.067 に答える