[VB6]Visualizzare due tabelle collegate

[printlist]

Ciao ragazzi vorrei un piccolo suggerimento.Non riesco a far visualizzare su form due tabelle collegate.Mi spiego meglio, vorrei visualizzare su un form i dati contenuti in due tabelle collegate in access ma riesco a visualizzare solo i dati contenuti nella tabella1 e non quelli della tabella 2.Un Aiutino?GRAZIE.

[gibra]

Dire non riesco non significa niente.

Devi mostrare il codice che stai usando,
dire che errore ti da e dove te lo da (in quale riga del codice).

Ciao

[printlist]

Scusate del ritardo.Questo è il codice che uso per visualizzare su di un form (Form2) dei dati presi da un form (Form2), su cui ho una listview contenente record presi da una tabella (TAB1)collegata con un'altra tabella(Tab2), all'evento doppio click sul record interessato mi si apre il form2 visualizzando i dati presenti solo sulla prima tabella(TAB1).La mia domandina è questa, come faccio a visualizzare anche i dati contenuti nella TAB2 legati al record scleto con l'evento doppio click? .Ecco il codice utilizzato, vi prego aiutatemi.

Public varUno As String
Public varDue As String
Public varTre As String
Public varQuattro As String
Public varCinque As String
Public varSei As String
Public varSette As String
Public varOtto As String
Public varnove As String
Public vardieci As String


Private Sub List1_DblClick()
If List1.ListItems.Count > 0 Then
With List1
varUno = .SelectedItem.Text
varDue = .SelectedItem.ListSubItems.Item(1).Text
varTre = .SelectedItem.ListSubItems.Item(2).Text
varQuattro = .SelectedItem.ListSubItems.Item(3).Text
varCinque = .SelectedItem.ListSubItems.Item(4).Text
varSei = .SelectedItem.ListSubItems.Item(5).Text
varSette = .SelectedItem.ListSubItems.Item(6).Text
varOtto = .SelectedItem.ListSubItems.Item(8).Text
varnove = .SelectedItem.ListSubItems.Item(9).Text
End With

frmProp.Show
Unload Me
----------------------------------------------------------------------------------
Private Sub Form_Load()
ToolbarButton6.Visible = False
Sst1.TabVisible(3) = False
XPFrame13.Visible = False
XPText2.Visible = True
XPText3.Visible = False
XPFrame14.Visible = False


Dim Query As String
Dim mydata As Database
Dim myrecord As Recordset

Query = "select * from Rubrica where ID like '*" & varUno & "*'"
Data1.DatabaseName = App.Path & "\Agenda.mdb"

Data1.RecordSource = Query


End Sub

Grazie anticipatamente e scusate il RIT. Grazie!!!!!!!!!!!!!!!!!!!!!

[gibra]

Non è che si capisca molto... Mi sembra tutto un collegamento.
Non si capisce qual'è il Form1, il Form2...
Non si capisce quale sia TAB1 e TAB2, ma si vede solo la tabella Rubrica...
Non si capisce cosa intendi per tabelle collegate ...

Prova a spiegare meglio...

Ciao

[printlist]

Eccomi di nuovo anche se in ritardo provo a spiegare il mio problema.

In access ho creato le mie due tabelle, collegate tra loro mediante ID


Ho due tabelle

1) Clienti
2) Schede dettagli

In pratica un record CLIENTI corrisponde a più record SCHEDE DETTAGLI

In access ho aperto una delle due tabelle e risultato collegate, infatti compare il simbolo "+" a sinistra

Ora in VB6, come si realizza la join tra le due tabelle, in modo che scrivendo su SCHEDE DETTAGGLI da solo si aggancia al record della tabella CLIENTI????
Grazie