深圳网站建设技术博客

'**************************检查是否是手机号码************************
function checkMobile(no)
 if no ="" or isnull(no) = true then
    checkMobile=false
    exit function
 end if
 if len(no) <>11 then
        checkMobile=false
     exit function
 end if
 if left(no,2) = 13  or left(no,2) = 14  or left(no,2) = 15 or left(no,2) = 18 then
       checkMobile=true
 else
       checkMobile=false
       exit function
 end if
end function