Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

MetodDB

.pdf
Скачиваний:
10
Добавлен:
12.04.2015
Размер:
3.21 Mб
Скачать

+ # , * *

* .

13

«5)6» # # + * #- + #. , * # + #

. # + + / -

.

14

«5)6» #, # # + # + * # + + . , * #-

+, + . + # # . * # +-

+ # +, # #

* * + *# # *.

15

«5)6» # # + * .

#. , * . # . # +-

+

* ..

201

-# ! 8 # ! 0 24. #'$! '= 2/ /( & 2 % 2$8

3 * # * * # # - # + # # * Visual Basic.

) ) )

, # # # . #, * +- + *. + # . # . # # # # * + AfterUpdate. , # . * * . -

* # + # *. 7 #, -

. * , * # + + + «7 2»,

# #, -

. + # + «7 2» * «2 *». 2 #-

* , * # #, / *-

# # . 0 + # #-

# # Object. , # #-

Set # # # *, #-

Set rs = Me.Recordset.Clone.

2 # FindFirst # # Object.

#

. «Where». ( + # *

# # bookmark

rs.FindFirst "[КодДаты]=" & Me.ПолеСоСписком0

Me.Bookmark = rs.Bookmark.

2 )

, . / # # + *

* # , # * / * , # +- * * # # . , . *

202

* # # # . * + -

*, # + * * . # # #-

*

* .

# , # +

# # «#2 *» ( 87). # - * # + + # * * . 7 «%» * . # -

«0 ». + # «# 2 *».

87 –

«( *» ( 88). #

«( *». # # «, #+ * *. # # + # – «( *», # * – « ) ( *» ( #).

203

88 – #

«( *» + # «# 2- *». ' + . * # * # + ( 89). ( + # + * -

 

.

,

.

* .

« " & [# 2 *].[Form]![,9]

& " " &

[# 2 *].[Form]![,7] & " ».

 

 

89 – «$ »

( + * # * # #

# # * + «, +»

# +:

Private Sub ПолеСоСписком0_AfterUpdate()

Dim rs As Object

Set rs = Me.Recordset.Clone

204

rs.FindFirst "[КодДаты]=" & Me.ПолеСоСписком0

Me.Bookmark = rs.Bookmark

End Sub.

90 – # « $ » .

! *

" *# * . .:

+, * , , # * # *#-

* # *. ) # #-

*. , * #.

.

( + *# <11. ( + # # # + # # #.

205

-# ! 8 # ! 0 25. #- $!@ 2/ /( & ." 2 : '/ '

) )

) # * * , / -

# # + # + *. 0 +

. # + # #, , #-

, # + + + , # +, # * / -

* *. ) #, # + + + +

, # + # # * *. Office Access 2007 # * *# + #-

.

# . #

##, / + *, *, *

4 *, * + # # *.

( + +, + + # * .

# + # # * . ,

. # .

# * * + # # * *,

, . # #. ( #

# * . * #

, #, # # *

, # # *

# .

, ##* 4 # + +-

+ # * * *. , + # ##* /

* #:

? # # * , # . -

# * «, * #-

».

206

7 # «)» «, * #-

» . # «( ». # + +

+ + ( 91).

+ + . «"(».

91 – $ !

, . # , # + * # + * *. " ,

«5 ##* +» «, * #» ## «7-

* 4 *». Microsoft Access ## # -

. + 4 * * *. " 4 * ##*

# + + # + # ##*.

, + # -

## + . % .

##. ( +

«, * #» *# / +:

«5 ##* +» . # «( ##»,

+ ##* . «"(». - # .-

# + . 7 #, «% + #- + » . . ##* : «* + - *», «*» «# *». 5 ##* + + # -

# + # # + #.

' . + ## «7 * 4 *»

. # «")». Microsoft Access

«, * #» # ##

#, # . + . ! *

207

## 4 *,

# / .

# + + ## ##*, * + ,

## «7 * 4 *».

## «7 * 4 *» * 4 *, *

+ # # ##, #

##. , . * ## «7 * 4 *».

) # * * * , -

+ # * *. (- # # * . #, * *

# * *. ( + + # * *» ## « *» -

. # «( # # * ». 7 . # « -

». 7 # + + « ». +

# * . # «")». + - # * + + # # + « * #

*». * + # * . #

« ». 1 * « *

# *». 7 . # « ». " -

« # *». # «0»

+ + # # # *, * + # «)». 7 # « -

+ # # +» # «0», * «" *

» + + # «)».

! * # , * / - # * *, * # «)» «, - # », * # #

+ # *. ! *

# *, . # «2 *».

208

2 )

# «'# 1(», +

# ##* # 4, -

* * # + * * ( - *, # * , *, # * *, # *, # * # # * *- + . * * * *). - . #

# * .

, # / «, * #» -

«'# 1(» ( 92).

##* «6 *», «" *» « *». 2 * #-

#. ##* «7 * 4 *» #-

. * 4 * # * + ##*. , -, # / * * 4 *, . #- #* «7 * 4 *» . +. " # #-

( 93).

92 – /

209

93 – « 3$»

94 – # «0'#»

, # / # # * ( 95)

# «'# *». #

210

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]