dbhiddenobject doesnt work

[thread]

hi all,

i'm trying to hide by database with this code:
Application.CurrentDb.TableDefs(CurrentDb.TableDef s(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?

[Allen Browne]

Try AND-ing the attribute to the constant:

If (CurrentDb.TableDefs(i).Attributes And dbHiddenObject) <0 Then

--
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" <ya******@gmail.comwrote in message
news:2b**********************************@s8g2000p rg.googlegroups.com...

>
i'm trying to hide by database with this code:
Application.CurrentDb.TableDefs(CurrentDb.TableDef s(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?

[thread]

On 31 מרץ, 18:23, "Allen Browne" <[e-mail]>wrote:

Try AND-ing the attribute to the constant:

If (CurrentDb.TableDefs(i).Attributes And dbHiddenObject) <0 Then

--
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" <[e-mail] in message

news:2b**********************************@s8g2000p rg.googlegroups.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.TableDef s(i).Name).Properties("AtÂ*tributes").Value
= dbhiddenobject

from some reason it doesnt work
the table are not hidden,does anyone have an idea what can cause this
problem?-הסתר טקסט מצוטט-

-הר�ה טקסט מצוטט-

[Allen Browne]

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" <ya******@gmail.comwrote in message
news:59**********************************@e10g2000 prf.googlegroups.com...
On 31 מרץ, 18:23, "Allen Browne" <[e-mail]:

Try AND-ing the attribute to the constant:

If (CurrentDb.TableDefs(i).Attributes And dbHiddenObject) <0 Then

news:2b**********************************@s8g2000p rg.googlegroups.com...

and what is the statement there?
i need to make it hide
no success till now