ник: lenkaaoe
Есть следующий код для процедуры открытия формы:
Private Sub Поле110_AfterUpdate()
On Error GoTo Err_Поле110_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = ChrW(1056) & ChrW(1072) & ChrW(1089) & ChrW(1087) & ChrW(1086) & ChrW(1088) & ChrW(1103) & ChrW(1078) & ChrW(1077) & ChrW(1085) & ChrW(1080) & ChrW(1077) & ChrW(32) & ChrW(1076) & ChrW(1083) & ChrW(1103) & ChrW(32) & ChrW(1084) & ChrW(1077) & ChrW(1085) & ChrW(1077) & ChrW(1076) & ChrW(1078) & ChrW(1077) & ChrW(1088) & ChrW(1086) & ChrW(1074)
stLinkCriteria = "[Номер_распоряжения]=" & Me![Поле110]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Поле110_Click:
Exit Sub
Err_Поле110_Click:
MsgBox Err.Description
Resume Exit_Поле110_Click
End Sub
Пожалуйста, помогите откорректировать этот код так, чтобы форма при этом открывалась только в режиме чтения
Буду очень благодарна