| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1061 人关注过本帖
标题:兰姆达表达式 C#代码 用VB代码疑问,这个是查资料套上的。 不知道为什么这样 ...
只看楼主 加入收藏
hn496658432
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2014-4-8
结帖率:0
收藏
已结贴  问题点数:20 回复次数:4 
兰姆达表达式 C#代码 用VB代码疑问,这个是查资料套上的。 不知道为什么这样可以成功
array as sbyte()=new sbyte() { -84 , 99 , -7 }
c#.NET代码:
System.Array.ConvertAll<sbyte, byte>(array, a => (byte) a)
代码:
System.Array.ConvertAll(Of SByte, Byte)(array, Function(a) (IIf(a > 0, a, 256 - Math.Abs(a))))
array参数是定义好的sbyte()
套嵌 iif(a>0,cbyte(a),cbyte(256-Math.Abs(a))) 时候出错,array数组里面有负数
把cbyte 壳去掉竟然好了
里面没有更好的转换方法么?将SBbyte转换Byte

完整过程代码】
    Public Shared Function DecryptionKEY(ByVal message As String) As String
        Try
            Dim keystring As String = "q1!2@3#we>WacE/.Q,?<b"
            Dim array As SByte() = New SByte() {-87, -101, -56, 50, &H56, &H35, -29, 3}
            Dim num As Integer = &H13
            Dim generator As New PKCSKeyGenerator(keystring, System.Array.ConvertAll(Of SByte, Byte)(array, Function(a) (IIf(a > 0, a, 256 - Math.Abs(a)))), num, 1)
            Dim inputBuffer As Byte() = Convert.FromBase64String(message)
            Dim bytes As Byte() = generator.Decryptor.TransformFinalBlock(inputBuffer, 0, inputBuffer.Length)
            Return Encoding.UTF8.GetString(bytes)
        Catch ex As Exception
            Return "ERROR CODE 702"
        End Try
    End Function
【C#完整代码】
public static String DecryptionKEY(String message)
        {
            try
            {
                String key = "q1!2@3#we>WacE/.Q,?<b";  
                sbyte[] salt = { -87, -101, -56, 50, 86, 53, -29, 3 };
                int count = 19;

                PKCSKeyGenerator cipher = new PKCSKeyGenerator(key, Array.ConvertAll(salt, a => (byte)a), count, 1);
                byte[] src = Convert.FromBase64String(message);
                byte[] result = cipher.Decryptor.TransformFinalBlock(src, 0, src.Length);
                return Encoding.UTF8.GetString(result);
            }
            catch
            {
                return "DecryptionKEY Fail.";
            }
            
        }

[ 本帖最后由 hn496658432 于 2014-4-8 23:00 编辑 ]
搜索更多相关主题的帖子: 资料 message 表达式 
2014-04-08 22:01
bczgvip
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:66
帖 子:1310
专家分:5312
注 册:2009-2-26
收藏
得分:20 
SByte 又是什么类型?
话说VB。NET 能这么写代码啊。
模板之光照耀VB么? OTZ.
2014-04-08 22:50
hn496658432
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2014-4-8
收藏
得分:0 
兰姆达表达式,可以直接这么写的,现在需要的是类型转换
2014-04-08 22:52
hn496658432
Rank: 1
等 级:新手上路
帖 子:3
专家分:0
注 册:2014-4-8
收藏
得分:0 
以下是引用bczgvip在2014-4-8 22:50:30的发言:

SByte 又是什么类型?
话说VB。NET 能这么写代码啊。
模板之光照耀VB么? OTZ.
代码不完成的,直接截取的。跪求解释或者其他更简明的转换方法或者函数,搜不到资料了

[ 本帖最后由 hn496658432 于 2014-4-8 22:56 编辑 ]
2014-04-08 22:54
bczgvip
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:66
帖 子:1310
专家分:5312
注 册:2009-2-26
收藏
得分:0 
刷新看了看,你还在等啊?
呃!好吧,刚才在补。。。
PKCSKeyGenerator.zip (3.29 KB)

没试过,不知道代码全没。
2014-04-09 01:49
快速回复:兰姆达表达式 C#代码 用VB代码疑问,这个是查资料套上的。 不知道为什 ...
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.026374 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved