| |
|
|
| | Народ, подскажите причину глюка. Уже больше года работает база на нескольких компах. Открывается отчет, далее перевод в формат rtf после чего отчет закрывался, а на экране оставался werd с отчетом. И вот сегодня вдруг на одном из компов произошла некая критическая ошибка. (что именно писала винда не видел) После этого отчет открывается, а далее пишет о какой-то ошибке в visual basiс и в коде программы access. Создавал новый файл акса с отчетом. Та же хрень при переводе. Переустановил офис - не помогло. Наверно винду придется переустанавливать. И все же где правда? В реестре, библиотеке, системном файле? Кто-нить сталкивался с таким. | |
| |
| |
| |
|
|
| | может вирус?
А просто rtf создать можно?
а в референцах - отвалилось чё нибудь? | |
| |
| |
| |
|
|
| | На вирус думал сразу, но не похоже. rtf создать можно, сохранить в нем тоже можно. Для проверки после переустановки офиса сделал файл акса, небольшой отчет и попробовал экспорт в rtf Результат - хрен. Что-то не то. В эксель и другие приложения тоже хрен. Как понимаю в понедельник надо винду переустановить. Команда format c: все вылечит. Наверно что-то в системных или в реестре. ХЗ Может dll накрылась какая-то.
А кто напомнит как звучит значение логического поля в VBA? "& -1 &" не канает. '"& нет &"' тоже не хочет. Что-то в этом роде, а что? | |
| |
| |
| |
|
|
| | было похожая хрень - только с экспортом в Ексель - и только на 1-й машине, как ни страно моей, после ряда шаманств, плясок - типа переустановок ХР, переустановок 2007 - заработало. (у меня все 4  офиса юзаю ХР, 2010- нет и не будет)
А кто напомнит как звучит значение логического поля в VBA?
|
True / False - или о чем | |
| |
| |
| |
|
|
| | 0 и -1  | |
| |
| |
| |
|
|
| | Вот с этими true/false, 0/-1 и шаманю. Есть список в источник которого входит логическое поле. Надо выбрать строку в списке и кнопкой поменять нужное значение. Работает запрос на обновление. В общем не хочет зараза ничего делать. | |
| |
| |
| |
|
|
| | Вот она в чем фишка! В списке логика видна как "Да"/"Нет". В условии if соответствующую колонку надо указывать как 0/-1, а в запросе на обновление как True/false
Блин, допер методом лабораторных тыков.
If Me.Список2.Column(3) = 0 Then
DoCmd.RunSQL "UPDATE Типы INNER JOIN [Совмещения типов] ON Типы.КодТипа = [Совмещения типов].КодТипаС SET Типы.Сбор = true WHERE ((([Совмещения типов].КодСовмещения)=[Forms]![Типы средств]![поле15]));"
Else
DoCmd.RunSQL "UPDATE Типы INNER JOIN [Совмещения типов] ON Типы.КодТипа = [Совмещения типов].КодТипаС SET Типы.Сбор = false WHERE ((([Совмещения типов].КодСовмещения)=[Forms]![Типы средств]![поле15]));"
End If
Me.Form.Refresh
Всем спасибо. | |
| |
| |
|
|
