Макрос «Работай сам!». Окажите содействие школьному учителю с Макросом

Здравствуйте, уважаемые программисты!
Обращается к Вам учитель химии, которому пришлось проводить занятия еще и по информатике. Изучаем MS_Word. Дети не хотят печатать самостоятельно, хитрят и отчитываются чужими работами…

Хочу раздать каждому «Именной файл» (ФИО - в колонтитулах) и запретить возможность вставки текста, скопированного из чужого файла.
Т.е. смысл моего «тех.задания» – набирать тест в файле сам можешь, а скопировать его у кого-то и вставить в свой – не можешь.
В общем, можно ли запретить функцию «копирование/вставка» при помощи Макроса?
Спасибо. Андрей

0

Сообщение от Solt12 Наверное, это уже Wind’овая функция

ну я бы ограничился настройкой Word:
Вкладка "Файл" → "Параметры" → "Дополнительно" → в самом верху "Параметры правки" убрать галку "Разрешить перетаскивание текста".

1

Solt12, попробуйте потестировать файл, приложенный к этому сообщению. В теории он должен сам отключать перетаскивание без дополнительных действий со стороны человека.
Тут вопрос, как он себя поведет, если в файле будет таблица или фигура, вот это нужно потестить.

Вложения

Cyber обучение печати3.zip (21.0 Кб, 8 просмотров)

1

Такое рассужоение : поднять домен на учительском пк, все остальные к нему подключить и настраивать политтики для всех можно или нельзя копировать, запускать какие прожки и т.д.

Добавлено через 7 минут
Такое рассуждение: поднять домен на учительском пк, подключить все остальные к нему и настраивать политики для всех - можно/нельзя копировать, запускать какие прожки..

1

Сообщение от testuser2 поднять домен на учительском пк

testuser2, спасибо за участие. К сети меня не допускают. Приезжает Сисадмин раз в месяц, вечно занятый, к нему не подойти со своими "мелкими" нуждами... Все равно, спасибо!

Добавлено через 15 минут

Сообщение от Dinoxromniy Solt12, попробуйте потестировать файл, приложенный к этому сообщению. В теории он должен сам отключать перетаскивание без дополнительных действий со стороны человека. Тут вопрос, как он себя поведет, если в файле будет таблица или фигура, вот это нужно потестить.

Сообщение от Dinoxromniy попробуйте потестировать файл, приложенный к этому сообщению.

О!, «снаряды» еще не прилетали (студенты еще не пробовали ломать программу), а «броня» становится все совершеннее и совершеннее! Спасибо, обязательно попробую!

Добавлено через 2 часа 51 минуту

Сообщение от Dinoxromniy попробуйте потестировать файл

Все изумительно и можно было бы оставить как есть, но вдруг это - несложно и отнимет у Вас много времени. В общем, я увидел, что Вы предвидели, что можно зайти и опять установить галочку «Разрешить перетаскивание текста». Так вот, после возращения этой галочки текст снова можно перетащить, но - только один раз! Потом, видимо, снова исполняется макро-программа, галка снимается, и перетаскивание опять запрещено (спасибо, что не запаролили проект VBA, я всё вижу, тем самым Вы - учите меня).
Так вот, может быть возможно (далее мои варианты, может безграмотные, любой, какой подойдет или наведет Вас на мысль):
* постоянно заставлять макрос «галки» срабатывать и срабатывать…
* или срабатывать по какому-нибудь событию, например, когда наживется кнопка «ОК» при закрытии вкладки «Параметры
Word» (допустим, ученики залезли вернуть «галку»).
* или, когда выделяется текст мышкой:
- провидится по левому полю листа
- проводится по строчкам текста
- нажимается Ctrl+A, Ctrl+5
- или с клавиатуры- Shift+->

0

Solt12, по событию, когда активным становится другое окно (то есть внутри документа перетаскивание будет работать, а при попытке переключиться на како-то другой источник для копирования - будет отключено).

Вложения

Cyber обучение печати4.zip (18.8 Кб, 13 просмотров)

0

Сообщение от Solt12 О!, «снаряды» еще не прилетали

кому бронебойные подогнать

Я далёк от VBA, поэтому на логику даже не смотрел. Но слом защиты в текущем варианте занимает около минуты.

0

Сообщение от Garic73 кому бронебойные подогнать

ну вот хорошее грамотное тестирование не помешало бы. Или вы уже видите дырку в логике?

0

Сообщение от Garic73 кому бронебойные подогнать

Не следует этого делать. Разве Вы заинтересованы, чтобы школьники меньшему научилась, не приучились трудится, привыкали обманывать, изворачиваться?
Это же - будущее окружающее Вас общество (и Вашу жену, детей, друзей).
Кто-то в ветке писал, что, мол, не мы (т.е. Вы - программисты) должны помогать школе и учителям, а правительство - повышать зарплаты и что-то там еще…
Ну, могу констатировать, что на Правительство у Вас нет рычагов влияния нет. А вот поспособствовать образовательному процессу, т.е. не поставить снаряды… ну Вы поняли.
А лучше переходите в наш лагерь. Будем формировать наше будущее общество и Правительство теми средствами, которые у нас есть. Или хотя бы не мешайте учителям, думая над совершенствованием снарядов, т.е. оказывая медвежью услугу Стране и льстя себе, думая, вот какой я программист.
Где Вы были, когда я в самом начале ветки просил о помощи? Почему только один Dinoxromniy гордо несет звание Программиста?

0

Сообщение от Solt12 Где Вы были

я не программист, и

Сообщение от Solt12 в самом начале ветки

