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