Shulou(Shulou.com)06/03 Report--

This article mainly introduces "the usage of FileSystemObject object under VBS". In the daily operation, I believe that many people have doubts about the usage of FileSystemObject object under VBS. The editor consulted all kinds of materials and sorted out simple and easy-to-use operation methods. I hope it will be helpful to answer the doubts about "the usage of FileSystemObject object under VBS". Next, please follow the editor to study!

FileSystemObject object

Provides access to the computer file system.

Description

The following code illustrates how to use the FileSystemObject object to return a TextStream object that can be read or written:

Dim fso, MyFileSet fso = CreateObject ("Scripting.FileSystemObject") Set MyFile = fso.CreateTextFile ("c:\ testfile.txt", True) MyFile.WriteLine ("This is a test.") MyFile.Close

In the previous code, the CreateObject function returned a FileSystemObject object (fso). The CreateTextFile method creates a file as a TextStream object (a), and then the WriteLine method writes a line of text in the file. Finally, the Close method flushes the buffer and closes the file.

The following is a detailed explanation of the FileSystemObject object

The file system is one of the most important parts of all operating systems. Scripts often need to access and manage files and folders. The top-level object for accessing desktops and file systems in Vbs is FileSystemObject (FSO), which is particularly complex and is the core of file operations in vbs.

Common objects included in FSO are:

Object / collection

Description

Drive

Contains information about storage devices, including hard drives, optical drives, ram drives, and network drives

Drives

Provides a list of physical and logical drives

File

Check and process files

Files

Provides a list of all files contained in the folder

Folder

Check and process folders

Folders

Provides a list of all folders within Folder

TextStream

Object. Used to read and write text files.

How to use FSO

To program with the FSO object model, use the CreateObject method to create FileSystemObject objects, such as:

Dim fso

Set fso = wscript.createobject ("scripting.filesystemobject")

In this example, Scripting is the name of the type library, and FileSystemObject is the name of the object you want to create. Now that we have the fso object, we are ready to use the fso object. If you want to release, it is also very simple, for example:

Set fso = nothing

A total of one property of the FileSystemObject object is Drives

Description: gets a collection of all available drives.

Description: whether or not local disk, inserted media, removable media drive are displayed in the Drives collection.

The specific example code is as follows: get the drive letters of all the disks on this computer

Set fso = CreateObject ("Scripting.FileSystemObject")

Set Drivers = fso.Drives

For Each Driver in Drivers

Msgbox Driver.DriveLetter 'outputs all the disk letters on the computer

Next

Method: (only commonly used methods)

CreateFile

Description: create an empty file

Grammar: object. CreateTextFile (strFile,blnOverWrite)

Parameter: strFile is the file name

BlnOverWrite is forcibly overwritten by Ture and not overwritten by False

Example: create a file C:\ test.txt

Dim Fso' creates FileSystemObject object Set Fso = CreateObject ("Scripting.FileSystemObject") 'creates a file using CreateTextFile, does not overwrite the existing file Fso.CreateTextFile "C:\ test.txt", False' overwrites the existing file Fso.CreateTextFile "C:\ test.txt", True

CreateFolder

Description: create an empty folder

Grammar: object. CreateFolder (strFolder)

Parameter: strFolder is the name of the folder you want to create

Example: create a folder: C:\ test

Dim Fso' create FileSystemObject object Set Fso = CreateObject ("Scripting.FileSystemObject") 'create a folder Fso.CreateFolder ("c:\ test") using MyFolder

DeleteFile

Description: delete a file

Grammar: object. DeleteFile (strFile,force)

Parameter: strFile is the file you want to delete. Wildcards are available in components.

Force if you want to delete read-only files, the value is True; otherwise False (default)

Example: delete file: C:\ test.txt

Dim Fso' create FileSystemObject object Set Fso = CreateObject ("Scripting.FileSystemObject") 'use DeleteFile to delete specified file Fso.DeleteFile ("c:\ test.txt")' force delete read-only file Fso.DeleteFile "c:\ test.txt", True

DeleteFolder

Description: delete a folder

Grammar: object. DeleteFolder (strFolder,force)

Parameter: strFolder is the name of the folder you want to delete. Wildcards are available in components.

Force if you want to delete a read-only folder, the value is True; otherwise False (default)

Example: delete folder: C:\ test

Dim Fso' create FileSystemObject object Set Fso = CreateObject ("Scripting.FileSystemObject") 'use DeleteFile to delete specified file Fso.DeleteFolder ("c:\ test")' force delete read-only file Fso.DeleteFolder "c:\ test", True

FileExists

Description: judge whether the specified file exists, if you do not judge to modify directly, the code has an error, resulting in the code can not run or some conditions occur, can improve the rigor of your code

Grammar: object. FileExists (strFile)

Parameter: strFile is the specified file

Example: check whether the file: C:\ test.txt exists

Dim Fso' create FileSystemObject object Set Fso = CreateObject ("Scripting.FileSystemObject") 'use FileExists to determine whether the specified file has MsgBox Fso.FileExists ("c:\ test.txt")

FolderExist

Description: determines whether the specified folder exists

Grammar: object. FolderExists (strFolder)

Parameter: strFolder is the specified folder

