John Skolits
Support at CorporateDataDesign.com
Mon Jun 7 12:14:31 CDT 2004
Thanks Marty, I tried that address but it didn't work. But maybe the info in the link you sent will help.Thanks! John -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of MartyConnelly Sent: Monday, June 07, 2004 12:49 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] PrivDBEngine object no longer works on some XP machines terry.kreft at mps.co.uk or look at this http://groups.google.com/groups?hl=en&lr=&ie=UTF-8&threadm=770rb2%24bs%241%4 0remarQ.com&rnum=5&prev=/groups%3Fq%3Dterry%2Bkreft%2BPrivDBEngine%26hl%3Den %26lr%3D%26ie%3DUTF-8%26scoring%3Dd%26selm%3D770rb2%2524bs%25241%2540remarQ. com%26rnum%3D5 John Skolits wrote: >Anyone run into a problem where the PrivDBEngine objects doesn't work >on some XP machines? > >I've been using this routine for years. It allows me to make database >changes to secure databases as long as I have the correct system.mdw >security file. > >Specs: Written in Access 2000. Resides in an Access 200 MDE library >file. Problem occurs runtime or even if PC is already loaded with >Access 2000, or XP loaded. Very intermittant. Comes up with an ODBC >error/DSN error. Here is a snippet of code: > > >It breaks at line 160 > >Snippet: > > > Dim dbe As DAO.PrivDBEngine > Dim wsp As DAO.Workspace > Dim dbEXT_Database As DAO.Database > Dim strSecurityFileName As String > >30 strSecurityFileName="c:\test\system.mdw" > >90 Set dbe = New PrivDBEngine >100 With dbe >110 .SystemDB = strSecurityFileName >120 .DefaultUser = "USER" >130 .DefaultPassword = "PASSWORD" >140 End With >150 Set wsp = dbe.Workspaces(0) 'systemdb is locked in now > > 'Check the table from the external back end. If There return a > true > >160 Set dbEXT_Database = wsp.OpenDatabase(strDataBaseFileName) > >ALSO, Teery Kreft has done some work in this area. Anyone have her web >site or email address? > >John Skolits > > > > -- Marty Connelly Victoria, B.C. Canada -- _______________________________________________ AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com