Hej! Börja med att hålla koll på variabelnamnen: Hej!Loop problem
Jag har ett litet problem här.
<%
Dim date_start, day_start
date_start = rs("date_start")
day_start = mid(date_start,10)
%>
<%
For iTal = 1 To 31
If iTal = daystart Then
skriv = "selected='selected'"
ElseIf iTal <= 1 Then
'skriv = mid(date_start,10)
ElseIf iTal > 2 Then
'skriv = mid(date_start,10)
End If
If Len(iTal) < 2 Then
Response.Write "<option value='0" & iTal & "'" & skriv & ">" & "0" & iTal & "</option>" & vbcrlf
Else
Response.Write "<option value='" & iTal & "'>" & iTal & "</option>" & vbcrlf
End If
Next
%>
Så ser koden ut, det jag vill är att skriv ut selected='selected' när loopen kommer till rätt dag som står i databasen.
Någon har något tips att ge mig?
Sv: Loop problem
<b> If iTal = daystart Then </b>
Längre upp heter den day_start.Sv:Loop problem
Löste det såhär:
<%
For iTal = 1 To 31
%>
<option value="<%=iTal%>" <%If Day(date_start) = iTal Then Response.Write "selected='selected'" >><%=ital%></option>
<%
Next
%>