11. november 2001 - 13:05Der er
6 kommentarer og 1 løsning
Datoer i select menu - Men kun mandag-fredag
Jeg har nedenstående funktion til at lave en dropdown menu med en specificeret start- og slutdato og en dato der er valgt som default. Hvordan udelukker jeg at lørdage og søndage vises i menuen?
For i = startdato to slutdato if DateDiff(\"d\", i, aktivdato) = 0 Then Response.write \"<Option Selected value=\'\" & i &\"\'>\" & i &\"</option>\" & vbCrLf Else Response.write \"<Option value=\'\" & i &\"\'>\" & i &\"</option>\" & vbCrLf End if Next Response.write \"</select>\" & vbCrLf END Function
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
For i = startdato to slutdato if DateDiff(\"d\", i, aktivdato) = 0 Then If Weekday(i, firstdayofweek) <> 1 or 7 Then Response.write \"<Option Selected value=\'\" & i &\"\'>\" & i &\"</option>\" & vbCrLf End If Else Response.write \"<Option value=\'\" & i &\"\'>\" & i &\"</option>\" & vbCrLf End if Next Response.write \"</select>\" & vbCrLf END Function
For i = startdato to slutdato if( i <> verdiForLørdag AND i <> verdiForSøndag ) then if DateDiff(\"d\", i, aktivdato) = 0 Then Response.write \"<Option Selected value=\'\" & DKDato(i,\"#SQL_NOTIME\",\"DK\") &\"\'>\" & DKDato(i,\"#10\",\"DK\") &\"</option>\" Else Response.write \"<Option value=\'\" & DKdato(i,\"#SQL_NOTIME\",\"DK\") &\"\'>\" & DKDato(i,\"#10\",\"DK\") &\"</option>\" End if End if Next
For i = startdato to slutdato if (WeekDay(i) <> 1) AND (WeekDay(i) <> 7) then if DateDiff(\"d\", i, aktivdato) = 0 Then Response.write \"<Option Selected value=\'\" & i &\"\'>\" & i &\"</option>\" & vbCrLf Else Response.write \"<Option value=\'\" & i &\"\'>\" & i &\"</option>\" & vbCrLf End if end if Next Response.write \"</select>\" & vbCrLf END Function
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