поддержал Jack Famous, что ваша затея не решит проблему. Вы же станете запрещать копирование для всех документов Word, что помешает ученику скопировать подготовленный вами "именной документ" из защищенного файла, в новый документ, в котором макросы не работают и там сделать всё как обычно.

1

Сообщение от Solt12 А лучше переходите в наш лагерь.

Solt12, не могу не заметить, что поиск уязвимостей - это как раз таки помощь в решении вашей проблемы. Лучше, чтобы лазейки были озвучены здесь и сейчас, а не чтобы их нашли дети потом, разве не так?

Сообщение от Solt12 Или хотя бы не мешайте учителям, думая над совершенствованием снарядов, т.е. оказывая медвежью услугу Стране и льстя себе, думая, вот какой я программист.

Профессия людей, задачей которых является сломать работу продукта, называется тестировщик. Они целыми рабочими днями сидят и пытаются уронить систему, выискивая ошибки. Между прочим, профессия востребованная и хорошо оплачиваемая, но и требует умений.

В общем-то я согласен с Garic73, что файл можно взломать извне, поэтому изначально и спрашивал, что мешает детям удалить старый и скопировать новый файл. Тут вариаций много, но по сути все сводится к трем: заменить файл на похожую копию, вырезать VBA модуль (на что вполне справедливо указал Garic73), либо скопировать файл домой, там специализированной программой вытащить пароль, который потом при необходимости вводить на уроке для включения и отключения защиты. Мыслей, как обезопаситься от такого взлома у меня нет, хотя такому человеку я бы поставил 5 без вопросов. Беда в том, что пароль вытащит один человек, а пользовать будет весь класс.

0

Сообщение от Solt12 Почему только один Dinoxromniy гордо несет звание Программиста?

вероятно, потому что остальным плевать на вашу оценку их способностей

2

Сообщение от Solt12 Или хотя бы не мешайте учителям

увы, учителя тоже разные
до сих пор вспоминаю свою учебу в 4-м классе
уже через пару дней все мы поняли, что учительница дословно пересказывает учебник природоведения
поэтому она очень резко реагировала, когда кто-то открывал учебник, уважение она сразу потеряла

конечно ей не повезло, до нее у нас была отличная учительница, но она заочно закончила институт и перешла на 5-8 класс(математика)

а ведь тогда не было компов, телевидения и прочего, дети знали намного меньше информации

2

0

2

0

да, тема тупиковая...
ТС слабый и он это признает. Ну химик, чего взять...
А главное, что цели ставит не правильные. Не научить чему-то ребятишек, а оказаться умнее их в репрессиях.
Подход не правильный - надо менять. ТС- вы боитесь "обосраться" перед учениками, а надо стремится чему-то научить и быть интереснее отсутствующего учителя информатики. У вас есть шанс быть лучше и не скрывайте слабость от учеников, дерзайте вместе. Если вы сильны в химии, то и в информатике вас детишки запомнят. Задумайтесь о моих словах. Я писал об этом выше. Я "заразил" информатикой не одного человека и ни когда не стеснялся того , что чего-то не понимаю до конца. Разбираться совместно "заразительнее".

4

Dinoxromniy, доброе утро, здравствуйте!
Посмотрел четвёртый вариант… По-прежнему, если зайти в настройки (параметры Word) и вернуть галочку "Разрешить перетаскивание" один раз текст всё-таки перетаскивается…
Можно ли написать код, который по таймеру будет отключать галку, например, через каждые 10-15 сек.? Спасибо

0

Сообщение от Solt12 По-прежнему, если зайти в настройки (параметры Word) и вернуть галочку "Разрешить перетаскивание" один раз текст всё-таки перетаскивается…

Галочка должна сниматься сразу же, как только вы переключаетесь на любое другое окно.
Перетаскивать должно получатся только внутри документа, но тут я большой проблемы не вижу - сам написал, почему бы и не копировать. Из другого документа перетаскивание не должно получаться, проверьте еще раз.

Solt12, укажите версию вашего офиса.

0

Сообщение от Dinoxromniy Галочка должна сниматься сразу же, как только вы переключаетесь на любое другое окно. Перетаскивать должно получатся только внутри документа, но тут я большой проблемы не вижу - сам написал, почему бы и не копировать. Из другого документа перетаскивание не должно получаться, проверьте еще раз. Solt12, укажите версию вашего офиса.

Сообщение от Dinoxromniy Галочка должна сниматься сразу же, как только вы переключаетесь на любое другое окно. Перетаскивать должно получатся только внутри документа, но тут я большой проблемы не вижу - сам написал, почему бы и не копировать. Из другого документа перетаскивание не должно получаться, проверьте еще раз.

Я, наверное, подбираю не те слова, просите меня. О хотел донести информацию, что, если открыть два разных файла (сделанных из Вашего файла) и расположить их окна рядом, затем включить галку «перетаскивания» и после этого текст один(!) раз из одного окна переместиться в соседнее окно.
После перетаскивания макрос снова сработает и снимет галку…
Так вот, я и подумал, что аналогично могут поставить галку и ученики. А если макрос будет выполняться постоянно и по времени – быстрее (чаще), чем удастся поставить галку ученику, то защита – будет работать.

Добавлено через 52 минуты


Можно ли написать код, который по таймеру будет отключать галку, например, через каждые 10-15 сек.?

	Комментарий модератора
	остальное удалено - взаимная грубость не поможет решению проблемы

0

	Комментарий модератора
	сообщение удалено - перестаньте выплескивать эмоции удалю все, что не по теме

при малейшем продолжении подобного - получите предупреждение
если и после этого не успокоитесь - красную карточку

0