Originariamente inviato da oregon
Non si paga per scrivere nel forum ...
[ot]
... essere ordinati aiuta chi ti vuole aiutare
Un po come andare dal panettiere a chiedere le catene della neve

[/ot]

codice:
Private Sub Command1_Click()

  Data1.RecordSource = "SELECT ..."
  Data1.Refresh

End Sub