Архитектору и проектировщику|Тепло- и звукоизоляция URSA.RU
| Правила | Регистрация | Пользователи | Поиск | Сообщения за день | Все разделы прочитаны |  Справка по форуму | Файлообменник |

Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Как можно открыть чертеж через LISP на котором стоит пароль?

Как можно открыть чертеж через LISP на котором стоит пароль?

Ответ
Поиск в этой теме
Непрочитано 09.02.2006, 11:00 #1
Как можно открыть чертеж через LISP на котором стоит пароль?
ivspec
 
Регистрация: 08.12.2005
Сообщений: 17

Как можно открыть чертеж через LISP на котором стоит пароль?
Незнаю как это сделать
Просмотров: 3200
 
Непрочитано 09.02.2006, 11:43 Re: Как можно открыть чертеж через LSIP на котором стоит пар
#2
Alan

CAD
 
Регистрация: 28.08.2003
Киев
Сообщений: 1,779
<phrase 1=


Цитата:
Сообщение от ivspec
....Незнаю как это сделать
Вначале правильно сформулируйте вопрос.
Пароль стоит на LISP'e или на чертеже?
Alan вне форума  
 
Автор темы   Непрочитано 09.02.2006, 11:45 Подробно...
#3
ivspec


 
Регистрация: 08.12.2005
Сообщений: 17
<phrase 1=


Вот есть чертеж... с помощью стандартных возожностей ставлю пароль...(через Автокад)... затем хочу его открыть через LISP
как это можно сделать?
или лучше сказать я его хочу вставить как блок в открытый чертеж с помощью LISP
как сделать? подскажите пожайлуста
ivspec вне форума  
 
Непрочитано 09.02.2006, 12:14
#4
asys

архитектор
 
Регистрация: 10.08.2005
Ростов-на-Дону
Сообщений: 4,938


проще говоря сломать пароль, во завернул
asys вне форума  
 
Автор темы   Непрочитано 09.02.2006, 12:22 М..да
#5
ivspec


 
Регистрация: 08.12.2005
Сообщений: 17
<phrase 1=


Цитата:
Сообщение от Asys
проще говоря сломать пароль, во завернул
Не для взлома а для защиты своих чертежей
Которые можно открыть тока через мою функцию на лиспе
Они несмогут узнать пароль
ivspec вне форума  
 
Непрочитано 09.02.2006, 12:41
#6
Alan

CAD
 
Регистрация: 28.08.2003
Киев
Сообщений: 1,779
<phrase 1=


Цитата:
Не для взлома а для защиты своих чертежей
ivspec , тема защиты обсуждалась неоднократно.
Посмотрите поиском, проанализируете, сделаете выводы...
PS. Против лома нет приёма.., окромя другого лома.
Alan вне форума  
 
Непрочитано 10.02.2006, 17:25
#7
Эдуард

строительство
 
Регистрация: 16.01.2004
Петербург
Сообщений: 164
<phrase 1=


object.Open Name[, ReadOnly][, Password]
Если на файле стоит пароль , то открыть его можно
только с паролем.
Эдуард вне форума  
 
Непрочитано 10.02.2006, 17:36
#8
{Smirnoff}

Инженер по системам безопасности
 
Регистрация: 23.11.2003
Рига
Сообщений: 1,099


Запоролить то и открыть можно. Однако надо иметь ввиду что криптует файл стороннее приложение и надо перед его вызовом проверять версию AutoCAD, а также правильно указывать параметры шифрования. Это для 2004-го.

Код:
[Выделить все]
(defun SecureSaveAs(Document FileName FileType Pass)
  (vl-load-com)
  (if
    (and
     (setq secPar
      (vla-GetInterfaceObject
        (vlax-get-acad-object)
        "AutoCAD.SecurityParams.16"))
     Document FileName FileType Pass
     ); end and
    (progn
     (vlax-put-property secPar
       'Action ACADSECURITYPARAMS_ENCRYPT_DATA)
     (vlax-put-property secPar
       'Algorithm ACADSECURITYPARAMS_ALGID_RC4)
     (vlax-put-property secPar
       'KeyLength 40)
     (vlax-put-property secPar
       'Password (strcase Pass))
     (vlax-put-property secPar
       'ProviderName "Microsoft Base Cryptographic Provider v1.0")
     (vlax-put-property secPar
       'ProviderType 1)
     (vla-SaveAs Document FileName FileType secPar)
     (vlax-release-object secPar)
     ); end progn
    ); end if
  ); end of SecureSaveAs


(defun c:SSave(/ actDoc)
  (vl-load-com)
  (setq actDoc
   (vla-get-ActiveDocument
     (vlax-get-acad-object)))
  (SecureSaveAs
    actDoc
    "C:/Secure_Drawing.dwg"
    ac2004_dwg
    "123456"
    ); end of SecureSaveAs
  (princ)
  ); end of c:SecureTest


 (defun c:SOpen(/ Doc)
   (vl-load-com)
   (setq Doc
   (vla-Open
     (vla-get-Documents
       (vlax-get-acad-object))
     "C:/Secure_Drawing.dwg"
     :vlax-false
     "123456")); end setq
   (vla-Activate Doc)
   ); end of c:SOpen
При проверке кода имейте ввиду что файл один раз открытый с набором пароля, в течении текущей сессии AutoCAD открывается уже без пароля.

Вообще криптование файлов штука опасная
{Smirnoff} вне форума  
Ответ
Вернуться   Форум DWG.RU > Программное обеспечение > Программирование > LISP > Как можно открыть чертеж через LISP на котором стоит пароль?

Размещение рекламы
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск