Open Directory Site ASP Tutorials

ASP | XML | VBScript | JavaScript | ADO | CSS | XMLDOM | PHP | Operating Systems

Home >> ASP >> ASP Drive Object

ASP Drive Object

 

The Drive Object

The Drive Object is used to access to the properties of a disk drive or network.

Properties

Property Description

AvailableSpace Returns the amount of space available

DriveLetter Returns the drive letter

DriveType Returns the type of a specified drive.

0 = unknown 1 = removable 2 = fixed 3 = network

4 = CD-ROM 5 = RAM disk

FileSystem Returns the type of the file system

FreeSpace Returns the amount of free space

IsReady Returns true if a specified drive is ready

Path Returns the path

RootFolder Returns a Folder Object representing a root folder

SerialNumber Returns the serial number of a specified drive

ShareName Returns the network share name

TotalSize Returns the total space

VolumeName Sets or returns the volume name

Properties

The AvailableSpace Property

The AvailableSpace property returns the amount of available space on a specified drive. The value returned is often equal to the value returned by the FreeSpace property.

Syntax

object.AvailableSpace

Part Description

object Required. The name of a Drive Object

Example

dim fs, d, n

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

n = "Drive: " & d

n = n & "<br>Available Space in bytes: " & d.AvailableSpace

Response.Write(n)

set d=nothing

set fs=nothing

The DriveLetter Property

The DriveLetter property returns the drive letter.

Syntax

object.DriveLetter

Part Description

object Required. The name of a Drive Object

Example

dim fs, d, n

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

Response.Write("The drive letter is: " & d.driveletter)

set d=nothing

set fs=nothing

The DriveType Property

The DriveType property returns a value indicating the type of a specified drive.

0 = unknown, 1 = removable, 2 = fixed, 3 = network, 4 = CD-ROM, 5 = RAM disk.

Syntax

object.DriveType

Part Description

object Required. The name of a Drive Object

Example

dim fs, d, n

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

Response.Write("The drive type is: " & d.DriveType)

set d=nothing

set fs=nothing

The FileSystem Property

The FileSystem property returns the type of file system for a specified drive.

Syntax

object.FileSystem

Part Description

object Required. The name of a Drive Object

Example

dim fs, d, n

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

Response.Write("The file system is: " & d.FileSystem)

set d=nothing

set fs=nothing

The FreeSpace Property

The FreeSpace property returns the amount of free space on a specified drive. The value returned is often equal to the value returned by the AvailableSpace property.

Syntax

object.FreeSpace

Part Description

object Required. The name of a Drive Object

Example

dim fs, d, n

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

n = "Drive: " & d

n = n & "<br>Free Space in bytes: " & d.FreeSpace

Response.Write(n)

set d=nothing

set fs=nothing

The IsReady Property

The IsReady property returns True if a specified drive is ready, False if not.

Syntax

object.IsReady

Part Description

object Required. The name of a Drive Object

Example

dim fs,d,n

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

n = "The " & d.DriveLetter

if d.isready then

n = n & " drive is ready."

else

n = n & " drive is not ready."

end if

Response.Write(n)

set d=nothing

set fs=nothing

The Path Property

The Path property returns the path for a specified file, folder, or drive.

Syntax

object.Path

Part Description

object Required. The name of a Drive, File, or Folder Object

Example

dim fs,d

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

Response.Write("Path is " & d.Path)

set d=nothing

set fs=nothing

The RootFolder Property

The RootFolder property returns a Folder Object representing the root folder of a specified drive.

Syntax

object.RootFolder

Part Description

object Required. The name of a Drive Object

Example

dim fs,d

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

Response.Write("The root folder is: " & d.rootfolder)

set d=nothing

set fs=nothing

The SerialNumber Property

The SerialNumber property returns the serial number of a specified drive.

Syntax

object.SerialNumber

Part Description

object Required. The name of a Drive Object

Example

dim fs,d

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

Response.Write("The serialnumber is: " & d.serialnumber)

set d=nothing

set fs=nothing

The ShareName Property

The ShareName property returns the network share name for a specified drive.

Syntax

object.ShareName

Part Description

object Required. The name of a Drive Object

Example

dim fs,d

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

Response.Write("The sharename is: " & d.ShareName)

set d=nothing

set fs=nothing

The TotalSize Property

The TotalSize property returns the total space of a drive or network.

Syntax

object.TotalSize

Part Description

object Required. The name of a Drive Object

