[SharkyEXE]

Iska

Спасибо.

1) В коде, как я понял, это будет так

Код:

#AutoIt3Wrapper_Run_Au3Check=N
(ObjCreate("WbemScripting.SWbemLocator")).ConnectServer(".", "root\cimv2").Get("Win32_Printer.DeviceID='Epson Stylus C20 Series (M)'").Delete_

и компилировать, создать exe
2) А вручную как это делается, чтобы была одна строка

Код:

(ObjCreate("WbemScripting.SWbemLocator")).ConnectServer(".", "root\cimv2").Get("Win32_Printer.DeviceID='Epson Stylus C20 Series (M)'").Delete_

и компилировать, создать exe

[Iska]

Так — \Tools\Compile:

Скрытый текст

что, собственно, приводит к тому же — установке в коде:

Код:

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Run_AU3Check=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

Либо же так:

Код:

"C:\Program Files\AutoIt3\Aut2Exe\Aut2exe_x64.exe" /in "C:\Мои проекты\0307\0001.au3"

Но Вы мне скажите, зачем Вам нужна одна строка? Поскольку для «продакшена» нужно таки будет отслеживать факт существования или отсутствия указанного принтера (а не вываливаться с ошибкой времени исполнения).

[SharkyEXE]

Но Вы мне скажите, зачем Вам нужна одна строка? »

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

[Iska]

SharkyEXE, третий (и последний) принцип построения программ звучит так: «Наглядность».

[SharkyEXE]

Iska

Здравствуйте.

Вы бы не могли, пожалуйста, эту строку

Код:

wmic.exe Printer where "DeviceID='Epson Stylus C20 Series (M)'" delete

перевести на язык Autoit?
Спасибо.

[Iska]

SharkyEXE, я уже переводил по Вашей просьбе пару недель назад.

[SharkyEXE]

Iska

Здравствуйте.

Прошу прощения, вполне возможно, я не так выразился, мне нужно, чтобы в файл 1.au3 написать строку типа

Код:

wmic.exe Printer where "DeviceID='Epson Stylus C20 Series (M)'" delete

Чтобы скомпилировать в exe и удалить принтер

Я методом тыка уже пробую

Код:

RunWait(@ComSpec & ' /c ' & 'wmic.exe Printer where "DeviceID='Microsoft XPS Document Writer'" delete',"", @SW_HIDE)

Не получается

[Iska]

мне нужно, чтобы в файл 1.au3 написать строку типа »

В чём проблема вписать в Ваш файл 1.au3 в потребное Вам место две строки:

Код:

Local $oSWbemLocator = ObjCreate("WbemScripting.SWbemLocator")

$oSWbemLocator.ConnectServer(".", "root\cimv2").Get("Win32_Printer.DeviceID='Epson Stylus C20 Series (M)'").Delete_

(заменив выделенное на Ваш принтер)?

[SharkyEXE]

Iska

Здравствуйте.

Для чего мне хотелось несколько способов удаления принтеров - wmic, vbs, cmd

Я пишу скрипт на языке autoit, туда есть желание вставить способы удаления принтеров, используя wmic, vbs, cmd, чтобы запустить скрипт и принтеры удалились

Ну вот хочется мне все способы удаления, что зедсь плохого то, не просто один споосб, а несколько способов

[Iska]

SharkyEXE, это один и тот же способ. Вы можете стирать мел с доски белой тряпкой, чёрной тряпкой, хоть синей тряпкой — в основе будет лежать одна и та же технология, в данном случае — Wbem.