Example: check whether the folder: C:\ test exists

Dim Fso' create FileSystemObject object Set Fso = CreateObject ("Scripting.FileSystemObject") 'use FolderExists to determine whether MsgBox Fso.FolderExists exists in the specified folder ("c:\ test")

CopyFile

Description: copy one or more files from one location to another

Syntax: object.CopyFile "source", "destination" [, overwrite]

Parameter: source is required. Represents the path to the specified file. Wildcards are available in components.

Destination is required. Represents the target location path

Overwrite is optional. The Boolean value indicates whether the existing file is overwritten. If it is True, the file is overwritten; if it is False, the existing file is not overwritten. The default value is True

Example: copy c:\ test.txt file to D:\

Dim Fso' create FileSystemObject object Set Fso = CreateObject ("Scripting.FileSystemObject") 'use CopyFile to copy files to another location, False does not overwrite existing files Fso.CopyFile "c:\ test.txt", "D:\", False'True overwrites existing files Fso.CopyFile "c:\ test.txt", "D:\", True

Example: copy all txt files under c:\ to D:\

Dim Fso' creates FileSystemObject object Set Fso = CreateObject ("Scripting.FileSystemObject") 'using * .txt, multiple files can be copied to another location at the same time. False does not overwrite existing files Fso.CopyFile "c:\ * .txt", "D:\", False'True means overwriting existing files Fso.CopyFile "c:\ * .txt", "D:\", True

CopyFolder

Description: copy a folder from one location to another

Grammar: object. CopyFolder "source", "destination" [, overwrite]

Parameter: source is required. Represents the path to the specified folder. Wildcards are available in components.

Destination is required. The path that represents the target location

Overwrite is optional. The Boolean value indicates whether the existing folder is overwritten. If it is True, the folder is overwritten; if it is False, the existing folder is not overwritten. The default value is True

Example: copy c:\ test folder to D:\

Dim Fso' create FileSystemObject object Set Fso = CreateObject ("Scripting.FileSystemObject") 'copy the file to another location using CopyFile. By default, True overwrites the existing file Fso.CopyFolder "c:\ test", "D:\"' False does not overwrite the existing file Fso.CopyFolder "c:\ test", "D:\", False

MoveFile

Description: move one or more files from one location to another

Syntax: object.MoveFile source, destination

Parameter: source is required. The path of the file to be moved. Wildcards are available in components.

Destination is required. Specify a path that indicates that you want to move the file to the target location. The destination parameter cannot contain wildcards.

Example: move the c:\ test folder to D:\

Dim Fso' create FileSystemObject object Set Fso = CreateObject ("Scripting.FileSystemObject") 'use MoveFile to move files to another location Fso.MoveFile "c:\ test.txt", "D:\"

MoveFolder

Description: move one or more folders from one location to another

Syntax: object.MoveFolder source, destination

Parameter: source is required. The path to the folder to move. Wildcards are available in components.

Destination is required. Specify a path that indicates that you want to move the folder to the target location.

Example:

Dim Fso' create FileSystemObject object Set Fso = CreateObject ("Scripting.FileSystemObject") 'use MoveFolder to move the folder to another location Fso.MoveFolder "c:\ test", "D:\"

GetExtensionName

Description: get the file suffix name

Syntax: object.MoveFolder source, destination

Parameter: source is required. The path to the folder to move. Wildcards are available in components.

Destination is required. Specify a path that indicates that you want to move the folder to the target location.

Example: get the suffix name of "c:\ test.txt" file

Dim FsoDim GetExtensionName' create FileSystemObject object Set Fso = CreateObject ("Scripting.FileSystemObject") 'use GetExtensionName to get the file suffix GetExtensionName = fso.GetExtensionName ("c:\ test.txt") MsgBox GetExtensionName' output txt

GetBaseName

Description: get the folder where the file is currently located

Syntax: object.GetBaseName Path

Parameter: Path is required. File path name.

Example: get "c:\ test.txt" file name

Dim FsoDim GetBaseName' create FileSystemObject object Set Fso = CreateObject ("Scripting.FileSystemObject") 'use GetBaseName to get the file name GetBaseName = Fso.GetBaseName ("c:\ test\ test.txt") MsgBox GetBaseName' output test

GetParentFolderName

Description: move one or more folders from one location to another

Syntax: object.GetParentFolderName Path

Parameter: Path is required. File path name.

Example: get the folder where the "c:\ test.txt" file is located

Dim FsoDim GetParentFolderName' create FileSystemObject object Set Fso = CreateObject ("Scripting.FileSystemObject") 'use GetParentFolderName to get the file's current folder GetParentFolderName = Fso.GetParentFolderName ("c:\ test\ test.txt") MsgBox GetParentFolderName' output c:\ test, the study on "the usage of FileSystemObject objects under VBS" is over, hoping to solve everyone's doubts. The collocation of theory and practice can better help you learn, go and try it! If you want to continue to learn more related knowledge, please continue to follow the website, the editor will continue to work hard to bring you more practical articles!

Welcome to subscribe "Shulou Technology Information " to get latest news, interesting things and hot topics in the IT industry, and controls the hottest and latest Internet news, technology news and IT industry trends.