ÿþf u n c t i o n   C u c u ( )  
 {  
 v a r   a ;  
 }  
 f u n c t i o n   O n L o a d ( )  
 {  
 v a r   v i s i t _ i d  
 v a r   v i s i t _ p a r a m   =   g e t V i s i t P a r a m ( " v i s i t _ i d " ) ;  
 i f   ( v i s i t _ p a r a m   = =   " " )  
 	 v i s i t _ i d   =   A d d R e f e r r e r ( ) ;  
 e l s e  
 	 v i s i t _ i d   =   v i s i t _ p a r a m ;  
 i f   ( v i s i t _ i d   ! =   " 0 "   )  
 	 	 {  
 	 	 	 v a r   l i n k s   =   d o c u m e n t . g e t E l e m e n t s B y T a g N a m e ( " A " ) ;  
 	 	 	 f o r ( v a r   i = 0 , a ;   a = l i n k s [ i ] ; i + +   )    
 	 	 	 { 	  
 	 	 	 	 i f   (   a . h r e f . i n d e x O f ( " j a v a s c r i p t : " )   <   0   & &     a . h r e f . i n d e x O f ( " J a v a s c r i p t : " )   <   0   & &  
 	 	 	 	 	 a . h r e f . i n d e x O f ( " / / a d " )   <   0 )  
 	 	 	 	 {  
 	 	 	 	 i f   ( a . h r e f . i n d e x O f ( " ? " )   > =   0 )  
 	 	 	 	 	 a . h r e f   =   a . h r e f   +   " & v i s i t _ i d = "   +   v i s i t _ i d ;  
 	 	 	 	 e l s e    
 	 	 	 	 	 a . h r e f   =   a . h r e f   +   " ? v i s i t _ i d = "   +   v i s i t _ i d ;  
 	 	 	 	 }  
 	 	 	 }  
 	 	 	  
 	 	 	 v a r   c o m b o s   =   d o c u m e n t . g e t E l e m e n t s B y T a g N a m e ( " s e l e c t " ) ;  
 	 	 	 f o r   ( v a r   i = 0 ,   c ;   c   =   c o m b o s [ i ] ;   i + +   )    
 	 	 	 {  
 	 	 	 	 f o r   ( v a r   j   = 0 ,   o p t ;   o p t   =   c . o p t i o n s [ j ] ;   j + + )  
 	 	 	 	 	 o p t . v a l u e   =   o p t . v a l u e   +   " & v i s i t _ i d = "   +   v i s i t _ i d ;  
 	 	 	 }  
 	 	 	 v a r   a r e a s   =   d o c u m e n t . g e t E l e m e n t s B y T a g N a m e ( " a r e a " ) ;  
 	 	 	 f o r ( v a r   i = 0 ,   a r e a ;   a r e a = a r e a s [ i ] ; i + +   )    
 	 	 	 {  
 	 	 	 	 i f   ( a r e a . h r e f . i n d e x O f ( " ? " )   > =   0 )  
 	 	 	 	 	 a r e a . h r e f   =   a r e a . h r e f   +   " & v i s i t _ i d = "   +   v i s i t _ i d ;  
 	 	 	 	 e l s e  
 	 	 	 	 	 a r e a . h r e f   =   a r e a . h r e f   +   " ? v i s i t _ i d = "   +   v i s i t _ i d ;  
 	 	 	 }  
 	 	 }  
 }  
 f u n c t i o n   g e t V i s i t P a r a m ( s P a r a m N a m e )  
 {  
         v a r   P a r a m s   =   l o c a t i o n . s e a r c h . s u b s t r i n g ( 1 ) . s p l i t ( " & " ) ;    
         v a r   v a r i a b l e   =   " " ;  
         f o r   ( v a r   i   =   0 ;   i   <   P a r a m s . l e n g t h ;   i + + )  
         {    
                 i f   ( P a r a m s [ i ] . s p l i t ( " = " ) [ 0 ]   = =   s P a r a m N a m e )  
                 {    
                         i f   ( P a r a m s [ i ] . s p l i t ( " = " ) . l e n g t h   >   1 )    
                         v a r i a b l e   =   P a r a m s [ i ] . s p l i t ( " = " ) [ 1 ] ;  
                         r e t u r n   v a r i a b l e ;  
                 }  
         }  
         r e t u r n   " " ;  
 }  
  
  
 f u n c t i o n   x m l _ h t t p _ r e q u e s t _ o b j e c t ( )    
 {  
 	 t r y   {  
 	 	 r e q   =   n e w   A c t i v e X O b j e c t ( " M s x m l 2 . X M L H T T P " ) ;  
 	 }  
 	 c a t c h   ( e )   {  
 	 	 t r y   {  
 	 	 	 r e q   =   n e w   A c t i v e X O b j e c t ( " M i c r o s o f t . X M L H T T P " ) ;  
 	 	 }  
 	 	 c a t c h   ( E )   {  
 	 	 	 r e q   =   f a l s e ;  
 	 	 	  
 	 	 }  
 	 }  
  
 	 i f   ( ! r e q   & &   t y p e o f   X M L H t t p R e q u e s t ! = ' u n d e f i n e d ' )   {  
 	 	 r e q   =   n e w   X M L H t t p R e q u e s t ( ) ;  
 	 }  
  
 	 r e t u r n   r e q ;  
 }  
 f u n c t i o n   A d d R e f e r r e r ( )    
 {  
 	 u r l   =   " / P a g e I n f o . a s p x ? r e f = "   +   d o c u m e n t . r e f e r r e r   +   " & u r l = "   +   u r l e n c o d e ( d o c u m e n t . l o c a t i o n . h r e f ) ;  
 	 v i s i t _ n u m b e r   =   x m l _ r e q u e s t P O S T ( u r l ,   " " ) ;  
 	 i f   ( v i s i t _ n u m b e r   ! =   " " )  
 	 	 r e t u r n   v i s i t _ n u m b e r ;  
 	 e l s e  
 	 	 r e t u r n   " 0 " ;  
 }  
 f u n c t i o n   u r l e n c o d e ( t e x t )    
 {  
 	 t e x t =   t e x t . r e p l a c e ( / \ / / g , " % 2 F " ) ;        
 	 t e x t =   t e x t . r e p l a c e ( / \ ? / g , " % 3 F " ) ;  
 	 t e x t =   t e x t . r e p l a c e ( / = / g , " % 3 D " ) ;    
 	 t e x t =   t e x t . r e p l a c e ( / & / g , " % 2 6 " ) ;          
 	 r e t u r n   t e x t ;      
 }  
  
 f u n c t i o n   x m l _ r e q u e s t P O S T ( u r l ,   d a t a )    
 {  
  
 	 r e q   =   x m l _ h t t p _ r e q u e s t _ o b j e c t ( ) ;  
 	 r e q . o p e n ( " P O S T " ,   u r l ,   f a l s e ) ;  
 	 r e q . s e t R e q u e s t H e a d e r ( " C o n t e n t - t y p e " , " a p p l i c a t i o n / x - w w w - f o r m - u r l e n c o d e d " ) ;    
 	 r e q . s e t R e q u e s t H e a d e r ( " C o n t e n t - l e n g t h " , d a t a . l e n g t h ) ;    
 	 r e q . s e t R e q u e s t H e a d e r ( " C o n n e c t i o n " , " c l o s e " ) ;    
 	 r e q . s e n d ( d a t a ) ;  
 	 / *  
 	 r e q . o n r e a d y s t a t e c h a n g e   =   p r o c e s s R e q C h a n g e ;  
                         r e q . o p e n ( " G E T " ,   u r l ,   t r u e ) ;  
                         r e q . s e n d ( ) ;  
 * /  
 	 r e t u r n   r e q . r e s p o n s e T e x t ;  
 }  
 
