Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 18.08.2010, 13:18   #1
alvazor
Форумчанин
 
Регистрация: 02.07.2009
Сообщений: 122
По умолчанию ввод пароля к VBProject из процедуры проекта

Уважаемые профессионалы, можно ли и как ввести пароль на открытие проекта из процедуры модуля этого проекта? Все хелпы перерыл, ничего не нашел! Конкретно, строка
Set UFvbc = ThisWorkbook.VBProject.VBComponents ("ufMain")
при запароленном проекте дает ошибку (если проект не запаролен - без проблем...)
alvazor вне форума Ответить с цитированием
Старый 18.08.2010, 16:18   #2
alvazor
Форумчанин
 
Регистрация: 02.07.2009
Сообщений: 122
По умолчанию

Ну бог с ним, со снятием пароля -(
Как программно установить пароль на проект - из скрипта, API или еще как-то?
alvazor вне форума Ответить с цитированием
Старый 18.08.2010, 17:28   #4
alvazor
Форумчанин
 
Регистрация: 02.07.2009
Сообщений: 122
По умолчанию

Спасибо большущее, теперь, пожалуй, разберусь! И что сам в яндексе не додумался покопаться?!
alvazor вне форума Ответить с цитированием
Старый 19.08.2010, 14:24   #5
alvazor
Форумчанин
 
Регистрация: 02.07.2009
Сообщений: 122
По умолчанию

Попробовал воспроизвести вариант установки пароля (см. вложение) без SendKeys - уж очень красиво смотрится - и заткнулся. Форма для установки пароля на проект появляется - и приехали....
Помогите, кто может!
Мои комментарии в тексте сдвинуты влево, остальное - из подлинника.
Проблема, как отвязаться от активного окна, не выгружая его, чтобы найти его координаты из API (FindWindow). На Set Nothing - не реагирует?
Вложения
Тип файла: rar WB_Set_Password.rar (12.4 Кб, 12 просмотров)
alvazor вне форума Ответить с цитированием
Старый 20.08.2010, 17:26   #6
alvazor
Форумчанин
 
Регистрация: 02.07.2009
Сообщений: 122
По умолчанию

И с SendKeys ни хрена не получается.
Вернее, установку пароля кое-как вымучил, а снятие, хотя вроде как все аналогично - ни в какую. Пароль-то командно вводится, потом все застревает на той же форме свойств проекта.
Неужели все так глухо? Версия Ofice 2003 sp3, похоже, не вписывется в ранее отработанные алгоритмы, а 2007 и выше?
Вложения
Тип файла: rar wbSetPswrdKeysl.rar (10.5 Кб, 14 просмотров)
alvazor вне форума Ответить с цитированием
Старый 23.08.2010, 14:43   #7
alvazor
Форумчанин
 
Регистрация: 02.07.2009
Сообщений: 122
По умолчанию

Все-таки управлять установкой пароля на проект, входом в запароленный проект и снятием защиты проекта (при известном пароле) возможно кодом самого проекта - см. вложение
Спасибо всем за активную поддержку....
Вложения
Тип файла: rar wbSetPswrdKeys_1l.rar (13.7 Кб, 38 просмотров)
alvazor вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Управляющие структуры, процедуры Function и процедуры Sub Natalo4ka Помощь студентам 0 17.05.2010 22:00
Процедуры: Ввод(text)-Вычисление(string)-Вывод(text) FYBVFPFYBC Помощь студентам 2 06.05.2010 23:15
Сравнение строк, ввод пароля (assembler) You_must_help Помощь студентам 7 19.04.2009 23:53
Ввод логина и пароля. С++ Builder lamaksi C++ Builder 2 05.03.2009 15:59