Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Dim strPath as String
strPath = Chr(34) & "(Enter full path to MSACCESS.EXE)" & Chr(34) & " " & Chr(34) & _
CurrentProject.FullName & " " & Chr(34) & _
"/user " & CurrentUser & " /wrkgrp " & Chr(34) & "(Enter the Full Path to your).mdw" & Chr(34)
Shell strPath, vbMaximizedFocus
Application.Quit
Dim strPath As String
strPath = Chr(34) & "C:\Program Files\Microsoft Office\Office10\MSACCESS.EXE" & Chr(34) & " " & Chr(34) & _
CurrentProject.FullName & " " & Chr(34) & _
"/user " & CurrentUser & " /wrkgrp " & Chr(34) & "C:\Documents and Settings\Owner\My Documents\Secured1.mdw" & Chr(34)
Shell strPath, vbMaximizedFocus
Application.Quit