ASP(VBScript)二、八、十、十六进制转换

作者:vkvi 来源:千一网络(原创) 日期:2009-4-22

十进制转换成二进制

function DecToBin(number)
    dim remainder
    remainder = number
    do while remainder > 0
        DecToBin = CStr(remainder mod 2) & DecToBin
        remainder = remainder \ 2
    loop
end function
 
document.write(DecToBin(8) & "<br>") ' 显示为 1000

十进制转换成八进制

Oct(number)

返回表示数字八进制值的字符串。

document.write(Oct(10) & "<br>") ' 显示为 12

十进制转换成十六进制

Hex(number)

返回表示十六进制数字值的字符串。

document.write(Hex(10) & "<br>") ' 显示为 A,注意是大写。

二进制转换成十进制

function BinToDec(binStr)
    dim i
    for i = 1 to Len(binStr)
        BinToDec = BinToDec + (CInt(Mid(binStr, i, 1)) * (2 ^ (Len(binStr) - i)))
    next
end function
 
document.write(BinToDec("1010") & "<br>") ' 显示为 10

八进制转换成十进制

使用 &0。数字 0,不是字母 o。

document.write(&010 & "<br>") ' 显示为 8
document.write(Int("&0" + "10") & "<br>") ' 显示为 8

十六进制转换成十进制

使用 &H。

document.write(&HA & "<br>") ' 显示为 10
document.write(Int("&H" + "A") & "<br>") ' 显示为 10

关于 Int、CInt 的区别,请参见 Fix、Int、Round、CInt

你前面那位网友看了:如何让 RadioButtonList、CheckBoxList 横着显示

▲▲▲嘿,欢迎转载传播本站原创文章,尽量保留来源噢。▲▲▲

文章评论
  • 1 楼:ayanmw
    很好 不过 貌似,,,,上面 是不是 把ASP 的vbs和 JS混写了???

    document.write(&HA & "<br>") ' 显示为 10
    document.write(Int("&H" + "A") & "<br>") ' 显示为 10

    该是:

    response.write (&HA & "<br>") ' 显示为 10
    document.write(Int("&H" & "A") & "<br>") ' 显示为 10
  • 2 楼:ayanmw
    哦哦哦  学习了...
    上面应该是:
    response.write(&HA & "<br>") ' 显示为 10
    response.write(Int("&H" + "A") & "<br>") ' 显示为 10

    的确是 Int("&H"+"A")
    我还以为是把+改成&  其实就是加号+ ,但是有点不明白了..这里加号什么意思
标题:必填
内容:
本站永远终止与捏造“罪名”不支付广告费的某度联盟合作。
vkvi
vkvi

作者简介: vkvi,致力于 .NET Web 开发、移动开发的技术推广,在 .NET、SQL Server、Windows Server 等方面有深入研究和丰富经验,10 年间共计撰写文章 4000 余篇。 主持金融、国土、农业、电商等多个行业项目执行, 推行“技术提升生产力、人心决定成功率”的管理理论。 联系他