易截截图软件、单文件、免安装、纯绿色、仅160KB

把VB函数转换为C#中的问题

VB code:
Function passEncode(byval strPass,byval strKey)
Dim priI,passLen,keyLen,numPos,chrT,aryPass()
passLen=Len(strPass)
keyLen=Len(strKey)
ReDim aryPass(passLen-1)
for priI=1 to passLen
aryPass(priI-1)=Mid(strPass,priI,1)
next
for priI=1 to passLen - 1
numPos=Asc(Mid(strKey,(priI mod keyLen)+1,1)) Mod (passLen-priI) + priI
chrT=aryPass(priI-1)
aryPass(priI-1)=aryPass(numPos)
aryPass(numPos)=chrT
next
passEncode=join(aryPass,"")
End Function

这是给已经MD5加密过的密码进行再加密的函数,我用C#写出来是下面这样,可是有错误,请大侠们帮帮忙看看该怎么改?
C# code:
public static string pwdEncode(string pwd, string key)
{
int passLen = pwd.Length;
int keyLen = key.Length;
string[] aryPass = new string[passLen + 1];
for (int i = 1; i < passLen + 1; i++)
{
aryPass[i - 1] = pwd.Substring(i, 1);
}
for (int i = 1; i < passLen; i++)
{
int numPos = Convert.ToInt32(pwd.Substring((i % keyLen) + 1, 1)[0]) % (passLen - i) + i;
string chrT = aryPass[i - 1];
aryPass[i - 1] = aryPass[numPos];
aryPass[numP


相关问答:

为什么用VB改变不了工具栏按扭的宽度 - VB / 控件

为什么工具栏按扭的宽度改变不了,在属性里改了又变成原来的数值了

大胡子真厉害,回答基本都是爆料级的
大胡子升级真快啊,这才几天就5条短裤外加月排名第一了
想想我这5个短裤混了差不多8年才得到的。

回复 ......

VB 的 PictureBOX 控件绘图问题 - VB / 控件

初学,大胆提问,请高手不吝赐教
1、滚动条点击与绘图板(屏幕,Piceure1)的移动问题已经解决。
  Picture1.Top = -VScroll1.Value + bcW '垂直移动
  Picture1.Left = -HScroll1.Value + bcW ' ......

C#填网页表单的问题 - .NET技术 / C#

我这里有一个登陆WIFI网络的页面。由于WIFI经常断线,所以要反复地在这个网页上登陆,没法无人值守。
所以,我想做一个C#程序,放一个webbrowser控件,自动填表并自动点击提交按钮。
问题一:
基本照网上找的程序 ......

帮我改改这VB题 - VB / 基础类

帮我改改 我总觉得有问题
Type ID
  number As Single
  score As Integer
  name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
 i = 0
&nbs ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号