hi all,

i'm trying to hide by database with this code:
Application.CurrentDb.TableDefs(CurrentDb.TableDefs(i).Name) .Properties("Attributes").Value
= dbhiddenobject

from some reason it doesnt work
the table are not hidden,does anyone have an idea what can cause this
problem?

On 31 =D7=9E=D7=A8=D7=A5, 18:23, "Allen Browne" <AllenBro... [at] SeeSig.Invalid>=
wrote:
> Try AND-ing the attribute to the constant:
>
> If (CurrentDb.TableDefs(i).Attributes And dbHiddenObject) <> 0 Then
>
> --
> Allen Browne - Microsoft MVP. =C2=A0Perth, Western Australia
> Tips for Access users -http://allenbrowne.com/tips.html
> Reply to group, rather than allenbrowne at mvps dot org.
>
> "thread" <yaniv... [at] gmail.com> wrote in message
>
> news:2b1b7b65-4364-41fa-b49b-eb8a5c942b73 [at] s8g2000prg.googleg roups.com...
>
and what is the statement there?
i need to make it hide
no success till now
>

>
>
>
> > i'm trying to hide by database with this code:
> > Application.CurrentDb.TableDefs(CurrentDb.TableDefs(i).Name) .Properties(=
"At=C2=ADtributes").Value
> > =3D dbhiddenobject
>
> > from some reason it doesnt work
> > the table are not hidden,does anyone have an idea what can cause this
> > problem?-=D7=94=D7=A1=D7=AA=D7=A8 =D7=98=D7=A7=D7=A1=D7=98 =D7=9E=D7=A6=
=D7=95=D7=98=D7=98-
>
> -=D7=94=D7=A8=D7=90=D7=94 =D7=98=D7=A7=D7=A1=D7=98 =D7=9E=D7=A6=D7=95=D7=
=98=D7=98-

Sorry: you were trying to write the property:

With CurrentDb.TableDefs(i)
.Attributes = .Attributes OR dbHiddenObject
End With

--
Allen Browne - Microsoft MVP. Perth, Western Australia
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

"thread" <yaniv.dg [at] gmail.com> wrote in message
news:59079157-9a68-4697-bd50-15de42c3b63e [at] e10g2000prf.google groups.com...
On 31 מרץ, 18:23, "Allen Browne" <AllenBro... [at] SeeSig.Invalid> wrote:
> Try AND-ing the attribute to the constant:
>
> If (CurrentDb.TableDefs(i).Attributes And dbHiddenObject) <> 0 Then
>
> news:2b1b7b65-4364-41fa-b49b-eb8a5c942b73 [at] s8g2000prg.googleg roups.com...
>
and what is the statement there?
i need to make it hide
no success till now