Dcount |
If DCount("[]", "[Upr].[kod_upr]='" & rs.Field(8) & "'") > 0 And DCount("[]", "[StrEd].[nStrEd]='" & rs.Field(4) & "'") > 0 Then
rs3.AddNew
rs3.Fields("kod_25") = rs.Fields("kod_25")
rs3.Update
| Комментировать | « Пред. запись — К дневнику — След. запись » | Страницы: [1] [Новые] |