ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Ленточные, поднять все флаги(опустить)?
38 сообщений из 38, показаны все 2 страниц
  все  
Ленточные, поднять все флаги(опустить)?
    #32520340
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
В форме в каждой из строк вставлены флажки (флажок11). На кнонпу в заголовке формы повесил макрос- задать значение флажок11=-1.
Выбирает толко активную строку.
Как включить\выключить все флажки?
Спасибо
...
Рейтинг: 0 / 0
17.05.2004, 14:00
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520346
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Проапдейтить нижележащий запрос и потом recalc форме.
...
Рейтинг: 0 / 0
17.05.2004, 14:01
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520371
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zz
Участник
:))
...
Рейтинг: 0 / 0
17.05.2004, 14:08
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520399
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
Саныч, recalc это обновление?
Сделал, работает всеравно в одной активной строке?
Как же кнопкой включить\выключтиь?
...
Рейтинг: 0 / 0
17.05.2004, 14:15
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520409
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
Тебе же сказали - "проапдейтить нижележащий запрос", а уже потом "recalc форме"
Вот и делай в том порядке, в котором сказали
...
Рейтинг: 0 / 0
17.05.2004, 14:17
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520446
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zz
Участник
Ну чего вы на человека накинулись, вы по-русски ему объясните :))
CurrentDb.Execute "UPDATE (" & mid(me.RecordSource,1,Len(me.RecordSource)-2) & ") SET " & me.Флажок11.ControlSource & "= True"

ну а потом Recalc :)
...
Рейтинг: 0 / 0
17.05.2004, 14:28
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520477
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
И кто из нас объяснил по-русски?
Кстати, все эти из...бы с RecordSource и ControlSource не нужны с 99% вероятностью
Код: plaintext
Update [Таблица] Set [Поле] = True Where какое-то условие
Вряд ли у автора динамически изменяемые RecordSource и ControlSource'ы
...
Рейтинг: 0 / 0
17.05.2004, 14:41
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520480
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
2 zz:

:^))) Красиво. Вроде действительно должно работать независимо от того, что там понаписано.

Только ";" я бы искал через instr. :^)
...
Рейтинг: 0 / 0
17.05.2004, 14:42
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520492
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
Саныч, нифига не красиво
Потому что не работает
...
Рейтинг: 0 / 0
17.05.2004, 14:46
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520496
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zz
Участник
Да, действительно. Надо ";" через инстр искать потому что ее может и не быть и тогда вся конструкция псу под хвост.
...
Рейтинг: 0 / 0
17.05.2004, 14:48
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520499
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zz
Участник
2ЛП:
А Саныч и не говорил "работоспособно". Он сказал "красиво". Ну и что ж, что не работает? :))
...
Рейтинг: 0 / 0
17.05.2004, 14:49
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520547
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
Я вообще не понял - зачем запяточие искать? Чем оно поможет выполнить такой запрос:
Код: plaintext
Update (Select * From [Таблица] Where трампампам) Set [Поле] = True
А у тебя именно это и получится - если конечно в качестве источника не стоит просто имя таблицы или запроса. И исполняться оно не желает.
...
Рейтинг: 0 / 0
17.05.2004, 15:06
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520572
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zz
Участник
вот то, чего ты написал, исполняется великолепно.

А заморочка с запяточием в другом: по умолчанию Акс любому селекту в сурсе формы лепит ; и пробел в конце, а если там просто имя таблицы или запроса, то не лепит.
...
Рейтинг: 0 / 0
17.05.2004, 15:15
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520574
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Если в источнике стоит какой-нибудь джойн, который ограничивает показывовываемость записей, то надо его оставить, чтобы не проапдейтить случайно всю таблицу.
...
Рейтинг: 0 / 0
17.05.2004, 15:16
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520584
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
вот то, чего ты написал, исполняется великолепно
Зависит от версии аксеса
...
Рейтинг: 0 / 0
17.05.2004, 15:20
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520590
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zz
Участник
Странно.
Никогда об этом не думал
У меня экспа.
...
Рейтинг: 0 / 0
17.05.2004, 15:22
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520603
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
Умники и умницы
После всех разговоров
Кто нить даст код на Click().
Только вот вопрос если Click() из главной, подчиненная поймет?
Или не даст ошибку "Объект не открыт" если Click() из подчиненной?
...
Рейтинг: 0 / 0
17.05.2004, 15:26
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520612
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
учимся читать ответы
/topic/93383#682295
Только запрос уж сам напиши, наподобие вот этого:
/topic/93383#682346
...
Рейтинг: 0 / 0
17.05.2004, 15:29
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520613
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Да, умники. Да, умницы. Но не телепаты. Ну не умеем мы править программы, которых никогда не видели. Вот zz попробовал поиграть вслепую, так оказалось, что это не совсем то.
...
Рейтинг: 0 / 0
17.05.2004, 15:29
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520642
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
Ну почему вслепую:
Форма - Ф1, в ней подчиненная-ленточная - Ф2.
В Ф2 в каждой записи ессть Флажок - Ф11.
Отображается набор записей в Ф2, где-то флажок включен, гдето выключен.
Как из любого места(из Ф1, илиФ2, как проще?) включить\выключить флажки Ф11 в Ф2?
Пробовал все варианты, бестолку. Или не туда вставляю, или просто непонимаю очем речь(последнее реальней)
Собаки они все понимают, но не говорят.
Я как раз наоборот.
...
Рейтинг: 0 / 0
17.05.2004, 15:40
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520647
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
авторСобаки они все понимают, но не говорят.
Я как раз наоборот.
Значит, не понимаешь. RecordSource своей формы можешь показать?
...
Рейтинг: 0 / 0
17.05.2004, 15:43
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520656
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zz
Участник
аггггрррххх....
Делаешь кнопку в Ф1, допустим, But
На ее клик вешаешь:

