'************************************************** ' Code segment for using privDBEngine. '************************************************** ' Example 1 '---------------- Dim dbX As PrivDBEngine Dim wsX As Workspace Dim dbe As Database 'Return a reference to a new instance of the PrivDBEngine object Set dbe = New PrivDBEngine 'Set the SystemDB property to specify the workgroup file dbe.SystemDB = strWIFPath ‘Specify the username (this could be any valid username) dbe.DefaultUser = strUserName ‘Specify the password dbe.DefaultPassword = strPassword ‘Set the workspace Set wsX = dbe.Workspaces(0) 'Open the secured database Set dbe = ws.OpenDatabase(strDBPath) '---------------- ' Example 2 '---------------- Dim dbe As DAO.DBEngine Set dbe = CreateObject("DAO.DBEngine")