Access+MS SQL не могу понять поведение |
If LincSQL = True Then If TypeOpen = 1 Then ' ôèëüòð ïî ïîëÿì âûáîðà ôèëüòðà ' здесь формирование строки для параметров End If If Len(strSQL) > 0 Then strSQL = Left(strSQL, Len(strSQL) - 2) rst.CursorLocation = adUseClient rst.Open "Exec CustomerAll_sub " & strSQL, MyConnect, adOpenKeyset, adLockOptimistic Set Me.Form.Recordset = rst ' strSQL = "Execute 'CustomerAll_sub' " & strSQL ' CurrentDb.QueryDefs("CustomerAll_sub").SQL = strSQL Else i = i + 1 Call LincSQL GoTo NewCtart End If
Forms!CustomerAll.Form.Section(1).Visible = True ' false
?Forms!CustomerAll!CustomerAll_sub.sourceobject CustomerAll_sub
http://www.sql.ru/forum/1227904/access-ms-sql-ne-mogu-ponyat-povedenie
Комментировать | « Пред. запись — К дневнику — След. запись » | Страницы: [1] [Новые] |