Ako zabezpečiť , aby súbor bol skopírovaný do VB6

Vytváranie , úpravy , presúvanie , kopírovanie a mazanie sú spoločné akcie vykonávané v rámci programu , ktorý spracováva súbory . Aplikácia môže získať súbor z ľubovoľného externého zdroja , ako je e - mailom alebo inou aplikáciou , prečítajte si súbor a vykonať nejaký druh akcie , ako je vloženie informácie do databázy a potom presunúť alebo skopírovať súbor do iného umiestnenia , čo znamená , že súbor už bola spracovaná . Operačný systém Windows má vstavanú - in API zvládnuť všetky vyššie uvedené funkcie pre spracovanie súborov . Pokyny dovolená 1

Vytvorenie nového projektu štandardné EXE v jazyku Visual Basic . Pridať Microsoft Scripting Runtime projektu výberom " projekt " , " Odkazy " , " Microsoft Scripting Runtime " a kliknutím na tlačidlo " OK " pre uloženie a zatvorte okno .
2

Vytvoriť nový FileScripting objekt deklarovať premennú typu " Scripting.FileScriptingObject . " Kód by mal vyzerať podobne ako : Autor

Dim oFile ako New Scripting.FileScriptingObject

Tento riadok kódu definuje premennú s názvom " oFile " a vytvoriť objekt , ktorý možno odkazovať v kóde nasledovať .
3

Zistite , či súbor existuje kódovaním " oFile.FileExists ( filePath ) " , kde " filepath " je úplný názov a cestu k súboru . Výsledkom tejto funkcie je true alebo false . Keď sú výsledky , je to pravda , potom existuje súbor a môžete pokračovať s funkciou kopírovania . Avšak, ak súbor neexistuje , mali by ste kódovať nejaký druh spracovania chýb .
4

Skopírujte súbor zadaný v premennej " FilePath " do nového umiestnenia pomocou kódovania tento riadok " oFile.CopyFile filepath , newloc " kde " newloc " je cesta do nového umiestnenia . Príklad nového umiestnenia bude " C : \\ CopiedFiles " alebo " D : . \\ Backup " Názov súboru zostane rovnaká v rámci novej zložky .
5

Overte , že súbor bol skopírovaný opätovným použitím " FileExists " metódu . Ak chcete overiť , že súbor určený v " FilePath " premenné dostal skopíruje do umiestnenia zadaného v " newloc " premenné sa uistite , že ste uložili na individuálny názov súboru samostatná premenná . Napríklad kód " oFile.FileExists ( newloc a názov súboru ) " vráti TRUE , ak je názov súboru v " súboru " bol úspešne skopírované do novej zložky .

• Predchádzajúca strana: Ako používať zlikvidujte a nič vo VBA 
• Ďalšia strana: Efektívny spôsob , ako rozdeľovať reťazce v VB.NET