Relaciones de Access

Article View: microsoft.public.es.vb

Article #15

Back to microsoft.public.es.vb Previous Next

#15

From: Emilio
Date: Fri, 01 Sep 2000 06:45

36 lines
1891 bytes

Ayuda, me vuelvo loco. Con el siguiente c�digo, EN TEORIA, me debe
mostrar las relaciones del MDB, pero �Por que no me muestra todas?, sin
embargo con el documentador de Access aparecen todas las relaciones.
El c�digo es:
Public Sub main()

'Quita una relacion de la base de datos.
'----------------------------------------
Dim rel As Relation
Dim x As Relation
Dim dbAux As Database
Dim i

For Each x In CurrentDb.Relations

    For i = 0 To x.Fields.Count - 1
        Debug.Print "Relacion: " & x.Name & vbNewLine &
        Debug.Print "**Tabla Origen (uno): " & x.Table & "{" &
x.Fields(0).Name & "}" & "->Dest (varios):" & x.ForeignTable
    Next

Next x

End Sub


--
-----------------------------------
Emilio Gil

emilio@servitel.es
ejgil@yahoo.com
xmilio@go.com

�� Colabora !! Proyecto ebook --  http://www.ebook.es.org
-----------------------------------

Technical Details

Message-ID: <39AF50A3.888CF04C@servitel.es>

Path:

arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!sn-east!supernews.com!news.maxwell.syr.edu!fu-berlin.de!newsfeed.bcn.ttd.net!news.mad.ttd.net!not-for-mail

Show Full Headers

Complete Article Headers

X-Google-Language: SPANISH,ASCII
X-Google-Thread: 111a5a,95666510a7cf023f,start
X-Google-Attributes: gid111a5a,public
X-Google-Thread: 1053fc,95666510a7cf023f,start
X-Google-Attributes: gid1053fc,public
X-Google-Thread: 10127e,95666510a7cf023f,start
X-Google-Attributes: gid10127e,public
X-Google-ArrivalTime: 2000-08-31 23:51:19 PST
Path: arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!sn-east!supernews.com!news.maxwell.syr.edu!fu-berlin.de!newsfeed.bcn.ttd.net!news.mad.ttd.net!not-for-mail
From: Emilio <emilio@servitel.es>
Newsgroups: microsoft.public.es.vb,es.comp.lenguajes.visual-basic,es.comp.bd.ms-access
Subject: Relaciones de Access
Date: Fri, 01 Sep 2000 08:45:55 +0200
Organization: Telefonica Transmision de Datos
Lines: 38
Message-ID: <39AF50A3.888CF04C@servitel.es>
NNTP-Posting-Host: 193.153.145.86
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
X-Mailer: Mozilla 4.7 [en] (WinNT; I)
X-Accept-Language: en