ASP心得（二进制转10进制）[第一篇]

<%
a=01101110'八位2进制数，随便改
b=Len(a)
m=0
For i = -b to -1
d=mid(a,i+b+1,1)
c=(d*2)^(abs(i)-1)
If (abs(i)=1) And (d=0) Then'因为0^0为1，但实际我们需要0
response.write c-1&"="
elseif abs(i)=1 Then
response.write c&"="
Else
response.write c&"+"
End if
If (abs(i)=1) And (d=0) Then'这个是运算结果用的，是一样的，我们需要0，多了一个1，键去它
m=m+c-1
Else
m=m+c
End If
next
response.write (m)
%>
这是一个2进制转十进制的代码
一开始老出现错误，发现
Mid()和Len()函数只有在左起不为零的一位数才开始算第一位，依次类推Left()与Right()也应该如此
进行更正后，第一个Mid(a,1,1)就不是第八位了，不过影响不大
自己总结得出进制某位数大小
应为其值乘以进制值的位数减一次方
比如十进制
10二位
进制值为10
那么十进制转十进制就为
1*（10^(2-1)）其他位数均为如此