成人午夜激情影院,小视频免费在线观看,国产精品夜夜嗨,欧美日韩精品一区二区在线播放

在Access中指定工作組從而啟動MDB文件

2010-08-28 10:51:35來源:西部e網作者:

程序完成交給用戶后,要求每次啟動時均用指定的工作組文件,途徑大致如下幾種:

1、用快捷方式,在其中加上啟動參數指定工作組文件;

2、用Access內置工作組管理員指定工作組。

3、可以直接修改注冊表。

4、用VB之類的東東做個外殼啟動帶參數啟動Access。

第一種方式用戶在使用中容易造成丟失。

第二第三種其實是一樣的,但設置后用戶在本機操作所有的數據庫都要求登陸。

其實用Access本身也可以做個外殼,達到同樣效果:

Set fs = Application.FileSearch  
''查找文件 
With fs 
 .LookIn = "C:\Program Files\Microsoft Office\" 
''查找路徑 
 .SearchSubFolders = True 
''包含子文件夾 
 .FileName = "msaccess.exe" 
''查找字串 
  
 If .Execute() > 0 Then 
  p = .FoundFiles(1)  
''Access主程序完整路徑 
  Shell p & " " & CurrentProject.Path & 
"\123.mdb /wrkgrp " & CurrentProject.Path & 
"\system.mdw", 3
''帶參數啟動程序 
 Else 
  MsgBox "C:\Program Files\Microsoft Office\ 
下沒找到MSACCESS的程序文件,系統無法運行." 
 End If 
End With 
docmd.quit''退出外殼

將外殼做成MDE交付用戶即可。帶參數啟動程序語句可更改為以下代碼:

Shell SysCmd(acSysCmdAccessDir) & " 
msaccess.exe" & CurrentProject.Path & 
"\123.mdb /wrkgrp " & CurrentProject.Path & "\system.mdw".

注意,如果要將密碼和用戶名寫在mde中,請先加密,否則用寫字板就可看見密碼及用戶名。

關鍵詞:AccessMDB

贊助商鏈接:

主站蜘蛛池模板: 平顶山市| 苍梧县| 曲沃县| 通榆县| 莱州市| 金乡县| 漳平市| 平邑县| 繁昌县| 镇沅| 囊谦县| 郧西县| 广河县| 洛阳市| 务川| 缙云县| 聂荣县| 玉环县| 旬阳县| 永仁县| 辽阳县| 绩溪县| 新野县| 沂南县| 阳原县| 赤峰市| 错那县| 新田县| 四平市| 长沙县| 府谷县| 荣成市| 额敏县| 阳新县| 湄潭县| 垣曲县| 玉环县| 阿拉善右旗| 平潭县| 汉中市| 黄龙县|