Results 1 to 7 of 7

vba function in condition blocked by access 365

  1. #1
    albourg is offline Novice
    Windows 10 Access 2016
    Join Date
    May 2017
    Posts
    4

    vba function in condition blocked by access 365

    Hi,



    using access 365 32 bits/windows 10.

    Problem: macro:
    Condition Action
    Dir("c:\*.*")="" Beep()

    Beep() occurs always. Dir("c:\*.*")="" is NOT called.

    In windows 10 access 2013:
    [HKEY_LOCAL_MACHINE\Software\WOW6432Node\Microsoft\ Office\15.0\Access Connectivity Engine\Engines]
    "SandboxMode"=dword:00000000
    fixes the issue. But not with access 365/click-to-run.

    Can someone tell me which registry key has to be added?

    Thanks.

  2. #2
    rpeare is offline VIP
    Windows XP Access 2003
    Join Date
    Jul 2011
    Posts
    5,086
    can you not just use

    Code:
    dim fs
    set fs = createobject("scripting.filesystemobject"
    if fs.folderexists("c:\") = false then beep()
    set fs = nothing
    this is assuming the BEEP function isn't the part causing the problem.

  3. #3
    albourg is offline Novice
    Windows 10 Access 2016
    Join Date
    May 2017
    Posts
    4
    No way.
    I would have to re-write all my apps.
    If I have to re-write everything, I go to filemaker or other tools, but I stop using microsoft.

  4. #4
    rpeare is offline VIP
    Windows XP Access 2003
    Join Date
    Jul 2011
    Posts
    5,086
    I have no access to office 365 sorry, but it shouldn't be that onerous to change what you have to a function call that returns a true/false in fact you may be able to build your own function maybe even name it Public Function DIR(sPath) but not having knowledge of the specific application that may cause issues if your current registry key also supports other items within your application.

  5. #5
    albourg is offline Novice
    Windows 10 Access 2016
    Join Date
    May 2017
    Posts
    4
    Dir is just as sample. I have huge applications and all function calls in test column of macros cause troubles.
    I found a solution that seems to work fine meanwhile:
    HKLM\Software\Microsoft\Office\ClickToRun\REGISTRY \MACHINE\Software\WOW6432Node\Microsoft\Office\16. 0\Access Connectivity Engine\Engines\SandboxMode
    and
    HKLM\Software\Microsoft\Office\16.0\ClickToRun\REG ISTRY\MACHINE\Software\WOW6432Node\Microsoft\Offic e\16.0\Access Connectivity Engine\Engines\SandboxMode



    I don't understand MicroSoft's logic! Quite sure they will find something else in next release, the only interest of these stuff is to sell consultancy.

  6. #6
    Micron is offline VIP
    Windows 7 32bit Access 2007
    Join Date
    Jun 2014
    Location
    Ontario, Canada
    Posts
    3,113
    maybe it's just a group policy setting that your admin needs to change:
    http://www.pcworld.com/article/30474...g-attacks.html
    - "doesn't work" is no help.Error #s/text do. State what's happening.
    - Use code tags for code/sql; show where errors occur
    Make all suggested changes in copies of your database or to its objects

  7. #7
    albourg is offline Novice
    Windows 10 Access 2016
    Join Date
    May 2017
    Posts
    4

    not a domain

    end-users are professional individuals, they work on their own computer... and there is no server behind it.

Please reply to this thread with any new information or opinions.

Similar Threads

  1. Replies: 1
    Last Post: 11-29-2016, 07:05 AM
  2. Replies: 4
    Last Post: 01-11-2015, 11:07 PM
  3. Pop-up when database is blocked
    By christophe.dewinne in forum Access
    Replies: 3
    Last Post: 01-16-2012, 06:54 AM
  4. query being blocked by pop up box
    By normie in forum Queries
    Replies: 3
    Last Post: 07-10-2010, 03:33 PM
  5. Unsafe expressions are not blocked.
    By darksniperx in forum Access
    Replies: 8
    Last Post: 01-07-2010, 02:25 PM

Tags for this Thread

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  
Tech Forums: Microsoft Office Forums