> aber es soll mir ja nicht das Datum, sondern die Zahl zur�ckliefern.

Die kriegst ja auch wenn Du ein echtes Datum hast

Resp.write CDbl(date())


Also mal der Reihe nach

> a = "37204"

Warum fangst Du mit Text an, wenn Du ein Datum oder eine Zahl haben willst


> this = DatePart("d", a-1) & "." & DatePart("m", a-1) & "." &
(DatePart("yyyy", a-1) +1)

Was soll das werden - von einem Text eine Zahl abziehen und hoffen die
AutoMagic wird es schon richten ;-)
Bei Text zu Zahl oder umgekehrt mag das vielleicht funktionieren. Ob die
AutoKonvertierung zu Datum funktioniert ... Ich hab da meine Zweifel. 



Wenn Du einfach von allen Datumbestandteilen eins abziehen willst, dann mach
das halt.  Datum ist letzlich nix anderes als eine Zahl. Serielle Zahl genau
genommen. Also Zahl zuweisen.

a = 37204  
neuesDatum = dateserial(year(a)-1, month(a)-1, day(a)-1)

Die Datumfunktion bietet hier die nette automagic, dass er auch tats�chlich
das resultierende Datum passend richted. 


> alles = "#" & amonth & "/" & atag & "/" & ayear & "#"

Wie schon festgestellt ist das Unfug. Gibt einen Text und keine Zahl.
Entweder mit Eval wie Alexander gesagt hat. Oder gleich richtig als

Alles = dateserial(atag, amonth, ayear)

Hier braucht es keine automagic, weil die Funktion Zahlen erwartet und
Zahlen kriegt. 


> 'Response.write (cdbl(alles)) ' Variable tuts net.

Wenn es denn eine Zahl wird, dann schon. 


-- 

Viele Gr��e
Hubert


_______________________________________________
Coffeehouse mailing list
[EMAIL PROTECTED]
http://www.glengamoi.com/mailman/listinfo/coffeehouse

Antwort per Email an