ÿþ/ /   S e t   c h a r a c t e r   s e t s :  
 v a r   n u m e r i c                                 =   " 0 1 2 3 4 5 6 7 8 9 " ;  
 v a r   n u m e r i c C a l c u l a t e               =   " 0 1 2 3 4 5 6 7 8 9 + - * / =   " ;  
 v a r   n u m e r i c T e l e p h o n e               =   " 0 1 2 3 4 5 6 7 8 9 + ( )   " ;  
 v a r   n u m e r i c T i m e                         =   " 0 1 2 3 4 5 6 7 8 9 : " ;  
 v a r   h e x a d e c i m a l L o w e r               =   " a b c d e f 0 1 2 3 4 5 6 7 8 9 " ;  
 v a r   h e x a d e c i m a l U p p e r               =   " A B C D E F 0 1 2 3 4 5 6 7 8 9 " ;  
 v a r   h e x a d e c i m a l B o t h                 =   " a b c d e f A B C D E F 0 1 2 3 4 5 6 7 8 9 " ;  
 v a r   a l p h a n u m e r i c C a r R e g           =   " 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 " ;  
 v a r   a l p h a n u m e r i c U R L                 =   " 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 - % & + = : @ ~ # . ? _ / \ \ " ;  
 v a r   a l p h a n u m e r i c E m a i l             =   " 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 - ! $ % ^ & * + = { } @ ~ # | . ? _ / \ ' ` " ;  
 v a r   a l p h a n u m e r i c R o o m               =   " 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 . " ;  
 v a r   a l p h a n u m e r i c L o w 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S~^ß à á â ã ä å æ ç è é ê ë ì í î ï ñ ò ó ô õ ö ø ù ú û ü 1_ÿ 0 1 2 3 4 5 6 7 8 9 " ;  
 v a r   a l p h a n u m e r i c L o w e r S p a c e   =   " 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S~^ß à á â ã ä å æ ç è é ê ë ì í î ï ñ ò ó ô õ ö ø ù ú û ü 1_ÿ 0 1 2 3 4 5 6 7 8 9 \ n \ r \ t   " ;  
 v a r   a l p h a n u m e r i c U p p 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 `R}xÀ Á Â Ã Ä Å Æ Ç È É Ê Ë Ì Í Î Ï Ñ Ò Ó Ô Õ Ö Ø Ù Ú Û Ü 00 1 2 3 4 5 6 7 8 9 " ;  
 v a r   a l p h a n u m e r i c U p p e r S p a c e   =   " 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 `R}xÀ Á Â Ã Ä Å Æ Ç È É Ê Ë Ì Í Î Ï Ñ Ò Ó Ô Õ Ö Ø Ù Ú Û Ü 00 1 2 3 4 5 6 7 8 9 \ n \ r \ t   " ;  
 v a r   a l p h a n u m e r i c B o t h               =   " 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S~^ß à á â ã ä å æ ç è é ê ë ì í î ï ñ ò ó ô õ ö ø ù ú û ü 1_ÿ 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 `R}xÀ Á Â Ã Ä Å Æ Ç È É Ê Ë Ì Í Î Ï Ñ Ò Ó Ô Õ Ö Ø Ù Ú Û Ü 00 1 2 3 4 5 6 7 8 9 " ;  
 v a r   a l p h a n u m e r i c B o t h S p a c e     =   " 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S~^ß à á â ã ä å æ ç è é ê ë ì í î ï ñ ò ó ô õ ö ø ù ú û ü 1_ÿ 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 `R}xÀ Á Â Ã Ä Å Æ Ç È É Ê Ë Ì Í Î Ï Ñ Ò Ó Ô Õ Ö Ø Ù Ú Û Ü 00 1 2 3 4 5 6 7 8 9 \ n \ r \ t   " ;  
 v a r   a l p h a L o w 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S~^ß à á â ã ä å æ ç è é ê ë ì í î ï ñ ò ó ô õ ö ø ù ú û ü 1_ÿ " ;  
 v a r   a l p h a L o w e r S p a c e                 =   " 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S~^ß à á â ã ä å æ ç è é ê ë ì í î ï ñ ò ó ô õ ö ø ù ú û ü 1_ÿ \ n \ r \ t   " ;  
 v a r   a l p h a U p p 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 `R}xÀ Á Â Ã Ä Å Æ Ç È É Ê Ë Ì Í Î Ï Ñ Ò Ó Ô Õ Ö Ø Ù Ú Û Ü 0" ;  
 v a r   a l p h a U p p e r S p a c e                 =   " 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 `R}xÀ Á Â Ã Ä Å Æ Ç È É Ê Ë Ì Í Î Ï Ñ Ò Ó Ô Õ Ö Ø Ù Ú Û Ü 0\ n \ r \ t   " ;  
 v a r   a l p h a B o t h                             =   " 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S~^ß à á â ã ä å æ ç è é ê ë ì í î ï ñ ò ó ô õ ö ø ù ú û ü 1_ÿ 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 `R}xÀ Á Â Ã Ä Å Æ Ç È É Ê Ë Ì Í Î Ï Ñ Ò Ó Ô Õ Ö Ø Ù Ú Û Ü 0" ;  
 v a r   a l p h a B o t h S p a c e                   =   " 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S~^ß à á â ã ä å æ ç è é ê ë ì í î ï ñ ò ó ô õ ö ø ù ú û ü 1_ÿ 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 `R}xÀ Á Â Ã Ä Å Æ Ç È É Ê Ë Ì Í Î Ï Ñ Ò Ó Ô Õ Ö Ø Ù Ú Û Ü 0\ n \ r \ t   " ;  
 v a r   a l p h a N a m e S p a c e                   =   " 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S~^ß à á â ã ä å æ ç è é ê ë ì í î ï ñ ò ó ô õ ö ø ù ú û ü 1_ÿ 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 `R}xÀ Á Â Ã Ä Å Æ Ç È É Ê Ë Ì Í Î Ï Ñ Ò Ó Ô Õ Ö Ø Ù Ú Û Ü 0- \ ` \ ' \ n \ r \ t   " ;  
 v a r   f u l l S e t                                 =   " 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S~^ß à á â ã ä å æ ç è é ê ë ì í î ï ñ ò ó ô õ ö ø ù ú û ü 1_ÿ A B C D E F G H I J K L M O N P Q R S T U V W X Y Z `R}xÀ Á Â Ã Ä Å Æ Ç È É Ê Ë Ì Í Î Ï Ñ Ò Ó Ô Õ Ö Ø Ù Ú Û Ü 00 1 2 3 4 5 6 7 8 9 -   ! ¬ £ $ ¤ ¥ ¢ % 0 ¼ ½ ¾ ^ & * ( ) + = × ÷ ± { } [ ] : ; @ ~ # | < > , . ?   ! ° ¹ ² ³ µ ¶ © ® "!§ _ / \ \ ` \ ' \ " \  \  \  \  " ;  
 v a r   f u l l S e t S p a c e                       =   " 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S~^ß à á â ã ä å æ ç è é ê ë ì í î ï ñ ò ó ô õ ö ø ù ú û ü 1_ÿ A B C D E F G H I J K L M O N P Q R S T U V W X Y Z `R}xÀ Á Â Ã Ä Å Æ Ç È É Ê Ë Ì Í Î Ï Ñ Ò Ó Ô Õ Ö Ø Ù Ú Û Ü 00 1 2 3 4 5 6 7 8 9 -   ! ¬ £ $ ¤ ¥ ¢ % 0 ¼ ½ ¾ ^ & * ( ) + = × ÷ ± { } [ ] : ; @ ~ # | < > , . ?   ! ° ¹ ² ³ µ ¶ © ® "!§ _ / \ \ ` \ ' \ " \  \  \  \  \ n \ r \ t   " ;  
 v a r   f u l l S e t S e c u r e                     =   " 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S~^ß à á â ã ä å æ ç è é ê ë ì í î ï ñ ò ó ô õ ö ø ù ú û ü 1_ÿ A B C D E F G H I J K L M O N P Q R S T U V W X Y Z `R}xÀ Á Â Ã Ä Å Æ Ç È É Ê Ë Ì Í Î Ï Ñ Ò Ó Ô Õ Ö Ø Ù Ú Û Ü 00 1 2 3 4 5 6 7 8 9 -   ! ¬ £ $ ¤ ¥ ¢ % 0 ¼ ½ ¾ ^ & * ( ) + = × ÷ ± { } [ ] : ; @ ~ # | < > , . ?   ! ° ¹ ² ³ µ ¶ © ® "!§ _ / \ \ ` \  \  " ;  
 v a r   f u l l S e t S e c u r e S p a c e           =   " 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S~^ß à á â ã ä å æ ç è é ê ë ì í î ï ñ ò ó ô õ ö ø ù ú û ü 1_ÿ A B C D E F G H I J K L M O N P Q R S T U V W X Y Z `R}xÀ Á Â Ã Ä Å Æ Ç È É Ê Ë Ì Í Î Ï Ñ Ò Ó Ô Õ Ö Ø Ù Ú Û Ü 00 1 2 3 4 5 6 7 8 9 -   ! ¬ £ $ ¤ ¥ ¢ % 0 ¼ ½ ¾ ^ & * ( ) + = × ÷ ± { } [ ] : ; @ ~ # | < > , . ?   ! ° ¹ ² ³ µ ¶ © ® "!§ _ / \ \ ` \  \  \ n \ r \ t   " ;  
  
  
 / /   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S~^ß à á â ã ä å æ ç è é ê ë ì í î ï ñ ò ó ô õ ö ø ù ú û ü 1_ÿ  
 / /   A B C D E F G H I J K L M O N P Q R S T U V W X Y Z  
 / /   `R}xÀ Á Â Ã Ä Å Æ Ç È É Ê Ë Ì Í Î Ï Ñ Ò Ó Ô Õ Ö Ø Ù Ú Û Ü 0 
 / /   0 1 2 3 4 5 6 7 8 9  
 / /   -   ! ¬ £ $ ¤ ¥ ¢ % 0 ¼ ½ ¾ ^ & * ( ) + = × ÷ ± { } [ ] : ; @ ~ # | < > , . ?   ! ° ¹ ² ³ µ ¶ © ® "!§ _ / \ \  
 / /   \ ' \ " \  \  \  \   
 / /   \ n \ r \ t  
  
  
 / /   C h e c k   i f   s o m e t h i n g   w a s   e n t e r e d   i n   t h e   i n p u t   f i e l d :  
 f u n c t i o n   v a l i d a t e T e x t N o t E m p t ( f o r m , f o r m F i e l d , f o r m F i e l d D e s c )  
 {  
     i f   ( d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . v a l u e   = =   " " )  
     {  
         a l e r t ( ' Y o u   m u s t   e n t e r   s o m e t h i n g   i n t o   t h e   \ " '   +   f o r m F i e l d D e s c   +   ' \ "   f i e l d ! ' ) ;  
         d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . f o c u s ( ) ;  
         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 ) ;  
     }  
 }  
  
  
 / /   C h e c k   i f   t h e r e   a r e   t o o   f e w   c h a r a c t e r s   i n   t h e   i n p u t   f i e l d :  
 f u n c t i o n   v a l i d a t e T e x t M i n i m u m ( f o r m , f o r m F i e l d , f o r m F i e l d D e s c , f o r m F i e l d M i n C h a r )  
 {  
     i f   ( d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . v a l u e . l e n g t h   <   f o r m F i e l d M i n C h a r )  
     {  
         a l e r t ( ' Y o u   m u s t   e n t e r   s o m e t h i n g   i n t o   t h e   \ " '   +   f o r m F i e l d D e s c   +   ' \ "   f i e l d ,   c o n t a i n i n g   n o   l e s s   t h a n   '   +   f o r m F i e l d M i n C h a r   +   '   c h a r a c t e r s ! ' ) ;  
         d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . f o c u s ( ) ;  
         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 ) ;  
     }  
 }  
  
  
 / /   C h e c k   i f   t h e r e   a r e   t o o   m a n y   c h a r a c t e r s   i n   t h e   i n p u t   f i e l d :  
 f u n c t i o n   v a l i d a t e T e x t M a x i m u m ( f o r m , f o r m F i e l d , f o r m F i e l d D e s c , f o r m F i e l d M a x C h a r )  
 {  
     i f   ( d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . v a l u e . l e n g t h   >   f o r m F i e l d M a x C h a r )  
     {  
         a l e r t ( ' Y o u   m u s t   e n t e r   s o m e t h i n g   i n t o   t h e   \ " '   +   f o r m F i e l d D e s c   +   ' \ "   f i e l d ,   c o n t a i n i n g   n o   m o r e   t h a n   '   +   f o r m F i e l d M a x C h a r   +   '   c h a r a c t e r s ! ' ) ;  
         d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . f o c u s ( ) ;  
         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 ) ;  
     }  
 }  
  
  
 / /   C h e c k   i f   t h e r e   i s   a n   e m a i l   a d d r e s s   i n   t h e   i n p u t   f i e l d :  
 f u n c t i o n   v a l i d a t e T e x t I s E m a i l ( f o r m , f o r m F i e l d , f o r m F i e l d D e s c )  
 {  
     v a r   t e x t C h e c k   =   f a l s e ;  
     / /   C h e c k   i f   s o m e t h i n g   w a s   e n t e r e d   i n   t h e   i n p u t   f i e l d :  
     i f   ( d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . v a l u e   ! =   " " )  
     {  
         w i t h   ( d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] )  
         {  
             / /   C h e c k   t h a t   t h e   i n p u t   f i e l d   c o n t a i n s   a t   l e a s t   a n   @   s i g n   a n d   a   d o t   ( . ) .  
             / /   T h e   @   m u s t   n o t   b e   t h e   f i r s t   c h a r a c t e r   o f   t h e   e m a i l   a d d r e s s .  
             / /   T h e   l a s t   d o t   m u s t   a t   l e a s t   b e   o n e   c h a r a c t e r   a f t e r   t h e   @   s i g n :  
             v a r   a t p o s   =   v a l u e . i n d e x O f ( " @ " ) ;  
             v a r   d o t p o s   =   v a l u e . l a s t I n d e x O f ( " . " ) ;  
             i f   ( a t p o s   <   1   | |   d o t p o s   -   a t p o s   <   2 )  
             {  
                 t e x t C h e c k   =   t r u e ;  
             }  
         }  
     }  
     i f   ( t e x t C h e c k )  
     {  
         a l e r t ( ' Y o u   m u s t   e n t e r   s o m e t h i n g   i n t o   t h e   \ " '   +   f o r m F i e l d D e s c   +   ' \ "   f i e l d ,   i n   t h e   f o r m   o f   a   v a l i d   e m a i l   a d d r e s s ! \ n \ n E x a m p l e :   u s e r @ d o m a i n . c o m ' ) ;  
         d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . f o c u s ( ) ;  
         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 ) ;  
     }  
 }  
  
  
 / /   C h e c k   i f   a   t i c k   h a s   b e e n   e n t e r e d   i n   t h e   i n p u t   f i e l d :  
 f u n c t i o n   v a l i d a t e C h e c k b o x ( f o r m , f o r m F i e l d , f o r m F i e l d D e s c )  
 {  
     i f   ( ! d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . c h e c k e d )  
     {  
         a l e r t ( ' Y o u   m u s t   c h e c k   t h e   \ " '   +   f o r m F i e l d D e s c   +   ' \ "   b o x ! ' ) ;  
         d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . f o c u s ( ) ;  
         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 ) ;  
     }  
 }  
  
  
 / /   C h e c k   i f   a   r a d i o   b u t t o n   h a s   b e e n   s e l e c t e d   i n   t h e   i n p u t   f i e l d :  
 f u n c t i o n   v a l i d a t e R a d i o ( f o r m , f o r m F i e l d , f o r m F i e l d D e s c )  
 {  
     v a r   r a d i o S e l e c t e d   =   f a l s e ;  
     v a r   i n c r e m e n t ;  
     f o r   ( i n c r e m e n t   =   0 ;   i n c r e m e n t   <   d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . l e n g t h ;   i n c r e m e n t   + + )  
     {  
         i f   ( d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] [ i n c r e m e n t ] . c h e c k e d )  
         {  
             r a d i o S e l e c t e d   =   t r u e ;  
         }  
     }  
     i f   ( ! r a d i o S e l e c t e d )  
     {  
         a l e r t ( ' Y o u   m u s t   c h o o s e   o n e   o f   t h e   \ " '   +   f o r m F i e l d D e s c   +   ' \ "   o p t i o n s ! ' ) ;  
         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 ) ;  
     }  
 }  
  
  
 / /   C h e c k   i f   a n   o p t i o n   h a s   b e e n   s e l e c t e d :  
 f u n c t i o n   v a l i d a t e S e l e c t C h o o s e ( f o r m , f o r m F i e l d , f o r m F i e l d D e s c )  
 {  
     i f   ( d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . s e l e c t e d I n d e x   <   0 )  
     {  
         a l e r t ( ' Y o u   m u s t   c h o o s e   o n e   o f   t h e   \ " '   +   f o r m F i e l d D e s c   +   ' \ "   o p t i o n s ! ' ) ;  
         d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . f o c u s ( ) ;  
         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 ) ;  
     }  
 }  
  
  
 / /   C h e c k   i f   a n   o p t i o n ,   o t h e r   t h a n   t h e   f i r s t   o n e ,   h a s   b e e n   s e l e c t e d :  
 f u n c t i o n   v a l i d a t e S e l e c t S e c o n d ( f o r m , f o r m F i e l d , f o r m F i e l d D e s c )  
 {  
     i f   ( d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . s e l e c t e d I n d e x   = =   0 )  
     {  
         a l e r t ( ' Y o u   c a n n o t   c h o o s e   t h e   f i r s t   o f   t h e   \ " '   +   f o r m F i e l d D e s c   +   ' \ "   o p t i o n s ! ' ) ;  
         d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . f o c u s ( ) ;  
         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 ) ;  
     }  
 }  
  
  
 / /   C h e c k   i f   t h e r e   a r e   i l l e g a l   c h a r a c t e r s   i n   t h e   i n p u t   f i e l d :  
 f u n c t i o n   v a l i d a t e T e x t C o n t a i n ( f o r m , f o r m F i e l d , f o r m F i e l d D e s c , f o r m C h a r )  
 {  
     v a r   t e x t C h e c k   =   f a l s e ;  
     / /   S e t   t h e   m o s t   c o m m o n   c h a r a c t e r   s e t s :  
     i f             ( f o r m C h a r   = =   " n u m e r i c " )                                 {   f o r m C h a r   =   n u m e r i c ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " n u m e r i c C a l c u l a t e " )               {   f o r m C h a r   =   n u m e r i c C a l c u l a t e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " n u m e r i c T e l e p h o n e " )               {   f o r m C h a r   =   n u m e r i c T e l e p h o n e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " n u m e r i c T i m e " )                         {   f o r m C h a r   =   n u m e r i c T i m e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " h e x a d e c i m a l L o w e r " )               {   f o r m C h a r   =   h e x a d e c i m a l L o w e r ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " h e x a d e c i m a l U p p e r " )               {   f o r m C h a r   =   h e x a d e c i m a l U p p e r ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " h e x a d e c i m a l B o t h " )                 {   f o r m C h a r   =   h e x a d e c i m a l B o t h ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c C a r R e g " )           {   f o r m C h a r   =   a l p h a n u m e r i c C a r R e g ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c U R L " )                 {   f o r m C h a r   =   a l p h a n u m e r i c U R L ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c E m a i l " )             {   f o r m C h a r   =   a l p h a n u m e r i c E m a i l ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c R o o m " )               {   f o r m C h a r   =   a l p h a n u m e r i c R o o m ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c L o w e r " )             {   f o r m C h a r   =   a l p h a n u m e r i c L o w e r ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c L o w e r S p a c e " )   {   f o r m C h a r   =   a l p h a n u m e r i c L o w e r S p a c e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c U p p e r " )             {   f o r m C h a r   =   a l p h a n u m e r i c U p p e r ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c U p p e r S p a c e " )   {   f o r m C h a r   =   a l p h a n u m e r i c U p p e r S p a c e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c B o t h " )               {   f o r m C h a r   =   a l p h a n u m e r i c B o t h ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c B o t h S p a c e " )     {   f o r m C h a r   =   a l p h a n u m e r i c B o t h S p a c e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a L o w e r " )                           {   f o r m C h a r   =   a l p h a L o w e r ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a L o w e r S p a c e " )                 {   f o r m C h a r   =   a l p h a L o w e r S p a c e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a U p p e r " )                           {   f o r m C h a r   =   a l p h a U p p e r ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a U p p e r S p a c e " )                 {   f o r m C h a r   =   a l p h a U p p e r S p a c e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a B o t h " )                             {   f o r m C h a r   =   a l p h a B o t h ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a B o t h S p a c e " )                   {   f o r m C h a r   =   a l p h a B o t h S p a c e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a N a m e S p a c e " )                   {   f o r m C h a r   =   a l p h a N a m e S p a c e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " f u l l S e t " )                                 {   f o r m C h a r   =   f u l l S e t ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " f u l l S e t S p a c e " )                       {   f o r m C h a r   =   f u l l S e t S p a c e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " f u l l S e t S e c u r e " )                     {   f o r m C h a r   =   f u l l S e t S e c u r e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " f u l l S e t S e c u r e S p a c e " )           {   f o r m C h a r   =   f u l l S e t S e c u r e S p a c e ;   }  
     e l s e                                                                                       {   f o r m C h a r   =   f o r m C h a r ;   }  
     / /   C h e c k   f o r m F i e l d   f o r   i l l e g a l   c h a r a c t e r s   f r o m   f o r m C h a r :  
     f o r   ( i n c r e m e n t   =   0 ;   i n c r e m e n t   <   d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . v a l u e . l e n g t h ;   i n c r e m e n t   + + )  
     {  
         v a r   c h   =   d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . v a l u e . c h a r A t ( i n c r e m e n t ) ;  
         v a r   i n c r e m e n t ;  
         v a r   p o s i t i o n ;  
         f o r   ( p o s i t i o n   =   0 ;   p o s i t i o n   <   f o r m C h a r . l e n g t h ;   p o s i t i o n   + + )  
         {  
             i f   ( c h   = =   f o r m C h a r . c h a r A t ( p o s i t i o n ) )  
             {  
                 b r e a k ;  
             }  
         }  
         i f   ( p o s i t i o n   = =   f o r m C h a r . l e n g t h )  
         {  
             t e x t C h e c k   =   t r u e ;  
             b r e a k ;  
         }  
     }  
     i f   ( t e x t C h e c k )  
     {  
         a l e r t ( ' Y o u   m u s t   e n t e r   s o m e t h i n g   i n t o   t h e   \ " '   +   f o r m F i e l d D e s c   +   ' \ "   f i e l d ,   u s i n g   o n l y   v a l i d   c h a r a c t e r s ! \ n \ n \ I f   y o u   a r e   c o p y i n g   a n d   p a s t i n g   f r o m   a n o t h e r   s o u r c e ,   s u c h   a s   a n   e m a i l ,   p l e a s e   e n s u r e   t h a t   y o u   o n l y   i n c l u d e   t h e   n e c e s s a r y   c h a r a c t e r s . \ n \ n E x a m p l e :   '   +   f o r m C h a r ) ;  
         d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . f o c u s ( ) ;  
         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 ) ;  
     }  
 }  
  
  
 / /   S t r i p   o u t   h i g h   n u m b e r e d   ( n o n = L a t i n )   u n i c o d e   c h a r a c t e r s   t o   a l l o w   f o r m   f i e l d   s u b m i s s i o n   t o   a   d a t a b a s e   f i e l d   u s i n g   v a r c h a r :  
 f u n c t i o n   c h a r C l e a n u p ( f o r m , f o r m F i e l d , f o r m F i e l d D e s c , f o r m C h a r )  
 {  
     v a r   t e x t C h e c k     =   f a l s e ;  
     v a r   t e x t O u t p u t   =   ' '  
     / /   S e t   t h e   m o s t   c o m m o n   c h a r a c t e r   s e t s :  
     i f             ( f o r m C h a r   = =   " n u m e r i c " )                                 {   f o r m C h a r   =   n u m e r i c ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " n u m e r i c C a l c u l a t e " )               {   f o r m C h a r   =   n u m e r i c C a l c u l a t e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " n u m e r i c T e l e p h o n e " )               {   f o r m C h a r   =   n u m e r i c T e l e p h o n e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " n u m e r i c T i m e " )                         {   f o r m C h a r   =   n u m e r i c T i m e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " h e x a d e c i m a l L o w e r " )               {   f o r m C h a r   =   h e x a d e c i m a l L o w e r ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " h e x a d e c i m a l U p p e r " )               {   f o r m C h a r   =   h e x a d e c i m a l U p p e r ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " h e x a d e c i m a l B o t h " )                 {   f o r m C h a r   =   h e x a d e c i m a l B o t h ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c C a r R e g " )           {   f o r m C h a r   =   a l p h a n u m e r i c C a r R e g ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c U R L " )                 {   f o r m C h a r   =   a l p h a n u m e r i c U R L ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c E m a i l " )             {   f o r m C h a r   =   a l p h a n u m e r i c E m a i l ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c R o o m " )               {   f o r m C h a r   =   a l p h a n u m e r i c R o o m ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c L o w e r " )             {   f o r m C h a r   =   a l p h a n u m e r i c L o w e r ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c L o w e r S p a c e " )   {   f o r m C h a r   =   a l p h a n u m e r i c L o w e r S p a c e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c U p p e r " )             {   f o r m C h a r   =   a l p h a n u m e r i c U p p e r ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c U p p e r S p a c e " )   {   f o r m C h a r   =   a l p h a n u m e r i c U p p e r S p a c e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c B o t h " )               {   f o r m C h a r   =   a l p h a n u m e r i c B o t h ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a n u m e r i c B o t h S p a c e " )     {   f o r m C h a r   =   a l p h a n u m e r i c B o t h S p a c e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a L o w e r " )                           {   f o r m C h a r   =   a l p h a L o w e r ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a L o w e r S p a c e " )                 {   f o r m C h a r   =   a l p h a L o w e r S p a c e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a U p p e r " )                           {   f o r m C h a r   =   a l p h a U p p e r ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a U p p e r S p a c e " )                 {   f o r m C h a r   =   a l p h a U p p e r S p a c e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a B o t h " )                             {   f o r m C h a r   =   a l p h a B o t h ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a B o t h S p a c e " )                   {   f o r m C h a r   =   a l p h a B o t h S p a c e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " a l p h a N a m e S p a c e " )                   {   f o r m C h a r   =   a l p h a N a m e S p a c e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " f u l l S e t " )                                 {   f o r m C h a r   =   f u l l S e t ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " f u l l S e t S p a c e " )                       {   f o r m C h a r   =   f u l l S e t S p a c e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " f u l l S e t S e c u r e " )                     {   f o r m C h a r   =   f u l l S e t S e c u r e ;   }  
     e l s e   i f   ( f o r m C h a r   = =   " f u l l S e t S e c u r e S p a c e " )           {   f o r m C h a r   =   f u l l S e t S e c u r e S p a c e ;   }  
     e l s e                                                                                       {   f o r m C h a r   =   f o r m C h a r ;   }  
     / /   C h e c k   f o r m F i e l d   f o r   i l l e g a l   c h a r a c t e r s   f r o m   f o r m C h a r :  
     f o r   ( i n c r e m e n t   =   0 ;   i n c r e m e n t   <   d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . v a l u e . l e n g t h ;   i n c r e m e n t   + + )  
     {  
         v a r   c h   =   d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . v a l u e . c h a r A t ( i n c r e m e n t ) ;  
         v a r   i n c r e m e n t ;  
         v a r   p o s i t i o n ;  
         f o r   ( p o s i t i o n   =   0 ;   p o s i t i o n   <   f o r m C h a r . l e n g t h ;   p o s i t i o n   + + )  
         {  
             i f   ( c h   = =   f o r m C h a r . c h a r A t ( p o s i t i o n ) )  
             {  
                 t e x t O u t p u t   =   t e x t O u t p u t   +   c h ;  
                 b r e a k ;  
             }  
         }  
         i f   ( p o s i t i o n   = =   f o r m C h a r . l e n g t h )  
         {  
             / /   R e p l a c e   h i g h   n u m b e r e d   u n i c o d e   c h a r a c t e r s   w i t h   % X X X X   v a l u e s   ( o p t i o n a l ) :  
             / / t e x t O u t p u t   =   t e x t O u t p u t   +   e s c a p e ( c h ) ;  
             t e x t C h e c k   =   t r u e ;  
         }  
     }  
     / /   I n j e c t   c l e a n e d   t e x t   b a c k   i n t o   t e x t a r e a   b o x :  
     d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . v a l u e   =   t e x t O u t p u t ;  
     i f   ( t e x t C h e c k )  
     {  
         a l e r t ( ' I l l e g a l   ( n o n - L a t i n )   c h a r a c t e r s   r e m o v e d   f r o m   t h e   \ " '   +   f o r m F i e l d D e s c   +   ' \ "   f i e l d . ' ) ;  
     }  
     / /   S c r o l l   t o   b o t t o m   o f   t e x t a r e a   b o x :  
     d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . s c r o l l T o p   =   d o c u m e n t . f o r m s [ f o r m ] . e l e m e n t s [ f o r m F i e l d ] . s c r o l l H e i g h t ;  
 }  
  
  
 / /   T e x t a r e a   c h a r a c t e r   c o u n t e r :  
 f u n c t i o n   c h a r a c t e r C o u n t ( t e x t E n t e r e d , m a x L e n g t h , I D )  
 {  
     / /   C a n   t h e   b r o w s e r   h a n d l e   D O M   o b j e c t s ?  
     i f   ( d o c u m e n t . g e t E l e m e n t B y I d )  
     {  
         / /   Y e s ,   t h e   b r o w s e r   c a n   h a n d l e   D O M   o b j e c t s ,   s o   c o n t i n u e :  
         v a r   l e n g t h   =   n e w   S t r i n g ( t e x t E n t e r e d . v a l u e ) . l e n g t h ;  
         / /   H a s   a   m a x i m i u m   l e n g t h   b e e n   s u p p l i e d ?  
         i f   ( m a x L e n g t h   >   0 )  
         {  
             / /   H a s   t h e   m a x i m u m   b e e n   e x c e d e d ?  
             i f   ( m a x L e n g t h   <   l e n g t h )  
             {  
                 d o c u m e n t . g e t E l e m e n t B y I d ( I D ) . i n n e r H T M L   =   ' ( < s t r o n g > W a r n i n g : < / s t r o n g >   Y o u   h a v e   e x c e d e d   t h e   m a x i m u m   o f   '   +   m a x L e n g t h   +   '   c h a r a c t e r s ! ) ' ;  
             }  
             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 ( I D ) . i n n e r H T M L   =   ' ( '   +   l e n g t h   +   '   c h a r a c t e r s   e n t e r e d ,   w i t h   a   m a x i m u m   o f   '   +   m a x L e n g t h   +   '   c h a r a c t e r s ! ) ' ;  
             }  
         }  
         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 ( I D ) . i n n e r H T M L   =   ' ( '   +   l e n g t h   +   '   c h a r a c t e r s   e n t e r e d ! ) ' ;  
         }  
     }  
 } 
