<select name="selectYear" class="listmeny" onChange="this.form.submit();">
<%
For i = Year(Now) - 2 To Year(Now)
%>
<option value="<%=i%>"<%If i = Year(Now) Then Response.Write " selected"%>><%=i%></option><%
Next 'i
%>
</select>
theYear = request("selectYear")
if theYear= "" then theYear = Year(Now)
...
<select name="selectYear" class="listmeny" onChange="this.form.submit();">
<%
For i = Year(Now) - 2 To Year(Now)
%>
<option value="<%=i%>"<%If i = theYear Then Response.Write "selected"%>><%=i%></option><%
Next
%>
</select>
Men det vill sig inte... Om jag bytter år, dvs submittar så stannar året inte kvar...
Hej!
Efter lite pillande så fick jag det att fungera typkonverterade det jag jämförde till en sträng:
<option value="<% =i %>"<% If cstr(i) = cstr(theYear) Then Response.Write "selected" %>><% =i %></option>
Jag har därför förstått att jag jämförde päron med äpplen.... Men är detta rätt sätt att gå, eller ska jag göra på något annat, bättre sätt? Det fungerar ju nu visserligen...
När det faktiskt är siffror så är det bara onödigt och fult att göra strängjämförelser.
theYear = request("selectYear")
if theYear = "" then theYear = Year(Now)
theYear = CLng(theYear)
...
<select name="selectYear" class="listmeny" onChange="this.form.submit();">
<%
For i = Year(Now) - 2 To Year(Now)
%>
<option value="<% =i %>"<% If i = theYear Then Response.Write " selected" %>><% =i %></option><%
Next
%>
</select>
Eller ännu hellre:
'i din util fil
Function Coalesce(Value1, Value2)
If Trim(Value1 & "") <> "" Then
Coalesce = Value1
ElseIf Trim(Value2 & "") <> "" Then
Coalesce = Value2
End If
End Function
'sidan där util filen är inkluderad
theYear = CLng( Coalesce(request("selectYear"), Year(Now)) )
...
<select name="selectYear" class="listmeny" onChange="this.form.submit();">
<%
For i = Year(Now) - 2 To Year(Now)
%>
<option value="<% =i %>"<% If i = theYear Then Response.Write " selected" %>><% =i %></option><%
Next
%>
</select>