Question

我有一张表格。代码是：

<html>  
<body>  
<form method="post" action="array.asp">  
<input type="text" name="Req_id1">  
Req_id:    
<input type="text" name="Req_id">  
<input type="submit" value="search" id=submit1 name=submit1>  
<select id="selFiles" name="selFiles" class="Select" style="width: 500px" tabindex="130">  
<%  

Dim req_id,myArray(11)  
req_id=Request.Form("Req_id")  

myArray(0) = "FCC_CITI_LONDON\FCC_V.FM_Release_5.0"  
myArray(1) = "FCC_CITIUSDDA\FC_UBS_V.UM_10.3.0.0.CitiUSDDA1.0"  
myArray(2) = "FCC_KorAm\Flexcube_V.CK_Release_5.0"  
myArray(3) = "FCC-CL\FCC-CL.1.1.1"  
myArray(4) = "Mayaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"  
myArray(5) = "Juneaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"  
myArray(6) = "Julyaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"  
myArray(7) = "Augustaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"  
myArray(8) = "Septemberaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"  
myArray(9) = "Octoberaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"  
myArray(10) = "Novemberaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"  
myArray(11) = "Decemberaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"  

Dim myArrResult  

myArrResult = Filter(myArray, req_id, True, vbTextCompare)  

Dim item  

For Each item In myArrResult  
     Response.Write("<option>" + item + "</option>")  
Next  

%>  
</select>  
</body>  
</html>

在表单之间有一个从数组中搜索字符串的选项。在点击提交时，结果显示在下拉框中。但问题是我放弃了之前在表格中输入的所有输入。例如：第一个输入框变为空白。我如何保留以前的输入？我已经能够保留文本字段的输入但无法保留文本区域的输入。非常感谢任何帮助。

Answer 1

对于简单的文本框，请尝试以下方法：

<input 
  type="text" 
  name="yourotherinput" 
  value="<%=Request.Form("yourotherinput")%>"
>

对于复选框和选择控件，您需要再做一些工作。

Answer 2

对于文本框，您只需执行诸如Thomask上面所说的内容：

<input 
  type="text" 
  name="yourotherinput" 
  value="<%=Request.Form("yourotherinput")%>"
>

对于选择，您将执行以下操作：

<select name = "state">
<option value = "0" <% if Request.Form("state") = "" then response.write("selected")%>>Select One:</option>
<option  value="AL" <% if Request.Form("state") = "AL" then response.write("selected")%>> Alabama</option>
<option  value="AK" <% if Request.Form("state") = "AK" then response.write("selected")%>> Alaska </option>
<option  value="AR" <% if Request.Form("state") = "AR" then response.write("selected")%>> Arkansas</option>
</select>

目前你正在做的一个问题是你的选项元素没有价值......所以真的没有办法比较它们。

同样使用您当前的方法，只需检查当前选择的是哪个，然后在构建动态选项按钮时简单地在关闭开始标记之前添加“已选择”。

[编辑] 正如托马斯克指出的那样：要在textarea上执行此操作，您可以执行以下操作：

<textarea name="comments" rows="2" cols="20">
<% if Request.Form("comments") = "" then response.write(Request.Form("comments"))%>
</textarea>

希望这有帮助。

单击提交按钮时保留表单输入

2 个答案: