
sQuery = "insert into payments values(0, '" & strNContr & "','" & clnPayDate.Value & "','" & txtPaySum.Text & "р.');"
Cnn.Execute (sQuery)
или
sQuery = "insert into payments values('', '" & strNContr & "','" & clnPayDate.Value & "','" & txtPaySum.Text & "р.');"
Cnn.Execute (sQuery)
Не помогает...