Oprettelse, redigering , flytning, kopiering og sletning er almindelige handlinger, der udføres i et program, der behandler filer. Ansøgninger kan modtage en fil fra en ekstern kilde , såsom e-mail eller et andet program , skal du læse filen og udføre nogle type handling, såsom at indsætte disse oplysninger i en database , og derefter flytte eller kopiere filen til en anden placering, hvilket indikerer , at filen allerede er blevet behandlet. Windows-operativsystemet har en indbygget API til at håndtere alle de førnævnte fil -processing funktioner. Instruktioner
1
Opret et nyt standard-EXE -projekt i Visual Basic. Tilføj Microsoft Scripting Runtime til projektet ved at vælge "Projekt ", " Referencer ", " Microsoft Scripting Runtime " og klikke på " OK" for at gemme og lukke skærmbilledet.
2
Opret en ny FileScripting objekt ved erklære en variabel af typen " Scripting.FileScriptingObject ". Koden skal ligne : Hej
Dim oFile som New Scripting.FileScriptingObject
Denne linje kode vil definere variablen med navnet " oFile " og skabe det objekt, der kan refereres til i koden til følge.
3
Undersøg, om filen findes ved kodning " oFile.FileExists ( filepath ) ", hvor " filepath " er det fulde navn og stien til filen. Resultatet af denne funktion er en sand eller falsk . Hvis resultaterne er sand, så filen findes, og du kan fortsætte med kopifunktionen . Men hvis filen ikke eksisterer, bør du kode en form for fejlhåndtering .
4
Kopier filen angivet i variablen " filepath " til en ny placering ved kodning denne linje " oFile.CopyFile filepath , newloc ", hvor" newloc "er stien til den nye placering. Et eksempel på den nye placering ville være " C : \\ CopiedFiles " eller "D : \\ Backup . " Filnavnet vil forblive den samme i den nye mappe.
5.
Kontroller, at filen er blevet kopieret af igen ved hjælp af " FileExists "-metoden. At kontrollere, at filen angivet i " filepath " variable fik kopieret til den placering angivet i " newloc " variable , skal du sørge du har gemt den enkelte filnavn til en separat variabel. For eksempel koden " oFile.FileExists ( newloc & filename )" vil returnere SAND, hvis filnavnet i " filename" held blev kopieret til den nye mappe.