[VB6] Relazioni tra vb e access

[Fidelius]

Salve ragazzi.
Ho messo in relazioni le tabbelle che ho creato in access con visual basic, ma non capisco perché non funziona.

Ecco di seguito il codice:

Private Sub Data1_Reposition()
Data2.RecordSource = "select * from fornitori where idfornitore = " & Data1.Recordset.idfornitore & ";"

Data3.RecordSource = "select * from prodotto where idprodotto = " & Data1.Recordset.idprodotto & ";"
End Sub

potete aiutarmi?

[Robby78]

non ho capito quello che hai scritto, comunque in visualbasic non ci vogliono i ; alla fine della stringa SQL, poi vedi se i campi sono di tipo testo, i valori devono essere compresi tra apici:

Codice: Seleziona tutto

Data2.RecordSource = "select * from fornitori where idfornitore = '" & Data1.Recordset.idfornitore & "'"

Data3.RecordSource = "select * from prodotto where idprodotto = '" & Data1.Recordset.idprodotto & "'"


In ogni caso "non funziona" è un po' troppo generico come problema....