Prev: costing problem
Next: splitting database
From: Rich Locus on 31 Jan 2010 20:02
I created two tables and used the "Relationships" view to create the
relationships. Now, when I just display the table data (double click the
table name) on the One Table (One to Many), it has a plus sign in the left
column that brings in the "Many" table data if I click the + sign.. I could
not find a way to turn off that feature. Is there?
--
Rich Locus
Logicwurks, LLC
From: Tom van Stiphout on 31 Jan 2010 20:14
On Sun, 31 Jan 2010 17:02:01 -0800, Rich Locus
<RichLocus(a)discussions.microsoft.com> wrote:

Yes there is, and it is a good idea to turn it off. Design the table,
get properties, and set SubDatasheetName to "[none]".

If you search for these keywords you'll probably find code that will
loop over all tables and turn it off for all.

-Tom.
Microsoft Access MVP


>I created two tables and used the "Relationships" view to create the
>relationships. Now, when I just display the table data (double click the
>table name) on the One Table (One to Many), it has a plus sign in the left
>column that brings in the "Many" table data if I click the + sign.. I could
>not find a way to turn off that feature. Is there?
From: John W. Vinson on 31 Jan 2010 21:06
On Sun, 31 Jan 2010 18:14:27 -0700, Tom van Stiphout <tom7744.no.spam(a)cox.net>
wrote:

>On Sun, 31 Jan 2010 17:02:01 -0800, Rich Locus
><RichLocus(a)discussions.microsoft.com> wrote:
>
>Yes there is, and it is a good idea to turn it off. Design the table,
>get properties, and set SubDatasheetName to "[none]".
>
>If you search for these keywords you'll probably find code that will
>loop over all tables and turn it off for all.

Here's some (that I got from this group at some point I've forgotten,
apologies to the author):

Public Function TurnOffSubDataSh() As Integer
Dim db As DAO.Database
Dim tdf As DAO.TableDef
Dim prp As DAO.Property
Const conPropName = "SubdatasheetName"
Const conPropValue = "[None]"

TurnOffSubDataSh = 0
Set db = DBEngine(0)(0)
For Each tdf In db.TableDefs
If (tdf.Attributes And dbSystemObject) = 0 Then
If tdf.Connect = vbNullString And Asc(tdf.Name) <> 126 Then
'Not attached, or temp.
If Not HasProperty(tdf, conPropName) Then
Set prp = tdf.CreateProperty(conPropName, dbText, _
conPropValue)
tdf.Properties.Append prp
TurnOffSubDataSh = TurnOffSubDataSh + 1
Else
If tdf.Properties(conPropName) <> conPropValue Then
tdf.Properties(conPropName) = conPropValue
TurnOffSubDataSh = TurnOffSubDataSh + 1
End If
End If
End If
End If
Next

Set prp = Nothing
Set tdf = Nothing
Set db = Nothing
End Function

--

John W. Vinson [MVP]
From: Keith Wilby on 1 Feb 2010 05:42
"Tom van Stiphout" <tom7744.no.spam(a)cox.net> wrote in message
news:fkacm5h58sic07no9hjjntmar87sjl2u5c(a)4ax.com...
> On Sun, 31 Jan 2010 17:02:01 -0800, Rich Locus
> <RichLocus(a)discussions.microsoft.com> wrote:
>
> Yes there is, and it is a good idea to turn it off. Design the table,
> get properties, and set SubDatasheetName to "[none]".
>
> If you search for these keywords you'll probably find code that will
> loop over all tables and turn it off for all.
>
>

You also need to turn off name auto-correct, else the dreaded [Auto] will
return :)

Keith.
www.keithwilby.co.uk

From: Keith Wilby on 1 Feb 2010 05:43
"John W. Vinson" <jvinson(a)STOP_SPAM.WysardOfInfo.com> wrote in message
news:andcm513220ddle8hu7gud5jocove8kkeq(a)4ax.com...
>
> Here's some (that I got from this group at some point I've forgotten,
> apologies to the author):
>
>

I think it was Allen Browne.

 |  Next  |  Last
Pages: 1 2
Prev: costing problem
Next: splitting database