易语言
相关API函数： GetDriveType：判断磁盘驱动器的类型。
DLL命令表： .版本 2 .DLL命令 GetDriveType, 整数型, , 'GetDriveTypeA' .参数 nDrive, 文本型
InternetGetConnectedStateEx返回值介绍： 返回值指定驱动器的类型，它可以是以下值之一： DRIVE_UNKNOWN：未知磁盘类型； DRIVE_NO_ROOT_DIR：根路径无效； DRIVE_REMOVABLE：可移动磁盘； DRIVE_FIXED：固定磁盘； DRIVE_REMOTE：远程驱动器； DRIVE_CDROM：光驱； DRIVE_RAMDISK：虚拟内存盘。 易语言中，上述常量的10进制数值为： #DRIVE_UNKNOWN=0； #DRIVE_NO_ROOT_DIR=1； #DRIVE_REMOVABLE=2； #DRIVE_FIXED=3； #DRIVE_REMOTE=4； #DRIVE_CDROM=5； #DRIVE_RAMDISK=6。
枚举磁盘并获取磁盘类型源码如下： .版本 2 .子程序 _按钮_枚举_被单击 .局部变量 i, 整数型 .局部变量 drive, 文本型 .局部变量 type, 整数型 .局部变量 str, 文本型 编辑框1.内容 ＝ “” .计次循环首 (26, i) drive ＝ 字符 (64 ＋ i) ＋ “:” type ＝ GetDriveType (drive) .如果真 (type ≠ 1) 编辑框1.加入文本 (drive ＋ 多项选择 (type ＋ 1, “未知类型”, “”, “可移动磁盘”, “固定磁盘”, “远程驱动器”, “光驱”, “虚拟内存盘”) ＋ #换行符) .如果真结束 .计次循环尾 ()