DISKSPACE( ) 函 数

DISKSPACE( ) 函 数 - 图1返回默认磁盘驱动器或卷 (Volume) 上可用的字节数

语 法

DISKSPACE([ cVolumeName ])

返 值 类 型

数值型

参 数 描 述

cVolumeName

DISKSPACE( ) 函 数 - 图2DISKSPACE( ) 函 数 - 图3DISKSPACE( ) 函 数 - 图4指 定 一 个 驱 动 器 或 卷 若 缺 省 D ISKSPACE ( ) 则 返 回 默 认 驱 动 器 或 卷 中 的可 用 字 节

说 明

DISKSPACE( ) 函 数 - 图5DISKSPACE( ) 函 数 - 图6DISKSPACE( ) 函 数 - 图7此参数可用来确定是否有足够的可用空间来备份文件 或执行诸如 SORT 这样的 需要为临时工作文件提供额外磁盘空间的命令

DISKSPACE( ) 函 数 - 图8默认的驱动器或卷由 SET DEFAULT 命令指定

DISKSPACE( ) 函 数 - 图9DISKSPACE( ) 函 数 - 图10DISKSPACE( ) 函 数 - 图11若在读磁盘或卷时发生错误 DISKSPAC E( ) 返回 -1 在一些网络上 DISKSPACE( )

DISKSPACE( ) 函 数 - 图12返回的值对于大的网络驱动器可能是不精确的

示 例

DISKSPACE( ) 函 数 - 图13以下示例使用 DISKSPACE( ) 函数以确定是否有足够的磁盘空间执行排序

*** 排序前确认磁盘空间 *** CLOSE DATABASES

OPEN DATABASE (HOME(2) + 'Data\testdata') USE customer && Opens Customer table

*** 确认表头大小 *** gnTableHead = HEADER( )

*** 计算表的大小 ***

DISKSPACE( ) 函 数 - 图14DISKSPACE( ) 函 数 - 图15DISKSPACE( ) 函 数 - 图16DISKSPACE( ) 函 数 - 图17DISKSPACE( ) 函 数 - 图18DISKSPACE( ) 函 数 - 图19DISKSPACE( ) 函 数 - 图20DISKSPACE( ) 函 数 - 图21gnFileSize = gnTableHead + (RECSIZE( ) * RECCOUNT( ) + 1) IF > (gnFileSize * 3)

WAIT WINDOW 'Sufficient diskspace to sort.'

ELSE

WAIT WINDOW 'Insufficient diskspace. Sort cannot be done.' ENDIF

请 参 阅

HEADER ( ) , RECSIZE( ) , SET DEFAULT