Nu ai setat recordset. Activeaza ActiveX in computerul tau si ActiveX Objects Library 2.8(cred) in referinte. Foloseste codul asta: Cod in VB 6 pentru o conectie OLEDB la o data de baze in Microsoft folosind ActiveX ca referinta. Global cnndb As New ADODB.Connection Public Sub Connection() Dim cnnString As String cnnString = App.Path & "\dbname.mdb" With cnndb .CursorLocation = adUseClient .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0" _ & ";Data Source=" & cnnString & _ ";User Id=admin;Password=;" .Open End With End Sub