Как открыть файл dwg только для чтения

{{l10n_strings.DRAG_TEXT_HELP}}

{{article.content_lang.display}}

{{l10n_strings.AUTHOR_TOOLTIP_TEXT}}

Открыть чертежи AutoCAD только для чтения, щелкнув правой кнопкой мыши в проводнике

Есть много способов открыть чертежи AutoCAD. Вы можете использовать открыть из меню / команды AutoCAD. Вы можете дважды щелкнуть файл DWG. Или вы можете перетащить чертеж в ярлык / окно AutoCAD.

На этот раз Хуонг Чарльз расскажет, как открыть файл чертежа AutoCAD только для чтения. Просто используйте контекстное меню в проводнике Windows!

© Прашант ЗИ - Fotolia.com

Создание скрипта

Чтобы это стало возможным, вам необходимо создать файл сценария.Вам нужно запустить блокнот (или другой текстовый редактор). Скопируйте приведенный ниже код и сохраните файл как «OpenReadOnly.vbs». Используйте двойные кавычки, чтобы сохранить расширение. В противном случае Windows сохранит файл как OpenReadOnly.vbs.txt.

для Windows XP

Создайте файл, содержащий следующий код:

При ошибке Возобновить следующий
dim cmd_arg
set cmd_arg = wscript.Arguments
Dim acadApp
Set acadApp = GetObject (, "AutoCAD.Application")
If Err Then
Err.Очистить
Установить acadApp = CreateObject ("AutoCAD.Application")
Конец, если
acadApp.visible = True
acadApp.WindowState = normal
acadApp.Documents.Open cmd_arg (0), True

Сохраните это как OpenReadOnly.vbs в любом месте, скажем, в папке «Мои документы».

В проводнике Windows (также можно сделать это в окне «Мои документы») перейдите в Инструменты, Параметры папки, Типы файлов, прокрутите вниз до DWG.

Щелкните "Дополнительно".

Щелкните New.

В разделе «Действие» укажите «Открыть только для чтения»

В разделе «Приложение…» введите wscript.exe «C: \ Documents and Settings \ hcharles \ My Documents \ OpenReadOnly.vbs» «% 1» (с кавычками)

Дважды нажмите «ОК», затем «Закрыть».

Теперь, когда вы щелкните правой кнопкой мыши файл DWG, выберите «Открыть только для чтения».

Протестировано на локальных файлах в платформе AutoCAD 2008 XP SP3.

для Windows 7

Используя Блокнот, создайте файл, содержащий следующее (как в Windows XP)

При ошибке Возобновить Далее
dim cmd_arg
set cmd_arg = wscript.Аргументы
Dim acadApp
Set acadApp = GetObject (, "AutoCAD.Application")
Если Err, то
Err.Clear
Set acadApp = CreateObject ("AutoCAD.Application")
End if
acadApp.visible = True
acadApp.WindowState = нормальный
acadApp.Documents.Open cmd_arg (0), True


Сохраните это как OpenReadOnly.vbs в папке «отправить» (C: \ Users \ yourusername \ AppData \ Roaming \ Microsoft \ Windows \ SendTo).

Для использования щелкните правой кнопкой мыши рисунок в каталоге, выберите «Отправить», затем «OpenReadOnly».vbs »

Дополнительный совет для Windows 7

Вы также можете сохранить файл где угодно. Затем выберите файл, щелкните правой кнопкой мыши> скопировать.

Перейдите в папку «Отправить», затем щелкните правой кнопкой мыши> вставьте ярлык.

Если вы решите поместить ярлык в эту папку, вы можете переименовать ярлык и при необходимости изменить значок.

Это окончательный результат, как в Windows 7:

Спасибо Huong Charles за хороший совет!

Если вы хотите стать приглашенным автором, прочтите наши рекомендации по обеспечению качества здесь.

О компании Huong Charles

Хуонг Чарльз работает в нефтегазовой отрасли США чертежником-электриком. Huong использует AutoCAD для создания плановых чертежей (чертежей, связанных с компоновкой перерабатывающего завода), чертежей деталей установки и простых 3D-моделей для использования в общей модели завода. Она также использует специализированное программное обеспечение для электрического проектирования, которое работает с AutoCAD.

Мы не можем найти эту страницу

(* {{l10n_strings.REQUIRED_FIELD}})

{{l10n_strings.CREATE_NEW_COLLECTION}} *

{{l10n_strings.ADD_COLLECTION_DESCRIPTION}}