Hej

Jag hittade denna koden i forumet.
<code>
Dim MånadensFörstaDag As DateTime = DateTime.Today.AddDays(1 - DateTime.Today.Day)
Dim MånadensSistaDag As DateTime = DateTime.Today.AddMonths(1).AddDays(-DateTime.Today.Day)
</code>
Någon som kan översätta den till vbScript?
Jag är alltså ute efter att hämta den första och sista datumen i en månad utifrån Date(Now)

MVH Uffe

thedate=date ' eller datumformat á "2006-13-12"
firstdayinmonth = DateAdd("d",-Day(thedate) ,thedate)+1
lastdayinmonth= DateAdd("d",-Day(DateAdd("m",1,thedate)),DateAdd("m",1,thedate))

<%
Dim Y, M
Dim FirstDate
Dim LastDate

    Y = Year(Now())
    M = Month(Now())
    FirstDate = DateSerial(Y, M, 1)
    LastDate = DateSerial(Y, M+1, 0)
    

%>

Fungerar perfekt Andreas

Tackar för hjälpen