在程序打包移植的时候,需要用到 光盘/u盘 。在不知道机子上的光盘的盘符是多少,或不知道盘符的类别和盘符的总数的话。
......... 可以用如下方法来判断 .........
要用到的 api 描述:
返回机子上的所有盘符
getlogicaldrivestrings |
| vb声明 | |
| declare function getlogicaldrivestrings lib "kernel32" alias "getlogicaldrivestringsa" (byval nbufferlength as long, byval lpbuffer as string) as long | |
| 说明 | |
| 获取一个字串,其中包含了当前所有逻辑驱动器的根驱动器路径 | |
| 返回值 | |
| long,装载到lpbuffer的字符数量(排除空中止字符)。如缓冲区的长度不够,不能容下路径,则返回值就变成要求的缓冲区大小。零表示失败。会设置getlasterror | |
| 参数表 | |
| 参数 | 类型及说明 |
| nbufferlength | long,lpbuffer字串的长度 |
| lpbuffer | string,用于装载逻辑驱动器名称的字串。每个名字都用一个null字符分隔,在最后一个名字后面用两个null表示中止(空中止) |
不同的盘类型可以用 getdrivetype 来判断.
getdrivetype |
| vb声明 | |
| declare function getdrivetype lib "kernel32" alias "getdrivetypea" (byval ndrive as string) as long | |
| 说明 | |
| 判断一个磁盘驱动器的类型 | |
| 返回值 | |
| long,如驱动器不能识别,则返回零。如指定的目录不存在,则返回1。如执行成功,则用下述任何一个常数指定驱动器类型:drive_removable, drive_fixed, drive_remote, drive_cdrom 或 drive_ramdisk | |
| 参数表 | |
| 参数 | 类型及说明 |
| ndrive | string,包含了驱动器根目录路径的一个字串 |
本文关键:CD-ROM,硬盘,U盘,光盘