[ASP/Vbscript]Het verschil tussen 2 datums

[DarkShadow]

Hallo, ik wil graag in een scriptje weten wat het verschil is tussen 2 datums...
Het probleem is namelijk dat ik een grafiek plot in een owc chart, maar bij een lange reeks fucked hij de x-as op zodat je de data eronder niet kan lezen (een vage pixelbrij). Nu kan ik dit netjes ordenen door bij de x-as een waarde toe te kennen aan minorunit en dan laat hij dus om een bepaald interval een waarde zien. Alleen aangezien het verschil tussen 2 datums constant variabel is, moet de waarde voor minorunit ook variabel zijn... Ik geef de 2 verschillende datums op in een html bestand dat gelinkt is aan het scriptje, met de variabelen: dag, maand, jaar, dag2, maand2 en jaar2. Kan iemand me op weg helpen?

stukje code waarbij ik de assen aanpas:

code:

for each ax in objChart.Axes
    ax.HasTitle = True
    if ax.Type = c.chCategoryAxis then
        ax.Title.Caption = "datum"
    ax.Minorunit = 5
    set fnt = ax.Title.Font
    fnt.Name = "Tahoma"
    fnt.Size = 8
    fnt.Bold = True
    else
        ax.Title.Caption = naamelement & " (" & afkelement & ")"
    set fnt = ax.Title.Font
    fnt.Name = "Tahoma"
    fnt.Size = 8
    fnt.Bold = True
    end if
next

[Verwijderd]

datediff

[edit:linkje]
http://www.w3schools.com/vbscript/func_datediff.asp

[ Voor 82% gewijzigd door Verwijderd op 30-03-2004 10:47 ]

[DarkShadow]

tnx, ga er eens naar kijken , is dat ook wel mogelijk in mijn geval, doordat de dag en de maand en het jaar verschillende variabelen zijn...

[Verwijderd]

DarkShadow schreef op 30 maart 2004 @ 11:14:
tnx, ga er eens naar kijken , is dat ook wel mogelijk in mijn geval, doordat de dag en de maand en het jaar verschillende variabelen zijn...

Dateserial gebruiken om van je afzonderlijke variabelen weer een datum te maken !

[DarkShadow]

hmmm ik heb nu dit stukje code:

code:

date1 = maand & "/" & dag & "/" & jaar
date2 = maand2 & "/" & dag2 & "/" & jaar2

xlength = datediff("d",date1,date2)

If xlength < 15 then
    xinterval = 1
elseif xlength < 30 then
    xinterval = 2
elseif xlength < 45 then
    xinterval = 3
end if

maar ik krijg de volgende error:

Typen komen niet met elkaar overeen: '[string: "//"]'

Dit heeft er of mee te maken dat de variabele xlength gedefinieerd moet zijn als een datum (maar hoe moet dat? ) of dat hij de datum niet pakt, en alleen de schuine streepjes...

Weet iemand hoe ik dit kan oplossen

[Verwijderd]

DarkShadow schreef op 30 maart 2004 @ 11:35:
hmmm ik heb nu dit stukje code:

code:

date1 = maand & "/" & dag & "/" & jaar
date2 = maand2 & "/" & dag2 & "/" & jaar2

xlength = datediff("d",date1,date2)

If xlength < 15 then
    xinterval = 1
elseif xlength < 30 then
    xinterval = 2
elseif xlength < 45 then
    xinterval = 3
end if

maar ik krijg de volgende error:

[...]


Dit heeft er of mee te maken dat de variabele xlength gedefinieerd moet zijn als een datum (maar hoe moet dat? ) of dat hij de datum niet pakt, en alleen de schuine streepjes...

Weet iemand hoe ik dit kan oplossen

Zie mijn vorige antwoord !

[CrashOne]

cdate()

[DarkShadow]

Verwijderd schreef op 30 maart 2004 @ 11:37:
[...]


Zie mijn vorige antwoord !

Nu gebruik ik dateserial, maar dan vul ik mijn variabelen in:

code:

date1 = DateSerial(jaar,maand,dag)
date2 = DateSerial(jaar2,maand2,dag2)

xlength = datediff("d",date1,date2)

Maar hij pakt de goede datum niet, want het verschil tussen de data is 0 en date1 en date2 zijn gelijk (namelijk 30/11/1999, terwijl het compleet andere data zijn)

Oeps Ik had dit boven het gedeelte gezet waar de variabelen jaar, maand dag etc een waarde krijgen

[ Voor 12% gewijzigd door DarkShadow op 30-03-2004 11:59 ]

[DarkShadow]

Het werkt al, bedankt