VBscript: Datovalidering

dato = mid(date, 1, 2) & \"/\" & mid(date, 3, 2)

Det med ugen, er mere eller mindre umuligt...

i perl kan man finde dagens nummer i året med en eller anden funktion, er den også i VBScript ? , så kunne du jo dele med 7 og runde af. Det bliver selvfølgelig ikke pinligt nøjagtig, men alligevel

vandhunden>> takker du løber med le point´s ...brugte det du lavede -> en fed løsning :-)

Takker og værsgod

Mvh.
Jesper HorsMark

(tilstededato er en dato der hentes fra fil! eks. 22/11)
Function DatoFunction
    dim DatePlusOne
    DatePlusOne = DateAdd(\"d\", 1, Tilstededato)
        Tilstededato = DatePlusOne
    TilstedeDato = mid(DatePlusOne, 1, 2) & \"/\" & mid(DatePlusOne, 4, 2) 
End Function