ÿþf u n c t i o n   I s E m p t y ( a T e x t F i e l d )   {  
       i f   ( ( a T e x t F i e l d . v a l u e . l e n g t h = = 0 )   | |  
       ( a T e x t F i e l d . v a l u e = = n u l l ) )   {  
             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 s N u m e r i c ( s T e x t )  
 {  
       v a r   V a l i d C h a r s   =   " 0 1 2 3 4 5 6 7 8 9 " ;  
       v a r   I s N u m b e r = t r u e ;  
       v a r   C h a r ;  
    
       f o r   ( i   =   0 ;   i   <   s T e x t . l e n g t h   & &   I s N u m b e r   = =   t r u e ;   i + + )    
             {    
             C h a r   =   s T e x t . c h a r A t ( i ) ;    
             i f   ( V a l i d C h a r s . i n d e x O f ( C h a r )   = =   - 1 )    
                   {  
                   I s N u m b e r   =   f a l s e ;  
                   }  
             }  
       r e t u r n   I s N u m b e r ;  
        
       }  
  
  
 f u n c t i o n   i s V a l i d E m a i l ( s t r )   {  
       r e t u r n   ( s t r . l a s t I n d e x O f ( " . " )   >   2 )   & &   ( s t r . i n d e x O f ( " @ " )   >   0 ) ;  
 }  
 
