展开全部
.版本 2
.支持库 eDB
皮肤_资源加载 (#皮肤_XMP)
全局_数据库2 = 用户权限
.如果 (全局_数据库2.连接Access (“C:\Documents and Settings\Administrator\桌面\新财务仓库系统\当前数据库\用户权限.mdb”, “”) = 真)
启动窗口记录集1.置连接 (全局_数据库2)
启动窗口记录集1.打开 (“用户权限”, #数据表名, )
启动窗口记录集1.到首记录 ()
用户名显示 ()
.否则
信息框 (“数据库连接失败,请重新连接!”, 0, “温情提示:”)
.支持库 eDB
皮肤_资源加载 (#皮肤_XMP)
全局_数据库2 = 用户权限
.如果 (全局_数据库2.连接Access (“C:\Documents and Settings\Administrator\桌面\新财务仓库系统\当前数据库\用户权限.mdb”, “”) = 真)
启动窗口记录集1.置连接 (全局_数据库2)
启动窗口记录集1.打开 (“用户权限”, #数据表名, )
启动窗口记录集1.到首记录 ()
用户名显示 ()
.否则
信息框 (“数据库连接失败,请重新连接!”, 0, “温情提示:”)
来自:求助得到的回答
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询