Edit C:\Windows\SysWOW64\Printing_Admin_Scripts\en-US\prnport.vbs
ÿþ' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - ' ' C o p y r i g h t ( c ) M i c r o s o f t C o r p o r a t i o n . A l l r i g h t s r e s e r v e d . ' ' A b s t r a c t : ' p r n p o r t . v b s - P o r t s c r i p t f o r W M I o n W i n d o w s ' u s e d t o a d d , d e l e t e a n d l i s t p o r t s ' a l s o f o r g e t t i n g a n d s e t t i n g t h e p o r t c o n f i g u r a t i o n ' ' U s a g e : ' p r n p o r t [ - a d l g t ? ] [ - r p o r t ] [ - s s e r v e r ] [ - u u s e r n a m e ] [ - w p a s s w o r d ] ' [ - o r a w | l p r ] [ - h h o s t a d d r e s s ] [ - q q u e u e ] [ - n n u m b e r ] ' [ - m e | - m d ] [ - i S N M P i n d e x ] [ - y c o m m u n i t y ] [ - 2 e | - 2 d ] " ' ' E x a m p l e s ' p r n p o r t - a - s s e r v e r - r I P _ 1 . 2 . 3 . 4 - e 1 . 2 . 3 . 4 - o r a w - n 9 1 0 0 ' p r n p o r t - d - s s e r v e r - r c : \ t e m p \ f o o . p r n ' p r n p o r t - l - s s e r v e r ' p r n p o r t - g - s s e r v e r - r I P _ 1 . 2 . 3 . 4 ' p r n p o r t - t - s s e r v e r - r I P _ 1 . 2 . 3 . 4 - m e - y p u b l i c - i 1 - n 9 1 0 0 ' ' - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - o p t i o n e x p l i c i t ' ' D e b u g g i n g t r a c e f l a g s , t o e n a b l e d e b u g o u t p u t t r a c e m e s s a g e ' c h a n g e g D e b u g F l a g t o t r u e . ' d i m g D e b u g F l a g c o n s t k D e b u g T r a c e = 1 c o n s t k D e b u g E r r o r = 2 g D e b u g F l a g = f a l s e ' ' O p e r a t i o n a c t i o n v a l u e s . ' c o n s t k A c t i o n A d d = 0 c o n s t k A c t i o n D e l e t e = 1 c o n s t k A c t i o n L i s t = 2 c o n s t k A c t i o n U n k n o w n = 3 c o n s t k A c t i o n G e t = 4 c o n s t k A c t i o n S e t = 5 c o n s t k E r r o r S u c c e s s = 0 c o n s t K E r r o r F a i l u r e = 1 c o n s t k F l a g C r e a t e O r U p d a t e = 0 c o n s t k N a m e S p a c e = " r o o t \ c i m v 2 " ' ' C o n s t a n t s f o r t h e p a r a m e t e r d i c t i o n a r y ' c o n s t k S e r v e r N a m e = 1 c o n s t k P o r t N a m e = 2 c o n s t k D o u b l e S p o o l = 3 c o n s t k P o r t N u m b e r = 4 c o n s t k P o r t T y p e = 5 c o n s t k H o s t A d d r e s s = 6 c o n s t k S N M P D e v i c e I n d e x = 7 c o n s t k C o m m u n i t y N a m e = 8 c o n s t k S N M P = 9 c o n s t k Q u e u e N a m e = 1 0 c o n s t k U s e r N a m e = 1 1 c o n s t k P a s s w o r d = 1 2 ' ' G e n e r i c s t r i n g s ' c o n s t L _ E m p t y _ T e x t = " " c o n s t L _ S p a c e _ T e x t = " " c o n s t L _ C o l o n _ T e x t = " : " c o n s t L _ L P R _ Q u e u e = " L P R " c o n s t L _ E r r o r _ T e x t = " E r r o r " c o n s t L _ S u c c e s s _ T e x t = " S u c c e s s " c o n s t L _ F a i l e d _ T e x t = " F a i l e d " c o n s t L _ H e x _ T e x t = " 0 x " c o n s t L _ P r i n t e r _ T e x t = " P r i n t e r " c o n s t L _ O p e r a t i o n _ T e x t = " O p e r a t i o n " c o n s t L _ P r o v i d e r _ T e x t = " P r o v i d e r " c o n s t L _ D e s c r i p t i o n _ T e x t = " D e s c r i p t i o n " c o n s t L _ D e b u g _ T e x t = " D e b u g : " ' ' G e n e r a l u s a g e m e s s a g e s ' c o n s t L _ H e l p _ H e l p _ G e n e r a l 0 1 _ T e x t = " U s a g e : p r n p o r t [ - a d l g t ? ] [ - r p o r t ] [ - s s e r v e r ] [ - u u s e r n a m e ] [ - w p a s s w o r d ] " c o n s t L _ H e l p _ H e l p _ G e n e r a l 0 2 _ T e x t = " [ - o r a w | l p r ] [ - h h o s t a d d r e s s ] [ - q q u e u e ] [ - n n u m b e r ] " c o n s t L _ H e l p _ H e l p _ G e n e r a l 0 3 _ T e x t = " [ - m e | - m d ] [ - i S N M P i n d e x ] [ - y c o m m u n i t y ] [ - 2 e | - 2 d ] " c o n s t L _ H e l p _ H e l p _ G e n e r a l 0 4 _ T e x t = " A r g u m e n t s : " c o n s t L _ H e l p _ H e l p _ G e n e r a l 0 5 _ T e x t = " - a - a d d a p o r t " c o n s t L _ H e l p _ H e l p _ G e n e r a l 0 6 _ T e x t = " - d - d e l e t e t h e s p e c i f i e d p o r t " c o n s t L _ H e l p _ H e l p _ G e n e r a l 0 7 _ T e x t = " - g - g e t c o n f i g u r a t i o n f o r a T C P p o r t " c o n s t L _ H e l p _ H e l p _ G e n e r a l 0 8 _ T e x t = " - h - I P a d d r e s s o f t h e d e v i c e " c o n s t L _ H e l p _ H e l p _ G e n e r a l 0 9 _ T e x t = " - i - S N M P i n d e x , i f S N M P i s e n a b l e d " c o n s t L _ H e l p _ H e l p _ G e n e r a l 1 0 _ T e x t = " - l - l i s t a l l T C P p o r t s " c o n s t L _ H e l p _ H e l p _ G e n e r a l 1 1 _ T e x t = " - m - S N M P t y p e . [ e ] e n a b l e , [ d ] d i s a b l e " c o n s t L _ H e l p _ H e l p _ G e n e r a l 1 2 _ T e x t = " - n - p o r t n u m b e r , a p p l i e s t o T C P R A W p o r t s " c o n s t L _ H e l p _ H e l p _ G e n e r a l 1 3 _ T e x t = " - o - p o r t t y p e , r a w o r l p r " c o n s t L _ H e l p _ H e l p _ G e n e r a l 1 4 _ T e x t = " - q - q u e u e n a m e , a p p l i e s t o T C P L P R p o r t s o n l y " c o n s t L _ H e l p _ H e l p _ G e n e r a l 1 5 _ T e x t = " - r - p o r t n a m e " c o n s t L _ H e l p _ H e l p _ G e n e r a l 1 6 _ T e x t = " - s - s e r v e r n a m e " c o n s t L _ H e l p _ H e l p _ G e n e r a l 1 7 _ T e x t = " - t - s e t c o n f i g u r a t i o n f o r a T C P p o r t " c o n s t L _ H e l p _ H e l p _ G e n e r a l 1 8 _ T e x t = " - u - u s e r n a m e " c o n s t L _ H e l p _ H e l p _ G e n e r a l 1 9 _ T e x t = " - w - p a s s w o r d " c o n s t L _ H e l p _ H e l p _ G e n e r a l 2 0 _ T e x t = " - y - c o m m u n i t y n a m e , i f S N M P i s e n a b l e d " c o n s t L _ H e l p _ H e l p _ G e n e r a l 2 1 _ T e x t = " - 2 - d o u b l e s p o o l , a p p l i e s t o T C P L P R p o r t s . [ e ] e n a b l e , [ d ] d i s a b l e " c o n s t L _ H e l p _ H e l p _ G e n e r a l 2 2 _ T e x t = " - ? - d i s p l a y c o m m a n d u s a g e " c o n s t L _ H e l p _ H e l p _ G e n e r a l 2 3 _ T e x t = " E x a m p l e s : " c o n s t L _ H e l p _ H e l p _ G e n e r a l 2 4 _ T e x t = " p r n p o r t - l - s s e r v e r " c o n s t L _ H e l p _ H e l p _ G e n e r a l 2 5 _ T e x t = " p r n p o r t - d - s s e r v e r - r I P _ 1 . 2 . 3 . 4 " c o n s t L _ H e l p _ H e l p _ G e n e r a l 2 6 _ T e x t = " p r n p o r t - a - s s e r v e r - r I P _ 1 . 2 . 3 . 4 - h 1 . 2 . 3 . 4 - o r a w - n 9 1 0 0 " c o n s t L _ H e l p _ H e l p _ G e n e r a l 2 7 _ T e x t = " p r n p o r t - t - s s e r v e r - r I P _ 1 . 2 . 3 . 4 - m e - y p u b l i c - i 1 - n 9 1 0 0 " c o n s t L _ H e l p _ H e l p _ G e n e r a l 2 8 _ T e x t = " p r n p o r t - g - s s e r v e r - r I P _ 1 . 2 . 3 . 4 " c o n s t L _ H e l p _ H e l p _ G e n e r a l 2 9 _ T e x t = " p r n p o r t - a - r I P _ 1 . 2 . 3 . 4 - h 1 . 2 . 3 . 4 " c o n s t L _ H e l p _ H e l p _ G e n e r a l 3 0 _ T e x t = " R e m a r k : " c o n s t L _ H e l p _ H e l p _ G e n e r a l 3 1 _ T e x t = " T h e l a s t e x a m p l e w i l l t r y t o g e t t h e d e v i c e s e t t i n g s a t t h e s p e c i f i e d I P a d d r e s s . " c o n s t L _ H e l p _ H e l p _ G e n e r a l 3 2 _ T e x t = " I f a d e v i c e i s d e t e c t e d , t h e n a T C P p o r t i s a d d e d w i t h t h e p r e f e r r e d s e t t i n g s f o r t h a t d e v i c e . " ' ' M e s s a g e s t o b e d i s p l a y e d i f t h e s c r i p t i n g h o s t i s n o t c s c r i p t ' c o n s t L _ H e l p _ H e l p _ H o s t 0 1 _ T e x t = " T h i s s c r i p t s h o u l d b e e x e c u t e d f r o m t h e C o m m a n d P r o m p t u s i n g C S c r i p t . e x e . " c o n s t L _ H e l p _ H e l p _ H o s t 0 2 _ T e x t = " F o r e x a m p l e : C S c r i p t s c r i p t . v b s a r g u m e n t s " c o n s t L _ H e l p _ H e l p _ H o s t 0 3 _ T e x t = " " c o n s t L _ H e l p _ H e l p _ H o s t 0 4 _ T e x t = " T o s e t C S c r i p t a s t h e d e f a u l t a p p l i c a t i o n t o r u n . V B S f i l e s r u n t h e f o l l o w i n g : " c o n s t L _ H e l p _ H e l p _ H o s t 0 5 _ T e x t = " C S c r i p t / / H : C S c r i p t / / S " c o n s t L _ H e l p _ H e l p _ H o s t 0 6 _ T e x t = " Y o u c a n t h e n r u n " " s c r i p t . v b s a r g u m e n t s " " w i t h o u t p r e c e d i n g t h e s c r i p t w i t h C S c r i p t . " ' ' G e n e r a l e r r o r m e s s a g e s ' c o n s t L _ T e x t _ E r r o r _ G e n e r a l 0 1 _ T e x t = " T h e s c r i p t i n g h o s t c o u l d n o t b e d e t e r m i n e d . " c o n s t L _ T e x t _ E r r o r _ G e n e r a l 0 2 _ T e x t = " U n a b l e t o p a r s e c o m m a n d l i n e . " c o n s t L _ T e x t _ E r r o r _ G e n e r a l 0 3 _ T e x t = " W i n 3 2 e r r o r c o d e " ' ' M i s c e l l a n e o u s m e s s a g e s ' c o n s t L _ T e x t _ M s g _ G e n e r a l 0 1 _ T e x t = " A d d e d p o r t " c o n s t L _ T e x t _ M s g _ G e n e r a l 0 2 _ T e x t = " U n a b l e t o d e l e t e p o r t " c o n s t L _ T e x t _ M s g _ G e n e r a l 0 3 _ T e x t = " U n a b l e t o g e t p o r t " c o n s t L _ T e x t _ M s g _ G e n e r a l 0 4 _ T e x t = " C r e a t e d / u p d a t e d p o r t " c o n s t L _ T e x t _ M s g _ G e n e r a l 0 5 _ T e x t = " U n a b l e t o c r e a t e / u p d a t e p o r t " c o n s t L _ T e x t _ M s g _ G e n e r a l 0 6 _ T e x t = " U n a b l e t o e n u m e r a t e p o r t s " c o n s t L _ T e x t _ M s g _ G e n e r a l 0 7 _ T e x t = " N u m b e r o f p o r t s e n u m e r a t e d " c o n s t L _ T e x t _ M s g _ G e n e r a l 0 8 _ T e x t = " D e l e t e d p o r t " c o n s t L _ T e x t _ M s g _ G e n e r a l 0 9 _ T e x t = " U n a b l e t o g e t S W b e m L o c a t o r o b j e c t " c o n s t L _ T e x t _ M s g _ G e n e r a l 1 0 _ T e x t = " U n a b l e t o c o n n e c t t o W M I s e r v i c e " ' ' P o r t p r o p e r t i e s ' c o n s t L _ T e x t _ M s g _ P o r t 0 1 _ T e x t = " S e r v e r n a m e " c o n s t L _ T e x t _ M s g _ P o r t 0 2 _ T e x t = " P o r t n a m e " c o n s t L _ T e x t _ M s g _ P o r t 0 3 _ T e x t = " H o s t a d d r e s s " c o n s t L _ T e x t _ M s g _ P o r t 0 4 _ T e x t = " P r o t o c o l R A W " c o n s t L _ T e x t _ M s g _ P o r t 0 5 _ T e x t = " P r o t o c o l L P R " c o n s t L _ T e x t _ M s g _ P o r t 0 6 _ T e x t = " P o r t n u m b e r " c o n s t L _ T e x t _ M s g _ P o r t 0 7 _ T e x t = " Q u e u e " c o n s t L _ T e x t _ M s g _ P o r t 0 8 _ T e x t = " B y t e C o u n t E n a b l e d " c o n s t L _ T e x t _ M s g _ P o r t 0 9 _ T e x t = " B y t e C o u n t D i s a b l e d " c o n s t L _ T e x t _ M s g _ P o r t 1 0 _ T e x t = " S N M P E n a b l e d " c o n s t L _ T e x t _ M s g _ P o r t 1 1 _ T e x t = " S N M P D i s a b l e d " c o n s t L _ T e x t _ M s g _ P o r t 1 2 _ T e x t = " C o m m u n i t y " c o n s t L _ T e x t _ M s g _ P o r t 1 3 _ T e x t = " D e v i c e i n d e x " ' ' D e b u g m e s s a g e s ' c o n s t L _ T e x t _ D b g _ M s g 0 1 _ T e x t = " I n f u n c t i o n D e l P o r t " c o n s t L _ T e x t _ D b g _ M s g 0 2 _ T e x t = " I n f u n c t i o n C r e a t e O r S e t P o r t " c o n s t L _ T e x t _ D b g _ M s g 0 3 _ T e x t = " I n f u n c t i o n L i s t P o r t s " c o n s t L _ T e x t _ D b g _ M s g 0 4 _ T e x t = " I n f u n c t i o n G e t P o r t " c o n s t L _ T e x t _ D b g _ M s g 0 5 _ T e x t = " I n f u n c t i o n P a r s e C o m m a n d L i n e " m a i n ' ' M a i n e x e c u t i o n s t a r t s h e r e ' s u b m a i n o n e r r o r r e s u m e n e x t d i m i A c t i o n d i m i R e t v a l d i m o P a r a m D i c t ' ' A b o r t i f t h e h o s t i s n o t c s c r i p t ' i f n o t I s H o s t C s c r i p t ( ) t h e n c a l l w s c r i p t . e c h o ( L _ H e l p _ H e l p _ H o s t 0 1 _ T e x t & v b C R L F & L _ H e l p _ H e l p _ H o s t 0 2 _ T e x t & v b C R L F & _ L _ H e l p _ H e l p _ H o s t 0 3 _ T e x t & v b C R L F & L _ H e l p _ H e l p _ H o s t 0 4 _ T e x t & v b C R L F & _ L _ H e l p _ H e l p _ H o s t 0 5 _ T e x t & v b C R L F & L _ H e l p _ H e l p _ H o s t 0 6 _ T e x t & v b C R L F ) w s c r i p t . q u i t e n d i f s e t o P a r a m D i c t = C r e a t e O b j e c t ( " S c r i p t i n g . D i c t i o n a r y " ) i R e t v a l = P a r s e C o m m a n d L i n e ( i A c t i o n , o P a r a m D i c t ) i f i R e t v a l = 0 t h e n s e l e c t c a s e i A c t i o n c a s e k A c t i o n A d d i R e t v a l = C r e a t e O r S e t P o r t ( o P a r a m D i c t ) c a s e k A c t i o n D e l e t e i R e t v a l = D e l P o r t ( o P a r a m D i c t ) c a s e k A c t i o n L i s t i R e t v a l = L i s t P o r t s ( o P a r a m D i c t ) c a s e k A c t i o n G e t i R e t V a l = G e t P o r t ( o P a r a m D i c t ) c a s e k A c t i o n S e t i R e t V a l = C r e a t e O r S e t P o r t ( o P a r a m D i c t ) c a s e e l s e U s a g e ( t r u e ) e x i t s u b e n d s e l e c t e n d i f e n d s u b ' ' D e l e t e a p o r t ' f u n c t i o n D e l P o r t ( o P a r a m D i c t ) o n e r r o r r e s u m e n e x t D e b u g P r i n t k D e b u g T r a c e , L _ T e x t _ D b g _ M s g 0 1 _ T e x t D e b u g P r i n t k D e b u g T r a c e , L _ T e x t _ M s g _ P o r t 0 1 _ T e x t & L _ S p a c e _ T e x t & o P a r a m D i c t ( k S e r v e r N a m e ) D e b u g P r i n t k D e b u g T r a c e , L _ T e x t _ M s g _ P o r t 0 2 _ T e x t & L _ S p a c e _ T e x t & o P a r a m D i c t ( k P o r t N a m e ) d i m o S e r v i c e d i m o P o r t d i m i R e s u l t d i m s t r S e r v e r d i m s t r P o r t d i m s t r U s e r d i m s t r P a s s w o r d i R e s u l t = k E r r o r F a i l u r e s t r S e r v e r = o P a r a m D i c t ( k S e r v e r N a m e ) s t r P o r t = o P a r a m D i c t ( k P o r t N a m e ) s t r U s e r = o P a r a m D i c t ( k U s e r N a m e ) s t r P a s s w o r d = o P a r a m D i c t ( k P a s s w o r d ) i f W m i C o n n e c t ( s t r S e r v e r , k N a m e S p a c e , s t r U s e r , s t r P a s s w o r d , o S e r v i c e ) t h e n s e t o P o r t = o S e r v i c e . G e t ( " W i n 3 2 _ T C P I P P r i n t e r P o r t = ' " & s t r P o r t & " ' " ) e l s e D e l P o r t = k E r r o r F a i l u r e e x i t f u n c t i o n e n d i f ' ' C h e c k i f G e t s u c c e e d e d ' i f E r r . N u m b e r = k E r r o r S u c c e s s t h e n ' ' T r y d e l e t i n g t h e i n s t a n c e ' o P o r t . D e l e t e _ i f E r r . N u m b e r = k E r r o r S u c c e s s t h e n w s c r i p t . e c h o L _ T e x t _ M s g _ G e n e r a l 0 8 _ T e x t & L _ S p a c e _ T e x t & s t r P o r t e l s e w s c r i p t . e c h o L _ T e x t _ M s g _ G e n e r a l 0 2 _ T e x t & L _ S p a c e _ T e x t & L _ E r r o r _ T e x t & L _ S p a c e _ T e x t _ & L _ H e x _ T e x t & h e x ( E r r . N u m b e r ) & L _ S p a c e _ T e x t & E r r . D e s c r i p t i o n ' ' T r y g e t t i n g e x t e n d e d e r r o r i n f o r m a t i o n ' c a l l L a s t E r r o r ( ) e n d i f e l s e w s c r i p t . e c h o L _ T e x t _ M s g _ G e n e r a l 0 2 _ T e x t & L _ S p a c e _ T e x t & L _ E r r o r _ T e x t & L _ S p a c e _ T e x t _ & L _ H e x _ T e x t & h e x ( E r r . N u m b e r ) & L _ S p a c e _ T e x t & E r r . D e s c r i p t i o n ' ' T r y g e t t i n g e x t e n d e d e r r o r i n f o r m a t i o n ' c a l l L a s t E r r o r ( ) e n d i f D e l P o r t = i R e s u l t e n d f u n c t i o n ' ' A d d o r u p d a t e a p o r t ' f u n c t i o n C r e a t e O r S e t P o r t ( o P a r a m D i c t ) o n e r r o r r e s u m e n e x t d i m o P o r t d i m o S e r v i c e d i m i R e s u l t d i m P o r t T y p e d i m s t r S e r v e r d i m s t r P o r t d i m s t r U s e r d i m s t r P a s s w o r d D e b u g P r i n t k D e b u g T r a c e , L _ T e x t _ D b g _ M s g 0 2 _ T e x t D e b u g P r i n t k D e b u g T r a c e , L _ T e x t _ M s g _ P o r t 0 1 _ T e x t & L _ S p a c e _ T e x t & o P a r a m D i c t . I t e m ( k S e r v e r N a m e ) D e b u g P r i n t k D e b u g T r a c e , L _ T e x t _ M s g _ P o r t 0 2 _ T e x t & L _ S p a c e _ T e x t & o P a r a m D i c t . I t e m ( k P o r t N a m e ) D e b u g P r i n t k D e b u g T r a c e , L _ T e x t _ M s g _ P o r t 0 6 _ T e x t & L _ S p a c e _ T e x t & o P a r a m D i c t . I t e m ( k P o r t N u m b e r ) D e b u g P r i n t k D e b u g T r a c e , L _ T e x t _ M s g _ P o r t 0 7 _ T e x t & L _ S p a c e _ T e x t & o P a r a m D i c t . I t e m ( k Q u e u e N a m e ) D e b u g P r i n t k D e b u g T r a c e , L _ T e x t _ M s g _ P o r t 1 3 _ T e x t & L _ S p a c e _ T e x t & o P a r a m D i c t . I t e m ( k S N M P D e v i c e I n d e x ) D e b u g P r i n t k D e b u g T r a c e , L _ T e x t _ M s g _ P o r t 1 2 _ T e x t & L _ S p a c e _ T e x t & o P a r a m D i c t . I t e m ( k C o m m u n i t y N a m e ) D e b u g P r i n t k D e b u g T r a c e , L _ T e x t _ M s g _ P o r t 0 3 _ T e x t & L _ S p a c e _ T e x t & o P a r a m D i c t . I t e m ( k H o s t A d d r e s s ) s t r S e r v e r = o P a r a m D i c t ( k S e r v e r N a m e ) s t r P o r t = o P a r a m D i c t ( k P o r t N a m e ) s t r U s e r = o P a r a m D i c t ( k U s e r N a m e ) s t r P a s s w o r d = o P a r a m D i c t ( k P a s s w o r d ) ' ' I f t h e p o r t e x i s t s , t h e n g e t t h e s e t t i n g s . L a t e r P u t I n s t a n c e w i l l d o a n u p d a t e ' i f W m i C o n n e c t ( s t r S e r v e r , k N a m e S p a c e , s t r U s e r , s t r P a s s w o r d , o S e r v i c e ) t h e n s e t o P o r t = o S e r v i c e . G e t ( " W i n 3 2 _ T C P I P P r i n t e r P o r t . N a m e = ' " & s t r P o r t & " ' " ) ' ' I f g e t w a s u n s u c c e s s f u l t h e n s p a w n a n e w p o r t i n s t a n c e . L a t e r P u t I n s t a n c e w i l l d o a c r e a t e ' i f E r r . N u m b e r < > k E r r o r S u c c e s s t h e n ' ' C l e a r t h e p r e v i o u s e r r o r ' E r r . C l e a r s e t o P o r t = o S e r v i c e . G e t ( " W i n 3 2 _ T C P I P P r i n t e r P o r t " ) . S p a w n I n s t a n c e _ e n d i f e l s e C r e a t e O r S e t P o r t = k E r r o r F a i l u r e e x i t f u n c t i o n e n d i f i f E r r . N u m b e r < > k E r r o r S u c c e s s t h e n w s c r i p t . e c h o L _ T e x t _ M s g _ G e n e r a l 0 3 _ T e x t & L _ S p a c e _ T e x t & L _ E r r o r _ T e x t & L _ S p a c e _ T e x t _ & L _ H e x _ T e x t & h e x ( E r r . N u m b e r ) & L _ S p a c e _ T e x t & E r r . D e s c r i p t i o n C r e a t e O r S e t P o r t = k E r r o r F a i l u r e e x i t f u n c t i o n e n d i f o P o r t . N a m e = o P a r a m D i c t . I t e m ( k P o r t N a m e ) o P o r t . H o s t A d d r e s s = o P a r a m D i c t . I t e m ( k H o s t A d d r e s s ) o P o r t . P o r t N u m b e r = o P a r a m D i c t . I t e m ( k P o r t N u m b e r ) o P o r t . S N M P E n a b l e d = o P a r a m D i c t . I t e m ( k S N M P ) o P o r t . S N M P D e v I n d e x = o P a r a m D i c t . I t e m ( k S N M P D e v i c e I n d e x ) o P o r t . S N M P C o m m u n i t y = o P a r a m D i c t . I t e m ( k C o m m u n i t y N a m e ) o P o r t . Q u e u e = o P a r a m D i c t . I t e m ( k Q u e u e N a m e ) o P o r t . B y t e C o u n t = o P a r a m D i c t . I t e m ( k D o u b l e S p o o l ) P o r t T y p e = o P a r a m D i c t . I t e m ( k P o r t T y p e ) ' ' U p d a t e t h e p o r t o b j e c t w i t h t h e s e t t i n g s c o r r e s p o n d i n g ' t o t h e p o r t t y p e o f t h e p o r t t o b e a d d e d ' s e l e c t c a s e l c a s e ( P o r t T y p e ) c a s e " r a w " o P o r t . P r o t o c o l = 1 i f N o t I s N u l l ( o P o r t . Q u e u e ) t h e n w s c r i p t . e c h o L _ E r r o r _ T e x t & L _ C o l o n _ T e x t & L _ S p a c e _ T e x t _ & L _ H e l p _ H e l p _ G e n e r a l 1 4 _ T e x t C r e a t e O r S e t P o r t = k E r r o r F a i l u r e e x i t f u n c t i o n e n d i f c a s e " l p r " o P o r t . P r o t o c o l = 2 i f I s N u l l ( o P o r t . Q u e u e ) t h e n o P o r t . Q u e u e = L _ L P R _ Q u e u e e n d i f c a s e e l s e ' ' P u t I n s t a n c e w i l l a t t e m p t t o g e t t h e c o n f i g u r a t i o n o f ' t h e d e v i c e b a s e d o n i t s I P a d d r e s s . T h o s e s e t t i n g s ' w i l l b e u s e d t o a d d a n e w p o r t ' e n d s e l e c t ' ' T r y c r e a t i n g o r u p d a t i n g t h e p o r t ' o P o r t . P u t _ ( k F l a g C r e a t e O r U p d a t e ) i f E r r . N u m b e r = k E r r o r S u c c e s s t h e n w s c r i p t . e c h o L _ T e x t _ M s g _ G e n e r a l 0 4 _ T e x t & L _ S p a c e _ T e x t & o P o r t . N a m e i R e s u l t = k E r r o r S u c c e s s e l s e w s c r i p t . e c h o L _ T e x t _ M s g _ G e n e r a l 0 5 _ T e x t & L _ S p a c e _ T e x t & o P o r t . N a m e & L _ S p a c e _ T e x t _ & L _ E r r o r _ T e x t & L _ S p a c e _ T e x t & L _ H e x _ T e x t & h e x ( E r r . N u m b e r ) _ & L _ S p a c e _ T e x t & E r r . D e s c r i p t i o n ' ' T r y g e t t i n g e x t e n d e d e r r o r i n f o r m a t i o n ' c a l l L a s t E r r o r ( ) i R e s u l t = k E r r o r F a i l u r e e n d i f C r e a t e O r S e t P o r t = i R e s u l t e n d f u n c t i o n ' ' L i s t p o r t s o n a m a c h i n e . ' f u n c t i o n L i s t P o r t s ( o P a r a m D i c t ) o n e r r o r r e s u m e n e x t D e b u g P r i n t k D e b u g T r a c e , L _ T e x t _ D b g _ M s g 0 3 _ T e x t d i m P o r t s d i m o P o r t d i m o S e r v i c e d i m i R e t v a l d i m i T o t a l d i m s t r S e r v e r d i m s t r U s e r d i m s t r P a s s w o r d i R e s u l t = k E r r o r F a i l u r e s t r S e r v e r = o P a r a m D i c t ( k S e r v e r N a m e ) s t r U s e r = o P a r a m D i c t ( k U s e r N a m e ) s t r P a s s w o r d = o P a r a m D i c t ( k P a s s w o r d ) i f W m i C o n n e c t ( s t r S e r v e r , k N a m e S p a c e , s t r U s e r , s t r P a s s w o r d , o S e r v i c e ) t h e n s e t P o r t s = o S e r v i c e . I n s t a n c e s O f ( " W i n 3 2 _ T C P I P P r i n t e r P o r t " ) e l s e L i s t P o r t s = k E r r o r F a i l u r e e x i t f u n c t i o n e n d i f i f E r r . N u m b e r < > k E r r o r S u c c e s s t h e n w s c r i p t . e c h o L _ T e x t _ M s g _ G e n e r a l 0 6 _ T e x t & L _ S p a c e _ T e x t & L _ E r r o r _ T e x t & L _ S p a c e _ T e x t _ & L _ H e x _ T e x t & h e x ( E r r . N u m b e r ) & L _ S p a c e _ T e x t & E r r . D e s c r i p t i o n L i s t P r i n t e r s = k E r r o r F a i l u r e e x i t f u n c t i o n e n d i f i T o t a l = 0 f o r e a c h o P o r t i n P o r t s i T o t a l = i T o t a l + 1 w s c r i p t . e c h o L _ E m p t y _ T e x t w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 0 1 _ T e x t & L _ S p a c e _ T e x t & s t r S e r v e r w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 0 2 _ T e x t & L _ S p a c e _ T e x t & o P o r t . N a m e w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 0 3 _ T e x t & L _ S p a c e _ T e x t & o P o r t . H o s t A d d r e s s i f o P o r t . P r o t o c o l = 1 t h e n w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 0 4 _ T e x t w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 0 6 _ T e x t & L _ S p a c e _ T e x t & o P o r t . P o r t N u m b e r e l s e w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 0 5 _ T e x t w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 0 7 _ T e x t & L _ S p a c e _ T e x t & o P o r t . Q u e u e i f o P o r t . B y t e C o u n t t h e n w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 0 8 _ T e x t e l s e w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 0 9 _ T e x t e n d i f e n d i f i f o P o r t . S N M P E n a b l e d t h e n w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 1 0 _ T e x t w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 1 2 _ T e x t & L _ S p a c e _ T e x t & o P o r t . S N M P C o m m u n i t y w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 1 3 _ T e x t & L _ S p a c e _ T e x t & o P o r t . S N M P D e v I n d e x e l s e w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 1 1 _ T e x t e n d i f E r r . C l e a r n e x t w s c r i p t . e c h o L _ E m p t y _ T e x t w s c r i p t . e c h o L _ T e x t _ M s g _ G e n e r a l 0 7 _ T e x t & L _ S p a c e _ T e x t & i T o t a l L i s t P o r t s = k E r r o r S u c c e s s e n d f u n c t i o n ' ' G e t s t h e c o n f i g u r a t i o n o f a p o r t ' f u n c t i o n G e t P o r t ( o P a r a m D i c t ) o n e r r o r r e s u m e n e x t D e b u g P r i n t k D e b u g T r a c e , L _ T e x t _ D b g _ M s g 0 4 _ T e x t D e b u g P r i n t k D e b u g T r a c e , L _ T e x t _ M s g _ P o r t 0 1 _ T e x t & L _ S p a c e _ T e x t & o P a r a m D i c t ( k S e r v e r N a m e ) D e b u g P r i n t k D e b u g T r a c e , L _ T e x t _ M s g _ P o r t 0 2 _ T e x t & L _ S p a c e _ T e x t & o P a r a m D i c t ( k P o r t N a m e ) d i m o S e r v i c e d i m o P o r t d i m i R e s u l t d i m s t r S e r v e r d i m s t r P o r t d i m s t r U s e r d i m s t r P a s s w o r d i R e s u l t = k E r r o r F a i l u r e s t r S e r v e r = o P a r a m D i c t ( k S e r v e r N a m e ) s t r P o r t = o P a r a m D i c t ( k P o r t N a m e ) s t r U s e r = o P a r a m D i c t ( k U s e r N a m e ) s t r P a s s w o r d = o P a r a m D i c t ( k P a s s w o r d ) i f W m i C o n n e c t ( s t r S e r v e r , k N a m e S p a c e , s t r U s e r , s t r P a s s w o r d , o S e r v i c e ) t h e n s e t o P o r t = o S e r v i c e . G e t ( " W i n 3 2 _ T C P I P P r i n t e r P o r t . N a m e = ' " & s t r P o r t & " ' " ) e l s e G e t P o r t = k E r r o r F a i l u r e e x i t f u n c t i o n e n d i f i f E r r . N u m b e r = k E r r o r S u c c e s s t h e n w s c r i p t . e c h o L _ E m p t y _ T e x t w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 0 1 _ T e x t & L _ S p a c e _ T e x t & s t r S e r v e r w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 0 2 _ T e x t & L _ S p a c e _ T e x t & o P o r t . N a m e w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 0 3 _ T e x t & L _ S p a c e _ T e x t & o P o r t . H o s t A d d r e s s i f o P o r t . P r o t o c o l = 1 t h e n w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 0 4 _ T e x t w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 0 6 _ T e x t & L _ S p a c e _ T e x t & o P o r t . P o r t N u m b e r e l s e w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 0 5 _ T e x t w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 0 7 _ T e x t & L _ S p a c e _ T e x t & o P o r t . Q u e u e i f o P o r t . B y t e C o u n t t h e n w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 0 8 _ T e x t e l s e w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 0 9 _ T e x t e n d i f e n d i f i f o P o r t . S N M P E n a b l e d t h e n w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 1 0 _ T e x t w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 1 2 _ T e x t & L _ S p a c e _ T e x t & o P o r t . S N M P C o m m u n i t y w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 1 3 _ T e x t & L _ S p a c e _ T e x t & o P o r t . S N M P D e v I n d e x e l s e w s c r i p t . e c h o L _ T e x t _ M s g _ P o r t 1 1 _ T e x t e n d i f i R e s u l t = k E r r o r S u c c e s s e l s e w s c r i p t . e c h o L _ T e x t _ M s g _ G e n e r a l 0 3 _ T e x t & L _ S p a c e _ T e x t & L _ E r r o r _ T e x t & L _ S p a c e _ T e x t _ & L _ H e x _ T e x t & h e x ( E r r . N u m b e r ) & L _ S p a c e _ T e x t & E r r . D e s c r i p t i o n ' ' T r y g e t t i n g e x t e n d e d e r r o r i n f o r m a t i o n ' c a l l L a s t E r r o r ( ) e n d i f G e t P o r t = i R e s u l t e n d f u n c t i o n ' ' D e b u g d i s p l a y h e l p e r f u n c t i o n ' s u b D e b u g P r i n t ( u F l a g s , s t r S t r i n g ) i f g D e b u g F l a g = t r u e t h e n i f u F l a g s = k D e b u g T r a c e t h e n w s c r i p t . e c h o L _ D e b u g _ T e x t & L _ S p a c e _ T e x t & s t r S t r i n g e n d i f i f u F l a g s = k D e b u g E r r o r t h e n i f E r r < > 0 t h e n w s c r i p t . e c h o L _ D e b u g _ T e x t & L _ S p a c e _ T e x t & s t r S t r i n g & L _ S p a c e _ T e x t _ & L _ E r r o r _ T e x t & L _ S p a c e _ T e x t & L _ H e x _ T e x t & h e x ( E r r . N u m b e r ) _ & L _ S p a c e _ T e x t & E r r . D e s c r i p t i o n e n d i f e n d i f e n d i f e n d s u b ' ' P a r s e t h e c o m m a n d l i n e i n t o i t s c o m p o n e n t s ' f u n c t i o n P a r s e C o m m a n d L i n e ( i A c t i o n , o P a r a m D i c t ) o n e r r o r r e s u m e n e x t D e b u g P r i n t k D e b u g T r a c e , L _ T e x t _ D b g _ M s g 0 5 _ T e x t d i m o A r g s d i m i I n d e x i A c t i o n = k A c t i o n U n k n o w n s e t o A r g s = W s c r i p t . A r g u m e n t s w h i l e i I n d e x < o A r g s . C o u n t s e l e c t c a s e o A r g s ( i I n d e x ) c a s e " - g " i A c t i o n = k A c t i o n G e t c a s e " - t " i A c t i o n = k A c t i o n S e t c a s e " - a " i A c t i o n = k A c t i o n A d d c a s e " - d " i A c t i o n = k A c t i o n D e l e t e c a s e " - l " i A c t i o n = k A c t i o n L i s t c a s e " - 2 e " o P a r a m D i c t . A d d k D o u b l e S p o o l , t r u e c a s e " - 2 d " o P a r a m D i c t . A d d k D o u b l e S p o o l , f a l s e c a s e " - s " i I n d e x = i I n d e x + 1 o P a r a m D i c t . A d d k S e r v e r N a m e , R e m o v e B a c k s l a s h e s ( o A r g s ( i I n d e x ) ) c a s e " - u " i I n d e x = i I n d e x + 1 o P a r a m D i c t . A d d k U s e r N a m e , o A r g s ( i I n d e x ) c a s e " - w " i I n d e x = i I n d e x + 1 o P a r a m D i c t . A d d k P a s s w o r d , o A r g s ( i I n d e x ) c a s e " - n " i I n d e x = i I n d e x + 1 o P a r a m D i c t . A d d k P o r t N u m b e r , o A r g s ( i I n d e x ) c a s e " - r " i I n d e x = i I n d e x + 1 o P a r a m D i c t . A d d k P o r t N a m e , o A r g s ( i I n d e x ) c a s e " - o " i I n d e x = i I n d e x + 1 o P a r a m D i c t . A d d k P o r t T y p e , o A r g s ( i I n d e x ) c a s e " - h " i I n d e x = i I n d e x + 1 o P a r a m D i c t . A d d k H o s t A d d r e s s , o A r g s ( i I n d e x ) c a s e " - q " i I n d e x = i I n d e x + 1 o P a r a m D i c t . A d d k Q u e u e N a m e , o A r g s ( i I n d e x ) c a s e " - i " i I n d e x = i I n d e x + 1 o P a r a m D i c t . A d d k S N M P D e v i c e I n d e x , o A r g s ( i I n d e x ) c a s e " - y " i I n d e x = i I n d e x + 1 o P a r a m D i c t . A d d k C o m m u n i t y N a m e , o A r g s ( i I n d e x ) c a s e " - m e " o P a r a m D i c t . A d d k S N M P , t r u e c a s e " - m d " o P a r a m D i c t . A d d k S N M P , f a l s e c a s e " - ? " U s a g e ( T r u e ) e x i t f u n c t i o n c a s e e l s e U s a g e ( T r u e ) e x i t f u n c t i o n e n d s e l e c t i I n d e x = i I n d e x + 1 w e n d i f E r r = k E r r o r S u c c e s s t h e n P a r s e C o m m a n d L i n e = k E r r o r S u c c e s s e l s e w s c r i p t . e c h o L _ T e x t _ E r r o r _ G e n e r a l 0 2 _ T e x t & L _ S p a c e _ T e x t & L _ E r r o r _ T e x t & L _ S p a c e _ T e x t _ & L _ H e x _ T e x t & h e x ( E r r . N u m b e r ) & L _ S p a c e _ t e x t & E r r . D e s c r i p t i o n P a r s e C o m m a n d L i n e = k E r r o r F a i l u r e e n d i f e n d f u n c t i o n ' ' D i s p l a y c o m m a n d u s a g e . ' s u b U s a g e ( b E x i t ) w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 0 1 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 0 2 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 0 3 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 0 4 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 0 5 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 0 6 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 0 7 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 0 8 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 0 9 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 1 0 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 1 1 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 1 2 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 1 3 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 1 4 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 1 5 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 1 6 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 1 7 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 1 8 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 1 9 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 2 0 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 2 1 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 2 2 _ T e x t w s c r i p t . e c h o L _ E m p t y _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 2 3 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 2 4 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 2 5 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 2 6 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 2 7 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 2 8 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 2 9 _ T e x t w s c r i p t . e c h o L _ E m p t y _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 3 0 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 3 1 _ T e x t w s c r i p t . e c h o L _ H e l p _ H e l p _ G e n e r a l 3 2 _ T e x t i f b E x i t t h e n w s c r i p t . q u i t ( 1 ) e n d i f e n d s u b ' ' D e t e r m i n e s w h i c h p r o g r a m i s b e i n g u s e d t o r u n t h i s s c r i p t . ' R e t u r n s t r u e i f t h e s c r i p t h o s t i s c s c r i p t . e x e ' f u n c t i o n I s H o s t C s c r i p t ( ) o n e r r o r r e s u m e n e x t d i m s t r F u l l N a m e d i m s t r C o m m a n d d i m i , j d i m b R e t u r n b R e t u r n = f a l s e s t r F u l l N a m e = W S c r i p t . F u l l N a m e i = I n S t r ( 1 , s t r F u l l N a m e , " . e x e " , 1 ) i f i < > 0 t h e n j = I n S t r R e v ( s t r F u l l N a m e , " \ " , i , 1 ) i f j < > 0 t h e n s t r C o m m a n d = M i d ( s t r F u l l N a m e , j + 1 , i - j - 1 ) i f L C a s e ( s t r C o m m a n d ) = " c s c r i p t " t h e n b R e t u r n = t r u e e n d i f e n d i f e n d i f i f E r r < > 0 t h e n w s c r i p t . e c h o L _ T e x t _ E r r o r _ G e n e r a l 0 1 _ T e x t & L _ S p a c e _ T e x t & L _ E r r o r _ T e x t & L _ S p a c e _ T e x t _ & L _ H e x _ T e x t & h e x ( E r r . N u m b e r ) & L _ S p a c e _ T e x t & E r r . D e s c r i p t i o n e n d i f I s H o s t C s c r i p t = b R e t u r n e n d f u n c t i o n ' ' R e t r i e v e s e x t e n d e d i n f o r m a t i o n a b o u t t h e l a s t e r r o r t h a t o c c u r r e d ' d u r i n g a W B E M o p e r a t i o n . T h e m e t h o d s t h a t s e t a n S W b e m L a s t E r r o r ' o b j e c t a r e G e t O b j e c t , P u t I n s t a n c e , D e l e t e I n s t a n c e ' s u b L a s t E r r o r ( ) o n e r r o r r e s u m e n e x t d i m o E r r o r s e t o E r r o r = C r e a t e O b j e c t ( " W b e m S c r i p t i n g . S W b e m L a s t E r r o r " ) i f E r r = k E r r o r S u c c e s s t h e n w s c r i p t . e c h o L _ O p e r a t i o n _ T e x t & L _ S p a c e _ T e x t & o E r r o r . O p e r a t i o n w s c r i p t . e c h o L _ P r o v i d e r _ T e x t & L _ S p a c e _ T e x t & o E r r o r . P r o v i d e r N a m e w s c r i p t . e c h o L _ D e s c r i p t i o n _ T e x t & L _ S p a c e _ T e x t & o E r r o r . D e s c r i p t i o n w s c r i p t . e c h o L _ T e x t _ E r r o r _ G e n e r a l 0 4 _ T e x t & L _ S p a c e _ T e x t & o E r r o r . S t a t u s C o d e e n d i f e n d s u b ' ' C o n n e c t s t o t h e W M I s e r v i c e o n a s e r v e r . o S e r v i c e i s r e t u r n e d a s a s e r v i c e ' o b j e c t ( S W b e m S e r v i c e s ) ' f u n c t i o n W m i C o n n e c t ( s t r S e r v e r , s t r N a m e S p a c e , s t r U s e r , s t r P a s s w o r d , o S e r v i c e ) o n e r r o r r e s u m e n e x t d i m o L o c a t o r d i m b R e s u l t o S e r v i c e = n u l l b R e s u l t = f a l s e s e t o L o c a t o r = C r e a t e O b j e c t ( " W b e m S c r i p t i n g . S W b e m L o c a t o r " ) i f E r r = k E r r o r S u c c e s s t h e n s e t o S e r v i c e = o L o c a t o r . C o n n e c t S e r v e r ( s t r S e r v e r , s t r N a m e S p a c e , s t r U s e r , s t r P a s s w o r d ) i f E r r = k E r r o r S u c c e s s t h e n b R e s u l t = t r u e o S e r v i c e . S e c u r i t y _ . i m p e r s o n a t i o n l e v e l = 3 ' ' R e q u i r e d t o p e r f o r m a d m i n i s t r a t i v e t a s k s o n t h e s p o o l e r s e r v i c e ' o S e r v i c e . S e c u r i t y _ . P r i v i l e g e s . A d d A s S t r i n g " S e L o a d D r i v e r P r i v i l e g e " E r r . C l e a r e l s e w s c r i p t . e c h o L _ T e x t _ M s g _ G e n e r a l 1 0 _ T e x t & L _ S p a c e _ T e x t & L _ E r r o r _ T e x t _ & L _ S p a c e _ T e x t & L _ H e x _ T e x t & h e x ( E r r . N u m b e r ) & L _ S p a c e _ T e x t _ & E r r . D e s c r i p t i o n e n d i f e l s e w s c r i p t . e c h o L _ T e x t _ M s g _ G e n e r a l 0 9 _ T e x t & L _ S p a c e _ T e x t & L _ E r r o r _ T e x t _ & L _ S p a c e _ T e x t & L _ H e x _ T e x t & h e x ( E r r . N u m b e r ) & L _ S p a c e _ T e x t _ & E r r . D e s c r i p t i o n e n d i f W m i C o n n e c t = b R e s u l t e n d f u n c t i o n ' ' R e m o v e l e a d i n g " \ \ " f r o m s e r v e r n a m e ' f u n c t i o n R e m o v e B a c k s l a s h e s ( s t r S e r v e r ) d i m s t r R e t s t r R e t = s t r S e r v e r i f L e f t ( s t r S e r v e r , 2 ) = " \ \ " a n d L e n ( s t r S e r v e r ) > 2 t h e n s t r R e t = M i d ( s t r S e r v e r , 3 ) e n d i f R e m o v e B a c k s l a s h e s = s t r R e t e n d f u n c t i o n
Ms-Dos/Windows
Unix
Write backup
jsp File Browser version 1.2 by
www.vonloesch.de