CurrentDb.Execute "UPDATE Тут_Имя_Таблицы_На_Основе_Которой_Построена_Ф2 SET Тут_Имя_Поля_Из_Той_Таблицы_На_Основе_Которой_Построена_Ф2_Которое_Является_Источником_Данных_Для_Ф11 = True"

me.Ф2.Form.Requary
...
Рейтинг: 0 / 0
17.05.2004, 15:46
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520661
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zz
Участник
а еще лучше

CurrentDb.Execute "UPDATE Тут_Имя_Таблицы_На_Основе_Которой_Построена_Ф2 SET Тут_Имя_Поля_Из_Той_Таблицы_На_Основе_Которой_Построена_Ф2_Которое_Является_Источником_Данных_Для_Ф11 =" & (me.Ф1.Form("Ф11")+1)*(-1)
...
Рейтинг: 0 / 0
17.05.2004, 15:49
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520663
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zz
Участник
тьфу, черт, опять запутался... Последний мой пост прошу не читать, он недействителен.
...
Рейтинг: 0 / 0
17.05.2004, 15:50
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520678
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
2 zz:

Все-таки там надо и WHERE, и JOIN, если есть. Пусть уж приведет свой рекордсорс, я бы подождал.
...
Рейтинг: 0 / 0
17.05.2004, 15:53
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520689
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zz
Участник
ну да. Вечно я тороплюсь :))
...
Рейтинг: 0 / 0
17.05.2004, 15:57
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520732
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
Я глупее, всех но вот мой ответ Америке.
Уж извините, я и половины из Ваших речей не понимаю (или почти не понимаю)
Или Вы все уже с Access в мозгах родились?
...
Рейтинг: 0 / 0
17.05.2004, 16:12
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520748
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zz
Участник
Лови.
...
Рейтинг: 0 / 0
17.05.2004, 16:19
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520763
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
Кортко и ясно!!!!!!!!!!!
Дякую дядьки умные!
Если и дальше буду общаться таким образом не обложите?
...
Рейтинг: 0 / 0
17.05.2004, 16:24
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520777
zz
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
zz
Участник
Обложим.
Все, что тебе нужно было, это сказать:
"Источником данных для Ф2 у меня является Таблица1".

И то, что я написал тебе в коде, тебе написал бы любой на этом форуме.

А вместо этого - две страницы нудных попыток угадать, чего ж у тебя там такое.
...
Рейтинг: 0 / 0
17.05.2004, 16:28
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32520979
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
Ну уж звиняйте, теперь знать буду.
А на данном этапе проще (для всех, то как объясню...........) вот такие примерчики кидать.
Еще раз звиняйте!
...
Рейтинг: 0 / 0
17.05.2004, 18:10
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32521121
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
Код: plaintext
1.
2.
3.
Private Sub Âêë_âñå_îïèñàíèå_Click()
CurrentDb.Execute "UPDATE SELECT Katalog.p4, Katalog.p5, Katalog.p6, Katalog.p7, Katalog.p8, Katalog.p1, Katalog.p9, Katalog.Êàä_çïèñü, Katalog.Êàòåãîðèÿ_òî÷åê_äëèíû, Katalog.S_m, Katalog.Îïèñ_ïðîõîæä, Katalog.Îïèñ_çàêðåïë FROM Katalog WHERE (((Katalog.p7)Not Null) And ((Katalog.p8)=Forms!Òèòóë![¹ äåëà])); SET Katalog.Îïèñ_ïðîõîæä=True"
Me.Form.Requery
End Sub
...
Рейтинг: 0 / 0
17.05.2004, 19:30
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32521122
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
Извините теги учил
...
Рейтинг: 0 / 0
17.05.2004, 19:31
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32521135
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
Вот и примерчик неудачный конечно, буду дальше объясняться с народом
Для формы используется таблица Katalog через:
Код: plaintext
SELECT Katalog.p4, Katalog.p5, Katalog.p6, Katalog.p7, Katalog.p8, Katalog.p1, Katalog.p9, Katalog.Кад_зпись, Katalog.Категория_точек_длины, Katalog.S_m, Katalog.Опис_прохожд, Katalog.Опис_закрепл FROM Katalog WHERE (((Katalog.p7)>"0") And ((Katalog.p8)=Forms!Титул![№ дела]));

