Kopering af fil !!!

Du skal sætte et filelistbox på din form, sætte den til det bibliotek du skal kopierer fra, i dette eks. hedder den File1       


File1.Path = CopyDir
        For i = 0 To File1.ListCount - 1
     
     
       
       
        SourceFile = File1.Path & "\" & File1.List(i)
        DestinationFile = DistDir & File1.List(i)
                       
        FileCopy SourceFile, DestinationFile

Jeg kan ikke lige se hvad jeg skal med en fillistbox ?
og jeg kan heller ikke lige gennemskue : SourceFile = File1.Path & "\" & File1.List(i)
Kopiere den ikke det hele i det dir ?

Smølf

Smølf ;)
Dim Var1 as String
Dim Var2 as String
Var1 = "c:\autoexec.bat"
Var2 = "C:\autoexec.kopi"
Bare skriv Filecopy var1 var2

M.I.X

www.mixstudio.net

Mix :
Hvis du lige laver et svar så er pointene dine :))))
og takker

Sådan her *S*

M.I.X