А подскожите почему на вот этот код выскакивается ошибка: Недопустимая операция???
Dim strSQL As String
Dim dbs As Database, rst As Recordset
Set dbs = CurrentDb
strSQL = "INSERT INTO pr(name,val) VALUES (" & Forms![fpr]![Поле9] & "," & Forms![fpr]![Поле13] & ");"
Set rst = dbs.OpenRecordset(strSQL)