Oprettelse af recordset

Hej alle. Jeg forsøger her at oprette et recordset uden db source:

    Set rstFiles = Server.CreateObject("ADODB.Recordset")
    rstFiles.Fields.Append "name", adVarChar, 255
    rstFiles.Fields.Append "size", adInteger
    rstFiles.Fields.Append "date", adDate
    rstFiles.Fields.Append "type", adVarChar, 255
    rstFiles.Open

Men den melder fejlen "Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another." i linie 24, som er den første .Append linie. Hvad gør jeg forkert?

Mvh Mark