Wrox Home  
Search P2P Archive for: Go

  Return to Index  

activex_data_objects thread: Read Only Problems


Message #1 by Andy Faulkner <afaul@t...> on Thu, 7 Mar 2002 12:53:13 -0500
This message is in MIME format. Since your mail reader does not understand

this format, some or all of this message may not be legible.



------_=_NextPart_001_01C1C600.F3A37500

Content-Type: text/plain;

	charset="iso-8859-1"



I have overwritten a query definition within access to make deletions in

tables:



strSQL = "DELETE * FROM IA"

Set qdf = db.CreateQueryDef("", strSQL)

qdf.Execute



This works fine, however when the application is rolled out the mdb must be

read only too prevent users from changing data.  When I do change to read

only and trap the error with a handler the 'Resume'  does not execute and

the application freezes:



If Err.Number = 3086 Then

        Resume

Else

        'some code

End If



Any suggestions?



Thank you,



Andy..










Message #2 by "Parag Phanasgaonkar" <parag.phanasgaonkar@p...> on Fri, 8 Mar 2002 09:23:32 +0530
This is a multi-part message in MIME format.



------=_NextPart_000_002F_01C1C682.EA641440

Content-Type: text/plain;

	charset="iso-8859-1"

Content-Transfer-Encoding: quoted-printable



Read Only ProblemsWhy to keep mdb read only. rather keep it password 

protected.



Thanks and Regards



Parag Phanasgaonkar

Senior Software Engineer



Improvement is a journey, not a destination.

  ----- Original Message -----

  From: Andy Faulkner

  To: ActiveX_Data_Objects

  Sent: Thursday, March 07, 2002 11:23 PM

  Subject: [activex_data_objects] Read Only Problems





  I have overwritten a query definition within access to make deletions 

in tables:



  strSQL =3D "DELETE * FROM IA"

  Set qdf =3D db.CreateQueryDef("", strSQL)

  qdf.Execute



  This works fine, however when the application is rolled out the mdb 

must be read only too prevent users from changing data.  When I do 

change to read only and trap the error with a handler the 'Resume'  does 

not execute and the application freezes:



  If Err.Number =3D 3086 Then

          Resume

  Else

          'some code

  End If



  Any suggestions?



  Thank you,



  Andy..










$subst('Email.Unsub').






Message #3 by Andy Faulkner <afaul@t...> on Fri, 8 Mar 2002 08:11:24 -0500
This message is in MIME format. Since your mail reader does not understand

this format, some or all of this message may not be legible.



------_=_NextPart_001_01C1C6A2.BFE4D090

Content-Type: text/plain;

	charset="iso-8859-1"



The access mdb is actually just a final destination for the reports.  The

data is extracted from the SQL Server which already prompts for multiple

passwords so that is not an option..Is it possible perhaps to temporarily

change the mdb from read only while my queries run?

 

Thank you for helping Parag.

 

Andy..



-----Original Message-----

From: Parag Phanasgaonkar [mailto:parag.phanasgaonkar@p...]

Sent: Thursday, March 07, 2002 10:54 PM

To: ActiveX_Data_Objects

Subject: [activex_data_objects] Re: Read Only Problems





Why to keep mdb read only. rather keep it password protected.

 

Thanks and Regards

 

Parag Phanasgaonkar

Senior Software Engineer



Improvement is a journey, not a destination.



----- Original Message ----- 

From: Andy Faulkner <mailto:afaul@t...>  

To: ActiveX_Data_Objects <mailto:activex_data_objects@p...>  

Sent: Thursday, March 07, 2002 11:23 PM

Subject: [activex_data_objects] Read Only Problems





I have overwritten a query definition within access to make deletions in

tables: 



strSQL = "DELETE * FROM IA" 

Set qdf = db.CreateQueryDef("", strSQL) 

qdf.Execute 



This works fine, however when the application is rolled out the mdb must be

read only too prevent users from changing data.  When I do change to read

only and trap the error with a handler the 'Resume'  does not execute and

the application freezes:



If Err.Number = 3086 Then 

        Resume 

Else 

        'some code 

End If 



Any suggestions? 



Thank you, 



Andy.. 










$subst('Email.Unsub'). 






$subst('Email.Unsub'). 







  Return to Index