powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Подскажите, пожалуйста, где я ошибся?
3 сообщений из 28, страница 2 из 2
Подскажите, пожалуйста, где я ошибся?
    #39627257
Фотография ПЕНСИОНЕРКА
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Wawan2005,
я вообще не люблю символ продолжение строки и применяю крайне редко
формирую длинную строку сцеплением типа
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
'Устранение по ИТУ
 s=""
s=s & ZB1 & "инженерно-технической укреплённости:" & ZB9 
s=s & B1 & "1. " & ZI1 & ZU1 & [Недостатки_ИТУ] & ZI9 & ZU9 
s=s & B1 & "Срок: до ______________ 20 ___г." 
s=s & B1 & ZB1 & "оснащению объекта техническими средствами охраны и подключению каналов связи: " & ZB9 
s=s & B1 & "2. " & ZI1 & ZU1 & [Недостатки_Оснащ_ТехС] & ZI9 & ZU9 
s=s & B1 & "Срок: до ______________ 20 ___г." 
s=s & B1 & ZB1 & "общих мероприятий по усилению охраны объекта:" & ZB9 
s=s & B1 & "3. " & ZI1 & ZU1 & [Недостатки_Общие] & ZI9 & ZU9 
s=s & B1 & "Срок: до ______________ 20 ___г." 
s=s & B1 & "Назначить предварительный срок проведения контрольной проверки на " 
s=s & B1 & """_____""______________20____г." 
s=s & B1 & "Приложение: ________________________________________________ на _______ листах." & B1 
s=s & B1 & ZB1 & "<div><font size=2>" & "Примечания:" & ZB9 
s=s & B1 & Space(5) & "1. Настоящий АКТ является неотемленной частью заключаемого договора"
s=s & " о централизованной охране объекта и составлен в ____ экземплярах." 
s=s & B1 & Space(5) & "2. При неисполнении ""Закзчиком"" пунктов предложений комиссии, "
s=s & " если это послужило причиной совершения кражи с " 
s=s & "объекта ""Закзчика"", ""ОВО"" освобождается от материальной ответственности по действующему договору." 
s=s & "</font> </div>" 
nitu =s
...
Рейтинг: 0 / 0
Подскажите, пожалуйста, где я ошибся?
    #39627693
Wawan2005
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
ПЕНСИОНЕРКА,

Понял, спасибо, учту на будущее.
P.S.:Как выяснилось, не все значения оказались "As String".
P.P.S.: Мы забыли про первоначальный вопрос.

Хочу сделать кнопку просмотра АКТов по нажатию кнопки, так как интерфейс Аксесса скрыт то приходится, пробовал примерно так -
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
Private Sub К_Просмотра_Click()
On Error GoTo Err_К_Просмотра_Click
        DoCmd.OpenView
Exit_К_Просмотра_Click:
    Exit Sub
Err_К_Просмотра_Click:
    MsgBox Err.Description
    Resume Exit_К_Просмотра_Click
End Sub



Всё ниже перепробованное не помогло, помогите пожалуйста.
...
Рейтинг: 0 / 0
Подскажите, пожалуйста, где я ошибся?
    #39627719
Фотография ПЕНСИОНЕРКА
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Wawan2005,

этот вариант тоже попробовали
автордля форм , да еще с десятком вкладок acViewPreview вряд ли сработает
acViewPreview показывает только текущую страницу

при DoCmd.OpenForm "акт000", acNormal видны все вкладки
...
Рейтинг: 0 / 0
3 сообщений из 28, страница 2 из 2
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Подскажите, пожалуйста, где я ошибся?
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]