zoukankan      html  css  js  c++  java
  • 中文姓名的VbScript验证方法

            <script language=vbscript>
            
    'xm 姓名
            function valiName(xm)
                ret 
    = true
                
    for i = 1 to len(xm)
                    
    if asc(mid(xm, i, 1)) >= 0 and asc(mid(xm, i, 1)) <= 128 then
                        ret 
    = false
                        
    exit for
                    
    end if
                
    next
                valiName 
    = ret
            
    end function
            
            
    'mc 名称
            'g 不能连续出现的英文字符
            'h 不能连续出现的相同的中文字符
            function valiNameContinuousChar(mc, g, h)
                c 
    = 0 : d = 0
                b 
    = false
                last 
    = ""
                
    for i = 1 to len(mc)
                    
    if last <> "" and last = mid(mc, i, 1then
                        d 
    = d + 1
                    
    end if
                    
    if asc(mid(mc, i, 1)) > 0 then
                        
    if not b then
                            b 
    = true
                        
    end if
                        c 
    = c + 1
                        
    if c >= g then exit for
                    
    else
                        b 
    = false
                        c 
    = 0
                    
    end if
                    last 
    = mid(mc, i, 1)
                
    next
                valiNameContinuousChar 
    = c < g and d <= h - 2
            
    end function
            
    </script>
  • 相关阅读:
    PHP IDE NetBeans代码主题和除掉竖线解决方案
    初识Python
    从LazyPhp说起
    从Pycharm说起
    准备系统地研究一下"高性能网站开发",挑战很大,希望能坚持到底!
    IIS日志分析[资源]
    见一好东西:Threaded WebDownload class with Progress Callbacks
    ASP.net Application 中使用域用户登录
    看图找错
    汉字转拼音缩写的函数(C#)
  • 原文地址:https://www.cnblogs.com/faib/p/797718.html
Copyright © 2011-2022 走看看