简单 for 循环的有关问题

简单 for 循环的问题！
我用 base64加密，想把加密到的结果再进行加密，循环3次。解密的时候 也解密循环3次得到原值。

<%
i = B64Encode("10") 
response.write i
%>

如何让得到的结果再做加密3次？

------解决方案--------------------

VBScript code

i = B64Encode(B64Encode(B64Encode("10")))  
response.write i
s = B64Decode(B64Decode(B64Decode(i)))
response.write s