Access开发培训
网站公告
·Access专家课堂QQ群号:151711184    ·Access快速开发平台下载地址及教程    ·欢迎加入Access专家课堂微信群!    ·如何快速搜索本站文章|示例|资料    
您的位置: 首页 > 技术文章 > 综合其它

Access利用api实现打开/关闭光驱

时 间:2013-11-13 20:18:29
作 者:zhengjin   ID:19605  城市:大连
摘 要:Access利用api实现打开/关闭光驱
正 文:

按照这位网友提供的语句做的实例

打开关闭光驱

 

分享一个API函数,API函数有很多对我们操作系统有很大的帮助,这个是打开/关闭光驱的函数

1、新建一个模块,把下面的代码粘贴到模块中。
Declare Sub mciSendStringA Lib "winmm.dll" (ByVal lpstrCommand As String, ByVal lpstrReturnString As Any, ByVal uReturnLength As Long, ByVal hwndCallback As Long)


2.调用函数,直接调用下面的代码即可使用
'打开光驱

'mciSendStringA "Set CDAudio Door Open", 0&, 0, 0

'关闭光驱

'mciSendStringA "Set CDAudio Door Closed", 0&, 0, 0

 



Access软件网QQ交流群 (群号:483923997)       Access源码网店

常见问答:

技术分类:

相关资源:

专栏作家

关于我们 | 服务条款 | 在线投稿 | 友情链接 | 网站统计 | 网站帮助