Can't find local file.

[cbrxxrider]

I'm trying to use the code shown in https://www.accessforums.net/code-re...end-33331.html. All I did was change the name of the database, server, and server location but for some reason when it opens Access 2013, the error comes up that Access can't find database file %userprofile%\appdata\local\redirect\ui1.3.2013.ac cdr, which obviously means it's not creating the local front end copy.

I'm wondering if there might be something else I'm missing. I also tried removing the runtime since I'm not using that.



"The .bat file should read:

@echo off
REM file used to automatically update the Database when updates are available.
if not exist %userprofile%\appdata\local\redirect\ui1.3.2013.accdr echo Database needs to update to newer version.
if not exist %userprofile%\appdata\local\redirect\ui1.3.2013.accdr pause
@echo off
if not exist %userprofile%\appdata\local\redirect\ui1.3.2013.accdr if exist %userprofile%\appdata\local\redirect\ui*.accdr del %userprofile%\appdata\local\redirect\ui*.accdr


if not exist %userprofile%\appdata\local\redirect\ui1.3.2013.accdr Robocopy \\DUI_NAS\data\database %userprofile%\appdata\local\redirect ui1.3.2013.accdr


Start MSAccess.exe /runtime %userprofile%\appdata\local\redirect\ui1.3.2013.accdr


Exit

"

[Xipooo]

Are you seeing the file in your user profile subdirectory?

Run the batch file from a command prompt instead of double clicking on it. You will be able to keep the window open that way and see if there were any problems.

[June7]

Another issue could be IT security limitations.

We have to install the frontend at C:\ root level because the code cannot copy into user folders. Manual copy/paste works, but the code errors.

I use VBScript.

Const OverwriteExisting = TRUE
Set objFSO = CreateObject("Scripting.FileSystemObject")
'following will copy Access file
objFSO.CopyFile "\\servername\path\filename.accdb", "c:\", OverwriteExisting
'following will now open the Access file
Set oShell = CreateObject("WScript.Shell")
If objFSO.FolderExists("C:\Program Files\Microsoft Office\Office14") Then
oShell.Run """C:\Program Files\Microsoft Office\Office14\msaccess.exe"" ""c:\MaterialsDatabase.accdb"""
Else
oShell.Run """C:\Program Files\Microsoft Office\Office12\msaccess.exe"" ""c:\MaterialsDatabase.accdb"""
End If

[ItsMe]

I do not believe I have ever seen a system folder named "appdata"

[cbrxxrider]

I do not believe I have ever seen a system folder named "appdata"

Normally it's hidden.

[cbrxxrider]

Are you seeing the file in your user profile subdirectory?

Run the batch file from a command prompt instead of double clicking on it. You will be able to keep the window open that way and see if there were any problems.

I did try this as well with the same outcome, I'll try to script as well.

[Xipooo]

When you opened the batch file from a command prompt did you get any error messages? What were they?

[ssanfu]

I used to write a lot of batch files. Now, not so much.
When I tested the batch file from Post #1, it choked on the spaces in %userprofile% (C:\Documents and Settings\steve). DOS batch files expect the 8.3 file name format and does not handle spaces well.

So here is an attempt to re-write the batch file. It might be easier to follow June's advice about using a VBScript file.....

I added variables to make it easier to change the dB name.
The two lines to change are:
the dB name
set dB="%userprofile%\appdata\local\redirect\ui1.3.2013.accdr"

The path to the master FE file
Set DBM = \\DUI_NAS\data\database


USE AT YOUR OWN RISK!!! I AM NOT RESPONSIBLE FOR WHATEVER HAPPENS!!!

[cbrxxrider]

This works, thanks ssanfu!