omdøb txt fil og opret ny (logfil)

Du kan bruge fso.MoveFile(source, destination) til at omdøbe filen og derefter kalde fso.OpenTextFile(filespec,8,true) for at oprette en ny logfil (hvis den gamle ikke eksisterer - og det gør den jo ikke hvis du lige har omdøbt den).

Læs i øvrigt mere om FSO her: http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/FSOoriFileSystemObject.asp?frame=true

okay takker fik det til at virke sådan her er det en korrekt måde eller er der en nemmere måde

        dim flytfil,fil
        set flytfil=Server.CreateObject("Scripting.FileSystemObject")
        Set fil=flytfil.GetFile(Server.Mappath("log/current_log.txt"))
        fil.Move(Server.Mappath("log/old_log.txt"))
        set fil=nothing
        set flytfil=nothing

        dim opretfil,filnavn
        set opretfil=Server.CreateObject("Scripting.FileSystemObject")
        set filnavn=opretfil.CreateTextFile(Server.Mappath("log/current_log.txt"))
        filnavn.WriteLine("Ny log startet d. "&now&"")
        filnavn.Close
        set filnavn=nothing
        set opretfil=nothing

Korrekt er vel svært at afvise hvis det fungerer :)

Jeg ville måske bare have lavet en lille funktion der omdøber filen og så modificeret den eksisterende funktion til at oprette logfilen hvis den ikke eksisterer.

    function renamelogfil()
        Dim fso, srcfilespec, dstfilespec
        Set fso = CreateObject("Scripting.FileSystemObject")
        srcfilespec = Server.Mappath("log/current_log.txt")
        dstfilespec = Server.Mappath("log/old_log_" & right("00" & day(now),2) & right("00" & month(now),2) & year(now) & ".txt")
        fso.MoveFile(srcfilespec,dstfilespec)
    end function

    function logfil(txt)
        Dim fso, f, filespec
        Set fso = CreateObject("Scripting.FileSystemObject")
        filespec = Server.Mappath("log/current_log.txt")
        Set f = fso.OpenTextFile(filespec,8,true)
        f.WriteLine txt
        f.Close
    end function

der takkes opretter, og beklager lange svar tid. opretter du et svar så du kan få nogle point...

Det er helt ok - det vigtigste er jo at du kommer videre :)

Tak for point :)