[AccessD] Allow Edits

Dang.

I was hoping that the properties of the main form would be super-imposed
on the sub-forms.  

Thanks for the easy solution.

-Z

Stephen R. Zayko PE
SECOR International Inc
2321 Club Meridian Drive Ste E
Okemos, MI 48864
 
(517) 349-9499 ext 224
(517) 204-5136 (c)

-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Andy Lacey
Sent: Monday, January 08, 2007 5:41 PM
To: 'Access Developers discussion and problem solving'
Subject: Re: [AccessD] Allow Edits

You can do it with a loop Steve. Something like

Function SubFormAllowEdits(blnOnOrOff As Boolean) Dim ctl as control

For each ctl in me.controls
  if ctl.ControlType = acSubform then
    ctl.Form.AllowEdits=blnOnOrOff
  end if
Next

End Function

Not tested but shouldn't be far off (I hope).

-- Andy Lacey
http://www.minstersystems.co.uk 

> -----Original Message-----
> From: accessd-bounces at databaseadvisors.com
> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Steve Zayko
> Sent: 08 January 2007 22:33
> To: Access Developers discussion and problem solving
> Subject: [AccessD] Allow Edits
> 
> 
> I have a control that turns on and off the "AllowEdits" 
> property on a form.  This form also have several sub-forms embedded on

> it.
> 
> If I turn off the AllowEdits property on the main form, then must I 
> also do the same for each and every sub-form?
> 
> Thanks
> 
> -Z
> 
> Stephen R. Zayko PE
> SECOR International Inc
> 2321 Club Meridian Drive Ste E
> Okemos, MI 48864
>  
> (517) 349-9499 ext 224
> (517) 204-5136 (c)
> 
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> 
> 


--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com