Reset knap vil ikke virke
Her er min formular, som jeg gerne vil kunne nulstille ved tryk på min resetknap, men det virker ikke...Kan nogen hjælpe på vej?
<form method="post" action="kunde.asp">
<table width="760" border="0" cellpadding="3">
<tr>
<td height="30" colspan="4" class="underrub">FIND FORHANDLER</td>
</tr>
<tr>
<td width="78" height="25" class="broed"><div align="right">Navn:</div></td>
<td width="267"><input name=Navn<%
If Not IsEmpty(Request.Form("Navn")) Then
%> value="<%= Request.Form("Navn") %>"<%
End If
%> type="text" id="Navn<%
If Not IsEmpty(Request.Form("Navn")) Then
%>" style="width:200px;"></td>
<td width="95" class="broed"><div align="right">Telefon:</div></td>
<td width="286"><input name="text"<%
If Not IsEmpty(Request.Form("text")) Then
%> value="<%= Request.Form("text") %>"<%
End If
%> type="text" style="width:200px;"></td>
</tr>
<tr>
<td height="25" class="broed"><div align="right">Postnr.:</div></td>
<td><input type="text" name="postnr"<%
If Not IsEmpty(Request.Form("postnr")) Then
%> value="<%= Request.Form("postnr") %>"<%
End If
%> style="width:200px;"></td>
<td class="broed"><div align="right">Forhandler af:</div></td>
<td><select name="select" style="width:200px;"><%
If Not rs.BOF Then
rs.MoveFirst
End If
Do While Not rs.EOF
If rs("Under") = 19 Then %>
<option<%
If Not IsEmpty(Request.Form("select")) Then
If Request.Form("select") = rs("Navn") Then
%> selected="selected"<%
End If
End If
%>><%= rs("Navn") %></option><%
End If
rs.MoveNext
Loop %>
</select></td>
</tr>
<tr>
<td height="25" class="broed"><div align="right">By:</div></td>
<td><input type="text" name="by"<%
If Not IsEmpty(Request.Form("by")) Then
%> value="<%= Request.Form("by") %>"<%
End If
%> style="width:200px;"></td>
<td class="broed"><div align="right">Kæder:</div></td>
<td><select name="select2" style="width:200px;"><%
If Not rs.BOF Then
rs.MoveFirst
End If
Do While Not rs.EOF
If rs("Under") = 20 Then %>
<option<%
If Not IsEmpty(Request.Form("select2")) Then
If Request.Form("select2") = rs("Navn") Then
%> selected="selected"<%
End If
End If
%>><%= rs("Navn") %></option><%
End If
rs.MoveNext
Loop %>
</select></td>
</tr>
<tr>
<td class="broed"><div align="right">Landsdel:</div></td>
<td><select name="specified-field" style="width:200px;"><%
If Not rs.BOF Then
rs.MoveFirst
End If
Do While Not rs.EOF
If rs("Under") = 15 Then %>
<option<%
If Not IsEmpty(Request.Form("specified-field")) Then
If Request.Form("specified-field") = rs("Navn") Then
%> selected="selected"<%
End If
End If
%>><%= rs("Navn") %></option><%
End If
rs.MoveNext
Loop %>
</select></td>
<td class="broed"><div align="right">Sortér efter:</div></td>
<td><select name="select3" style="width:200px;"><%
strList = "Navn,Postnr.,By,Telefon"
arrList = Split(strList,",")
For int1 = LBound(arrList) To UBound(arrList) %>
<option<%
If Not IsEmpty(Request.Form("select3")) Then
If Request.Form("select3") = arrList(int1) Then
%> selected="selected"<%
End If
End If
%>><%= arrList(int1) %></option><%
Next %>
</select></td>
</tr>
<tr>
<td height="25" class="broed"> </td>
<td> </td>
<td> </td>
<td><input type="reset" name="Reset" value="Nulstil">
<input type="submit" name="submit2" value="Søg"></td>
</tr>
</table>
</form>
