发信人: nomean()
整理人: hunter__fox(2002-03-16 21:48:54), 站内信件
|
在VFP应用程序中如何取得现有的磁盘代号？
要取得可用的磁盘代号，需要调用WIN32API来得到，利用WIN32API中的GetLogic
alDrives()函数，GetLogicalDrives()函数会传回一个值，其值中的每位若为1，
则表示该磁盘已用，若为0则表示磁盘为可用，具体代码如下：
Declare integer GetLogicalDrives in kernel32.dll as is_iriver_ready
Nreslut=is_driver_ready()
Cused_driver="已被用的磁盘代号有："
Cavail_driver="可用的磁盘代号有："
Nmask=1
For I=1 to 26
If bitand(nreslut,nmask)!=0
Cused_driver=cused_driver+chr(64+I)+","
Else
Cavail_driver=cvalil_driver+chr(64+I)+","
Endif
Nmask=bitlshift(nmask,1)
Next
Wait cused_driver+chr(13)+cavail_driver wind
--
我颤颤地伸出手
却没能握住一丝温柔
※ 来源:．月光软件站 http://www.moon-soft.com．[FROM: 202.101.119.187]
|
|