分享

access发布后软件弹出安全警告,取消的方法

 jbgy 2012-08-13
说明1:以下另存为.bat的文件,在用打包软件Setup Factory 7.0打包的时候调用即可
打包软件设置方法如下:
"屏幕"-“安装之后”-弹出对话框中选择“安装之后”-“编辑”-弹出对话框中选择“操作”,对下面的列表框中选择"ON Next",
 然后在 行 04 Screen.Next();
 后面的   05 这里粘帖File.Open(SessionVar.Expand("%AppFolder%\\取消安全警告.bat"), "", SW_MAXIMIZE);  文件名自己改为你自己的.bat文件即可
 
 说明2: 以下另存为.bat的文件件@echo off后添加以下代码让bat后台运行,这个用过
if not "%1"=="wkdxz" mshta vbscript:createobject("wscript.shell").run("""%~f0"" wkdxz",vbhide)(window.close)&&exit
 
以下代码另存为.bat文件:

@echo off
if not "%1"=="wkdxz" mshta vbscript:createobject("wscript.shell").run("""%~f0"" wkdxz",vbhide)(window.close)&&exit

echo 去除ACCESS打开时的安全提示...


reg query HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Access\Security>nul 2>nul&&goto 10||goto 11

:10

reg delete "HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Access\Security" /v "Level" /f

reg add "HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Access\Security" /v "Level" /t REG_DWORD /d "00000001" /f

:11

reg query HKEY_CURRENT_USER\Software\Microsoft\Office\10.0\Access\Security>nul 2>nul&&goto 12||goto 13

:12

reg delete "HKEY_CURRENT_USER\Software\Microsoft\Office\10.0\Access\Security" /v "Level" /f

reg add "HKEY_CURRENT_USER\Software\Microsoft\Office\10.0\Access\Security" /v "Level" /t REG_DWORD /d "00000001" /f

:13

reg query HKEY_CURRENT_USER\Software\Microsoft\Office\12.0\Access\Security>nul 2>nul&&goto 14||goto 15

:14

reg delete "HKEY_CURRENT_USER\Software\Microsoft\Office\12.0\Access\Security" /v "vbawarnings" /f

reg add "HKEY_CURRENT_USER\Software\Microsoft\Office\12.0\Access\Security" /v "vbawarnings" /t REG_DWORD /d "00000001" /f

:15

reg query HKEY_CURRENT_USER\Software\Microsoft\Office\14.0\Access\Security>nul 2>nul&&goto 16||goto Q

:16

reg delete "HKEY_CURRENT_USER\Software\Microsoft\Office\14.0\Access\Security" /v "vbawarnings" /f

reg add "HKEY_CURRENT_USER\Software\Microsoft\Office\14.0\Access\Security" /v "vbawarnings" /t REG_DWORD /d "00000001" /f

:Q

echo. & pause

 

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多