自定义函数:用代码判断access文件是不是mde文件-Natsume Takashi
Access软件网QQ交流学习群(群号码198465573),欢迎您的加入!
首页 >技术文章> Access数据库-模块/函数/VBA


自定义函数:用代码判断access文件是不是mde文件

发表时间:2018/10/15 8:13:50 评论(0) 浏览(532)  评论 | 加入收藏 | 复制
   
摘 要:用代码判断access文件是不是mde文件
正 文:

一、问题描述:

老师 如何才能用代码判断一个access文件是不是mde文件


二、解答:

需要使用自定义函数 函数如下:

Public Function IsMDE() As Boolean
    On Error GoTo ErrorHandler
    Dim dbs As Object
    IsMDE = False
    Set dbs = CurrentDb
    
    If dbs.Properties("MDE") = "T" Then
        IsMDE = True
    End If

   

ExitHere:
    Set dbs = Nothing
    Exit Function

ErrorHandler:
    Resume ExitHere
End Function

使用示例:


Ismde()  '返回False代表不是mde文件 


Access软件网交流QQ群(群号:198465573)
 
 相关文章
如何通过自定义函数将十六进制转换成二进制  【易勋  2017/2/26】
开发平台自定义函数LoadRecord的使用  【牛魔王  2017/10/29】
Access中的Workdate自定义函数  【张志  2017/11/22】
自定义函数:判断一个窗体是否是以子窗体的形式打开  【Natsume Takashi   2018/9/17】
自定义函数:判断当前数据库的链接表是否全是来自access  【Natsume Takashi   2018/10/14】
 
 访客评论
总记录:0篇  页次:0/0 9 1 :
 
 发表评论
评论内容 (必填)

常见问答
技术分类
相关资源
文章搜索
关于作者

Natsume Takashi

文章分类

文章存档

友情链接