При использовании:
Код: plaintext
1.
2.
3.
4.
Private Sub  Вкл_все_описание_Clic()
CurrentDb.Execute "UPDATE SELECT Katalog.p4, Katalog.p5, Katalog.p6, Katalog.p7, Katalog.p8, Katalog.p1, Katalog.p9, Katalog.Кад_зпись, Katalog.Категория_точек_длины, Katalog.S_m, Katalog.Опис_прохожд, Katalog.Опис_закрепл FROM Katalog WHERE (((Katalog.p7)>"0") And ((Katalog.p8)=Forms!Титул![№ дела])); SET Katalog.Опис_прохожд=True"
Me.Form.Requery
End Sub
Причем фильтр по №Дела - обязательный к нему привязано все и вся.
Выдает ошибка 3144
Ошибка синтаксиса в инструкции UPDATE.

Если использовать ссылку на таблицу то UPDATE перековеркае все записи в Katalog.Опис_прохожд=True.
Кто подскажет где оибка?
...
Рейтинг: 0 / 0
17.05.2004, 19:51
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32521137
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
Извиииииииииините!!!!!!!!!!!!!!!!! за размерчик и вопросы
Самому противно!
...
Рейтинг: 0 / 0
17.05.2004, 19:52
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32521151
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
Касательно примеры данного мне
Отбор записей:
Код: plaintext
1.
SELECT Таблица1.Код, Таблица1.№, Таблица1.Поле_флага FROM Таблица1 WHERE (((Таблица1.№) Is Not Null));

Код: plaintext
1.
2.
3.
4.
Private Sub Кнопка8_Click()
CurrentDb.Execute "UPDATE SELECT Таблица1.Код, Таблица1.№, Таблица1.Поле_флага FROM Таблица1 WHERE (((Таблица1.№) Is Not Null)); SET Поле_флага=True"
Me.Форма_2.Form.Requery
End Sub
Та же ошибка!
Еще раз спасибо
...
Рейтинг: 0 / 0
17.05.2004, 20:12
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32521161
Фотография Лох Позорный
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Лох Позорный
Участник
Матьматьмать....

CurrentDb.Execute "Update [ИмяТаблицы] Set [ИмяПоля] = True Where [что-то] Is Not Null", dbFailOnError

Все мои последующие посты в этот топик - прошу модерить нещадно
Собратья, не дайте опозориться
...
Рейтинг: 0 / 0
17.05.2004, 20:36
| Ответить | Цитировать | Написать  
Ленточные, поднять все флаги(опустить)?
    #32521234
madg
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
madg
Участник
Ненадо маму трогать!
Вопросы не от большой наглости или лени, а от незнания и непонимания.
Код: plaintext
1.
CurrentDb.Execute "UPDATE Таблица1 SET Поле_флага=True 
Where  № Is Not Null"
Работает, но при моей попытке вставить вместо Is Not Null -
>0
Ссылку на поле формы
да много еще чего с разными вариантами синтаксиса
выдает ошибку.
Не все ключевые поля могут содержать Null/
А уж для отбора данных, где надо установить Поле_флага=True нужна ссылка на поле в главной форме, с критерием отбора.

ЗЫ
Я сам себя раздражаю.
Университетов мы не заканчивали, сами тыкаемся, с Вашей любезной помощью.
...
Рейтинг: 0 / 0
17.05.2004, 23:10
| Ответить | Цитировать | Написать  
38 сообщений из 38, показаны все 2 страниц
  все  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Ленточные, поднять все флаги(опустить)?
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?all=1&fid=45&tid=1674568]:
 0ms
get settings:
 10ms
get forum list:
 16ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 51ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 68ms
get tp. blocked users:
 1ms
others: 237ms
total:  399ms
созд. / загр.: 399ms
x
x
Закрыть


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