Parent Directory | Revision Log
Now sending cookie with country set to US so the server provides check boxes indicating orderable parts; Filtering orderable parts by check box and then by -001 suffix;
þÿ S e t - S t r i c t M o d e - V e r s i o n L a t e s t $ E r r o r A c t i o n P r e f e r e n c e = " S t o p " # N e e d e d s o s c r i p t w o n ' t c o n t i n u e i f t h e w e b s e r v e r r e t u r n s a n e r r o r $ l o o k u p S n = " C N D 1 2 0 C J H 0 " i f ( $ a r g s ) { $ l o o k u p S n = $ a r g s [ 0 ] } # S N s t o t e s t w i t h C N D 1 2 0 C J H 0 , C N U 3 0 5 B P 9 N $ p a r t S u r f e r Q u e r y U r l = " h t t p : / / p a r t s u r f e r . h p . c o m / S e a r c h . a s p x ? s e a r c h T e x t = " $ h t C l i e n t = N e w - O b j e c t S y s t e m . N e t . W e b c l i e n t # C o o k i e | | | N a m e : c o u n t r y - C o n t e n t : U n i t e d % 2 0 S t a t e s - h o s t : p a r t s u f e r . h p . c o m - P a t h : / $ h t C l i e n t . H e a d e r s . S e t ( [ S y s t e m . N e t . H t t p R e q u e s t H e a d e r ] : : C o o k i e , " C o u n t r y = U n i t e d % 2 0 S t a t e s " ) $ h t D a t a = $ h t C l i e n t . D o w n l o a d S t r i n g ( " $ ( $ p a r t S u r f e r Q u e r y U r l ) $ ( $ l o o k u p S n ) " ) # C l e a n H T M L s o i t c a n b e p a r s e d i n t o X M L $ h t D a t a = - j o i n $ h t D a t a [ $ h t D a t a . I n d e x O f ( " <