Ciao a tutti,
questo è un pezzo di un programma e vorrei sapere perchè mi restituisce sempre errore;

Dim format As [String] = "MM/dd/yyyy"
Dim str As [String] = DateTimePicker1.Value.ToString(format)

Dim myconn As New OleDbConnection
myconn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\Users\FABIO 1997\Desktop\nuovo progetto garanzie\progetto garanzie\progetto garanzie\garanzie.mdb;" & "Persist Security Info=False"
myconn.Open()
Dim mycmd As New OleDbCommand
mycmd.CommandText = "select id,descrizione,luogo,documento,numero_documento,da ta_acquisto,scadenza_ordinaria,prolungamento,scade nza_estesa,indirizzo,note,prezzo from garanzia where data_acquisto= ' " & str & " ' order by id"
mycmd.Connection = myconn
Dim myadapter As New OleDbDataAdapter
myadapter.SelectCommand = mycmd
Dim ds As New DataSet
ds.Clear()
myadapter.Fill(ds, "id")
dgvdata.DataSource = ds
dgvdata.DataMember = "id"

Grazie a tutti