variable i "sti"

Fsys.CopyFolder "C:\Documents and Settings\" & Initialer & "\Desktop", "N:\Backup"

Super TAK.
Giver du ikke lige et svar

Selv tak. Et svar  :)

Hej Magik

Kan du sige mig hvorfor dette ikke virker?

MkDir "N:\Backup " & Today & "\Desktop\"

Hvad står der i Today?

Der står dags dato (17-10-2002)

Dim Today As Date
Today = Date

Hej er hele koden:

Private Sub Command1_Click()

Dim Initialer As String
Dim Fsys As New fileSystemObject
Dim Today As Date
Today = Date

Initialer = "jkmi"

MkDir "N:\Backup" & Today & ""
MkDir "N:\Backup" & Today & "\Desktop\"
MkDir "N:\Backup" & Today & "\Favorites\"
MkDir "N:\Backup" & Today & "\Cookies\"

FwFsys.CopyFolder "C:\Documents and Settings\" & Initialer & "\Desktop", "N:\Backup" & Today & "\Desktop\", True
Fsys.CopyFolder "C:\Documents and Settings\" & Initialer & "\Favorites", "N:\Backup" & Today & "\Favorites\", True
Fsys.CopyFolder "C:\Documents and Settings\" & Initialer & "\Cookies", "N:\Backup" & Today & "\Cookies\", True


End Sub

Hmm. Today indeholder ikke nogle ugyldige tegn. Derfor burde MkDir heller ikke fejle. Jeg undrer mig dog over at du i den første linje med CopyFolder anvender et objekt, FwFsys, hvorimod du har navngivet dit FileSystemObject objekt Fsys. Kan det ikke være der fejlen ligger?

Det har du helt ret i....... TAK