ASP转换十进制为二进制的函数
来源:ASP学习网 作者:Admin 时间:08-08-10 点击:
function zhuan(m) '翻译数据
for i=0 to 12
p=m mod 2
if p=1 then
have=have&i&","
end if
m=int(m/2)
if m=0 then
zhuan=have
exit function
end if
next
end function
for i=0 to 12
p=m mod 2
if p=1 then
have=have&i&","
end if
m=int(m/2)
if m=0 then
zhuan=have
exit function
end if
next
end function
上一篇：asp截取字符串的两种应用
下一篇：在ASP中实现RsA加密与解密