欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  IT编程

ASP字符串转换为整形、双精度型、布尔

程序员文章站 2022-05-03 12:33:56
rem 将字符串转换为整形数据 function tointeger(str,num)      &n...
rem 将字符串转换为整形数据
function tointeger(str,num)
        str=trim(str)
        if str="" or not isnumeric(str) then
              tointeger=num
        else
              tointeger=clng(str)
        end if
end function

rem 将字符串转换为双精度型数据
function todouble(str)
       str=trim(str)
       if str="" or not isnumeric(str) then
              todouble=0.0
      else
              todouble=cdbl(str)
      end if
end function

rem 将字符串转换为布尔数据
function toboolean(str)
      str=lcase(trim(str))
      if str="true" or str="t" then
            toboolean=true
     elseif isnumeric(str) then
            if clng(str)<>0 then toboolean=true
     else
           toboolean=false
    end if
end function