LastModifiedDate

<%
          Dim FileName
          Dim LastModifieddttm
          Dim LastModifiedDate

          FileName = Request.ServerVariables(\"SCRIPT_NAME\")
          FileName = Replace(FileName, \"/\", \"\\\")
          FileName = Server.MapPath(FileName)

          Set objFileSystemObject = Server.CreateObject(\"Scripting.FileSystemObject\")

          Set objFile = objFileSystemObject.GetFile(FileName)
          LastModifieddttm = objFile.DateLastModified
          Set objFile = Nothing

          Set objFileSystemObject = Nothing

          LastModifiedDate = FormatDateTime(LastModifieddttm, 1)

          Response.Write(LastModifiedDate)

%>

Hvad skal jeg gør for at få datoen på dansk.