订阅本栏目 RSS您所在的位置: 深山工作室 > asp函数库 > 正文

asp用cDec将二进制转十进制然后再用cBit将十进制转二进制

网络 2019/11/10 20:41:11 字体: 浏览 2138
<%
'asp将二进制转十进制,使用方法:cDec(11010)
function cDec(num)
cDecstr=0
if len(num)>0 and isnumeric(num) then
for inum=0 to len(num)-1
cDecstr=cDecstr+2^inum*cint(mid(num,len(num)-inum,1))
next
end if
cDec=cDecstr
end function

'asp将二进制转十进制,使用方法:cDec(11010)
function cDec(num)
cDecstr=0
if len(num)>0 and isnumeric(num) then
for inum=0 to len(num)-1
cDecstr=cDecstr+2^inum*cint(mid(num,len(num)-inum,1))
next
end if
cDec=cDecstr
end function


'asp将十进制转二进制,使用方法:cBit(26)
function cBit(num)
cBitstr=""
if len(num)>0 and isnumeric(num) then
do while not num \ 2 < 1
cBitstr=(num mod 2) &cBitstr
num=num \ 2
loop
end if
cbit=num&cBitstr
end function


'asp将十六进制转二进制,使用方法:HcB(26)
function HcB(num)
if len(num)>0 then
HcBstr=""
for i=1 to len(num)
select case (mid(num,i,1))
case "0" HcBstr=HcBstr&"0000"
case "1" HcBstr=HcBstr&"0001"
case "2" HcBstr=HcBstr&"0010"
case "3" HcBstr=HcBstr&"0011"
case "4" HcBstr=HcBstr&"0100"
case "5" HcBstr=HcBstr&"0101"
case "6" HcBstr=HcBstr&"0110"
case "7" HcBstr=HcBstr&"0111"
case "8" HcBstr=HcBstr&"1000"
case "9" HcBstr=HcBstr&"1001"
case "A" HcBstr=HcBstr&"1010"
case "B" HcBstr=HcBstr&"1011"
case "C" HcBstr=HcBstr&"1100"
case "D" HcBstr=HcBstr&"1101"
case "E" HcBstr=HcBstr&"1110"
case "F" HcBstr=HcBstr&"1111"
end select
next
end if
HcB=HcBstr
end function


'十进制转十六进制 Hex(num)
function HcO(num)'十六进制转八进制
HcO=Oct(HcD(num))
end function


'十进制转八进制 Oct(num)
function HcD(num)'十六进制转十进制
HcD=cDec(HcB(num))
end function
%>


相关阅读
ASP FSO读取XX文件夹下的所有文件与创建使用时间
Javascript实现CSS代码高亮显示
uni-app微信小程序分享微信好友与分享到朋友圈功能
提交按钮在自定时间内灰色不可用
深山行者留言系统V2.0 (简称留言板V2.0)
生成最新日期与时间选择(年月日)下拉框
诸城阳光旅行社
公众号被动回复与客服接口主动推送音乐封面缩略图ThumbMediaId不显示bug问题
共有0条关于《asp用cDec将二进制转十进制然后再用cBit将十进制转二进制》的评论
发表评论
正在加载评论......
返回顶部发表评论
呢 称:
表 情:
内 容:
评论内容:不能超过 1000 字,需审核,请自觉遵守互联网相关政策法规。
验证码: 验证码 
网友评论声明,请自觉遵守互联网相关政策法规。

您发布的评论即表示同意遵守以下条款:
一、不得利用本站危害国家安全、泄露国家秘密,不得侵犯国家、社会、集体和公民的合法权益;
二、不得发布国家法律、法规明令禁止的内容;互相尊重,对自己在本站的言论和行为负责;
三、本站对您所发布内容拥有处置权。

更多信息>>栏目类别选择
百度小程序开发
微信小程序开发
微信公众号开发
uni-app
asp函数库
ASP
DIV+CSS
HTML
更多>>同类信息
asp利用hasOwnProperty验证某个json中的某个标签是否存在
asp用BcO将二进制转八进制然后再OcB将八进制转二进制
asp用BcH将二进制转十六进制然后再HcB将十六进制转二进制
asp用cDec将二进制转十进制然后再用cBit将十进制转二进制
纯asp根据当前日期计算出相应的星座
asp采用access数据库搜索信息时因为日文片假名问题提示“Microsoft JET Database Engine 错误80040e14”的解决方法
更多>>最新添加文章
呼伦贝尔市北天草原旅行社有限公司
四川悠旅地旅游有限公司
连云港五洲旅行社有限公司
邓州市途鸿旅行社
连云港华夏国际旅行社有限公司
重庆长航江山国际旅行社
松原市海航商务旅行社
广西亚太国际旅行社有限公司
更多>>随机抽取信息
设置两个未知高度的DIV保持等高
旅行社手机网站模板3
松原市海航商务旅行社
调整CSS类型的顺序改变链接翻滚效果
连云港华夏国际旅行社
asp无限级调用分类显示