Cut filer

brug enten Shell "move bla bla bla"
Eller brug FileSystemObject

Og hvor ligger FileSystemObject lige præcist?

Søg på FSO - der er ca. 10000 besvarede spøgssmål om emnet :o)

2 sek - så skal jeg strikke et eksempel sammen :o)

Ok

Gå til Project > References, og afkryds "Microsoft Scripting Runtime". Herefter kan du bruge FSO.

Kik fx. på http://www.eksperten.dk/spm/301597

Hvis du vil have alle detaljer med, kik på følgende 2 links:

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/jsmthMoveFile.asp

&

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/jsmthMoveFolder.asp

Altså - hvis du er i tvivl:

  Dim Sti As String
  Dim NySti As String
  Dim FSO As FileSystemObject
 
  Sti = "c:\gammelplacering\*.*" 'Mappe der kopieres FRA
  NySti = "C:\nyloancering\" 'Mappe der kopieres TIL

  Set FSO = CreateObject("Scripting.FileSystemObject")
  FSO.MoveFile Sti, NySti

Ok... Nu bruger jeg:

Dim MyFolder As Folder
  Dim MyFolderFiles As Files
  Dim FSO As FileSystemObject
  Dim MyFile As File
Private Sub Form_Load()
  Set FSO = CreateObject("Scripting.FileSystemObject")
  Set MyFolder = FSO.GetFolder("C:\test\")
  Set MyFolderFiles = MyFolder.Files
  For Each MyFile In MyFolderFiles
      MyFile.Copy "C:\test2\"
  Next MyFile
End Sub

Og nu vil jeg gerne have at den sletter de kopierede filer når den har kopieret... Hvordan gør jeg det?

Slet filer: brug Kill filnavn.

Men hvorfor ikke bare bruge det eksempel jeg har givet 08/01-2003 16:58:24 - det er lige til at copy-paste

Eller brus FSO.Deletefile

Når du nu har fået disse fine links til MSDN (MicroSoft Develepors Network) - brug det!

Der kan du bl.a. læse om Deletefile:

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/jsmthDeleteFile.asp

Skal du ikke lukke spørgsmålet, teknikeren?

tak for points :o)