MS Access connections

[DeOiD]

hi
i have another problem with my DB... until yesterday everthing worked fine but suddenly the entire project stoped working.
i use this method to connect to the data base: Imports System.Data.OleDb ...

Public Class func
  Public Shared Function seleccionar(ByVal comando As String)

    Dim DBliga As OleDbConnection
    Dim DBcomando As OleDbCommand

    DBliga = New OleDbConnection(connect)
    DBliga.Open()

    DBcomando = New OleDbCommand(comando, DBliga)
    seleccionar = DBcomando.ExecuteReader()

  End Function
End Class

and to call the function i use:

Dim DBdatareader As OleDbDataReader
  DBdatareader = func.seleccionar("select * from contactos")

well, like i said, this worked fine until yesterday but today, without changing anything, when the function is called a second time i get this error System.Data.OleDb.OleDbException and erro não especificado (something like error not specified ) here DBliga.Open() i can't close the connection because i need to use the datareader...

can anyone help me?