Example

dim fs,d

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

Response.Write("The total size is: " & d.TotalSize)

set d=nothing

set fs=nothing

The VolumeName Property

The VolumeName property sets or returns the volume name of a specified drive.

Syntax

object.VolumeName =newname

Part Description

object Required. The name of a Drive Object

=newname Optional. Sets the new name of the specified drive

Example

dim fs,d

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

Response.Write("The volume name is: " & d.VolumeName)

set d=nothing

set fs=nothing

Examples

1.This example demonstrates how to first create a FileSystem Object, and then use the AvailableSpace property to get the available space on a specified drive.

Coding

<html>

<body>

<%

Dim fs, d, n

Set fs=CreateObject("Scripting.FileSystemObject")

Set d=fs.GetDrive("c:")

n = "Drive: " & d

n = n & "<br>Available Space in bytes: " & d.AvailableSpace

Response.Write(n)

set d=nothing

set fs=nothing

%>

</body>

</html>

Output

Drive: C:

Available Space in bytes: 572045312

2.This example demonstrates how to use the FreeSpace property to get the free space on a specified drive.

Coding

<html>

<body>

<%

Dim fs, d, n

Set fs=CreateObject("Scripting.FileSystemObject")

Set d=fs.GetDrive("c:")

n = "Drive: " & d

n = n & "<br>Free Space in bytes: " & d.FreeSpace

Response.Write(n)

set d=nothing

set fs=nothing

%>

</body>

</html>

Output

Drive: C:

Free Space in bytes: 572045312

3.This example demonstrates how to use the TotalSize property to get the total size of a specified drive.

Coding

<html>

<body>

<%

Dim fs, d, n

Set fs=CreateObject("Scripting.FileSystemObject")

Set d=fs.GetDrive("c:")

n = "Drive: " & d

n = n & "<br>Total size in bytes: " & d.TotalSize

Response.Write(n)

set d=nothing

set fs=nothing

%>

</body>

</html>

Output

Drive: C:

Total size in bytes: 2097315328

4.This example demonstrates how to use the DriveLetter property to get the drive letter of a specified drive.

Coding

<html>

<body>

<%

dim fs, d, n

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

Response.Write("The drive letter is: " & d.driveletter)

set d=nothing

set fs=nothing

%>

</body>

</html>

Output

The drive letter is: C

5.This example demonstrates how to use the DriveType property to get the drive type of a specified drive.

Coding

<html>

<body>

<%

dim fs, d, n

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

Response.Write("The drive type is: " & d.DriveType)

set d=nothing

set fs=nothing

%>

</body>

</html>

Output

The drive type is: 2

6.This example demonstrates how to use the FileSystem property to get the file system of a specified drive.

Coding

<html>

<body>

<%

dim fs, d, n

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

Response.Write("The file system is: " & d.FileSystem)

set d=nothing

set fs=nothing

%>

</body>

</html>

Output

The file system is: NTFS

7.This example demonstrates how to use the IsReady property to check whether a specified drive is ready.

Coding

<html>

<body>

<%

dim fs,d,n

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

n = "The " & d.DriveLetter

if d.IsReady=true then

n = n & " drive is ready."

else

n = n & " drive is not ready."

end if

Response.Write(n)

set d=nothing

set fs=nothing

%>

</body>

</html>

Output

The C drive is ready.

8.This example demonstrates how to use the Path property to get the path of a specified drive.

Coding

<html>

<body>

<%

dim fs,d

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

Response.Write("The path is " & d.Path)

set d=nothing

set fs=nothing

%>

</body>

</html>

Output

The path is C:

9.This example demonstrates how to use the RootFolder property to get the root folder of a specified drive.

Coding

<html>

<body>

<%

dim fs,d

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

Response.Write("The rootfolder is " & d.RootFolder)

set d=nothing

set fs=nothing

%>

</body>

</html>

Output

The rootfolder is C:\

10.This example demonstrates how to use the Serialnumber property to get the serialnumber of a specified drive.

Coding

<html>

<body>

<%

dim fs,d

set fs=CreateObject("Scripting.FileSystemObject")

set d=fs.GetDrive("c:")

Response.Write("The serialnumber is " & d.SerialNumber)

set d=nothing

set fs=nothing

%>

</body>

</html>

Output

The serialnumber is 816018874

Cheap Web Hosting Articles - Web Site Design & Web Hosting Tutorials - Domain Hosting