<?xml version="1.0" encoding="utf-8" ?><rss version="2.0"><channel><title><![CDATA[softjo的专栏]]></title><description><![CDATA[]]></description><link>https://blog.youkuaiyun.com/softjo</link><language>zh-cn</language><generator>https://blog.youkuaiyun.com/</generator><copyright><![CDATA[Copyright &copy; softjo]]></copyright><item><title><![CDATA[asp 的DES加密文件 ]]></title><link>https://blog.youkuaiyun.com/softjo/article/details/321207</link><guid>https://blog.youkuaiyun.com/softjo/article/details/321207</guid><author>softjo</author><pubDate>Wed, 16 Mar 2005 16:26:00 +0800</pubDate><description><![CDATA[Option ExplicitRedim 作者:softjo,网址:http://www.xinxiw.com,希望能够对大家有所帮助Public Function bit2byte(s)Dim s2Dim xDim i, kDim ilenilen = Len(s)Dim B()Dim s1()ReDim s1(ilen)ReDim B(ilen * 8)s2 = ""For i = 1 To ]]></description><category></category></item></channel></rss>