Cdate, fungerar inte ???

8 svar · 386 visningar · startad av Macce 13 juni 2003

MacceMedlem sedan apr. 2001425 inlägg

Frågan13 juni 2003 08:23#1

Har problem med min statistik till webbplatsen. Addar ett datum till en textfil för varje besökare.

När statistiken ska plockas fram så vill jag se de senaste 100 dagarna, och alltså sortera bort äldre datum och skriva om textfilen. Problemet uppstår när jag ska göra denna jämförelse.

               For Each dteDate in split(ReadTextFile(strStatsFilePath,"stats.txt"),VbCrlf)
                 IF cdate(dteDate) >= cdate(dateAdd("d",-100,Date())) THEN
                  arrStatsNew = arrStatsNew & dteDate & vbcrlf
                 END IF
                next	
              Call CreateTextFile(strStatsFilePath,"stats.txt",arrStatsNew,"")

Ger felmess: Type mismatch: 'CDate'

Jesper TMedlem sedan nov. 20017 144 inlägg

13 juni 2003 08:26#2

Hur är datumformatet när du skriver ut dteDate då?

MacceMedlem sedan apr. 2001425 inlägg

13 juni 2003 08:57#3

2002-08-17

MacceMedlem sedan apr. 2001425 inlägg

13 juni 2003 08:59#4

Cdate(left(dteDate,10)) fungerar inte heller...

MacceMedlem sedan apr. 2001425 inlägg

13 juni 2003 09:05#5

varför skrivs formatet på detta sett ?

Beror det på mitt svenska windows 2000

HAR Session.LCID = 1033 överst på sidan

Response.Write date() ger 6/13/2003

Men när jag skriver till textfil blir formatet 2003-06-13

hmm

Jesper TMedlem sedan nov. 20017 144 inlägg

13 juni 2003 09:13#6

IF datediff("d", dteDate, date) >= -100 THEN

MacceMedlem sedan apr. 2001425 inlägg

13 juni 2003 09:13#7

Löste det temporärt med:

cdate(DatePart("m",dteDate)&"/"&DatePart("d",dteDate)&"/"&DatePart("yyyy",dteDate))

hmm, får duga så länge

MacceMedlem sedan apr. 2001425 inlägg

13 juni 2003 09:16#8

Jesper T, tack det funkar !!! :)

Snyggare än mitt första alternativ !

Men varför beter sig min lösning så konstigt ?

MacceMedlem sedan apr. 2001425 inlägg

13 juni 2003 09:20#9

IF len(dteDate)>0 THEN

jämför

END IF

Verkar som första posten i arrayn var tom...

Jag skrev ut nr 1 i arrayn och såg aldrig det :(

Men nu återstår, varför skrivs textfilen automatiskt med sv. datum ?