Dim conn As New OleDbConnection
conn.ConnectionString = strConnAccess
conn.Open()
strsql = "insert into ..."
Try
Dim MyCommand As New OleDbCommand(strsql, conn)
MyCommand.ExecuteNonQuery()
Catch err As Exception
MsgBox(err.InnerException.ToString & " " & err.Message & " salva ")
End Try
tutto qua uff
nn c'era molto da postare![]()