Avatar billede soenderup Nybegynder
11. september 2001 - 10:12 Der er 8 kommentarer og
1 løsning

Jeg vil om mandagen vise artikler der er op til 3 dage gamle

Jeg vil om mandagen vise artikler der er op til 3 dage gamle, og de resterende skal vise de sidste 2 dages artikler.

Jeg får samme output på alle dagene..

Hvad gør jeg galt??

  \'UDREGNER HVILKEN DATO DER SKAL VISES ARTIKLER FRA
        Select Case CStr(Weekday(Date, 2))
            Case \"1\"
                UdregnetDato = Date - 3 \'MANDAG
            Case \"2\"
                UdregnetDato = Date - 1 \'TIRSDAG
            Case \"3\"
                UdregnetDato = Date - 1 \'ONSDAG
            Case \"4\"
                UdregnetDato = Date - 1 \'TORSDAG
            Case \"5\"
                UdregnetDato = Date - 1 \'FREDAG
            Case \"6\"
                UdregnetDato = Date - 1 \'LØRDAG
            Case \"7\"
                UdregnetDato = Date - 1 \'SØNDAG
        End Select
                       
        strSql = \"SELECT ArtikelID, Sektion, Overskrift, ModtagetDato, From Artikel WHERE ModtagetDato > \" & UdregnetDato & \" ORDER BY ModtagetDato DESC\"
Avatar billede torbenmelander Nybegynder
11. september 2001 - 10:17 #1
Søndag er 1 ...
Avatar billede torbenmelander Nybegynder
11. september 2001 - 10:18 #2
vbSunday 1 Sunday
vbMonday 2 Monday
vbTuesday 3 Tuesday
vbWednesday 4 Wednesday
vbThursday 5 Thursday
vbFriday 6 Friday
vbSaturday 7 Saturday
Avatar billede soenderup Nybegynder
11. september 2001 - 10:22 #3
Description

Returns a whole number representing the day of the week.

Syntax
Weekday(date, [firstdayofweek])
The Weekday function syntax has these arguments:

Part Description
date Any expression that can represent a date. If date contains Null, Null is returned.
firstdayofweek A constant that specifies the first day of the week. If omitted, vbSunday is assumed.

Avatar billede soenderup Nybegynder
11. september 2001 - 10:23 #4
Jeg har sat den til at starte mandag...

Weekday(Date, 2)

/Sønderup
Avatar billede torbenmelander Nybegynder
11. september 2001 - 10:26 #5
prøv at skrive Response.Write strSql efter sidste linie og fortæl os hvad resultatet er
Avatar billede soenderup Nybegynder
11. september 2001 - 10:29 #6
Desværre... det kan jeg ikke, for det er en DLL, som returnerer et recordset, og mig bekendt, kan jeg ikke returnere både et recordset og en string...

Nogen ideer, udover at ændre min returværdi?
Avatar billede sone Nybegynder
11. september 2001 - 10:29 #7
Hvad med at bruge
CASE 2
\'
Case ELSE
\'
Avatar billede soenderup Nybegynder
11. september 2001 - 10:32 #8
ok... jeg tror jeg har postet mit spørgsmål et forkert sted... problemet er i min sql string.

Den bliver ignoreret af sql-serveren, og viser alt..

Jeg flytter spørgsmålet til MS-SQL
Avatar billede infojens Nybegynder
11. september 2001 - 10:45 #9
Hvad med noget i stil med dette her...

Ved ikke så meget om asp men vb er tæt på....


Dim UdregnetDato

UdregnetDato = Date

If Weekday(UdregnetDato) = 2 Then
  UdregnetDato = DateAdd(\"d\", -3, UdregnetDato)
Else
  UdregnetDato = DateAdd(\"d\", -1, UdregnetDato)
End If

MsgBox UdregnetDato
End
Avatar billede Ny bruger Nybegynder

Din løsning...

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester