Dim idag As DateTime = Date.Today.ToShortDateString Dim iovermorgen As DateTime = Date.Today.AddDays(2).ToShortDateString
idag = DateTime.Now iovermorgen = DateTime.Now.AddDays(2)
While (iovermorgen >= idag) Response.Write("<br />" & Replace(idag.ToShortDateString, "-", "/")) idag = idag.AddDays(1) End While
Tak, det virker som det skal :)
Synes godt om
Ny brugerNybegynder
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.