请教如何将有几千条记录的表中的某一字段的值全部用MD5加密为32位呢

Question

打开数据库链接
取得记录集
循环开始
取出password加密
更新password为加密后的
循环结束
释放记录集
关闭数据库链接

Answer 1

有朋友给出一段代码，如下：
while not rs.eof
pwd=rs("pwd")
pwd=md5("pwd")
sql="insert into table(xxx) values('" & pwd & "')"
rs1.open sql,conn,1,3 or conn.execute sql
rs.movenext
wend
我根据自己的情况修改了一下，如下：
<!--#include file=conn.asp"-->
<%
Sql = "select username,password from forum_Userdb order by id asc"
set rs = conn.execute(sql)
while not rs.eof
pwd=rs("pwd")
pwd=md5("pwd")
sql="insert into dv_user(userpassword) values('" & pwd & "')"
rs1.open sql,conn,1,3 or conn.execute sql
rs.movenext
wend
Rs.close
%>
结果出现错误：
Microsoft VBScript 编译器错误 错误 '800a0401' 语句未结束 0624.asp，行11 rs1.open sql,conn,1,3 or conn.execute sql
--------------------------------------^
而且我希望能加密为32位的，这个应该加在代码的什么地方啊？

Answer 2

11 行  rs1.open sql,conn,1,3 or conn.execute sql  不能这样写吧?rs1.open sql,conn,1,3   写一个就行了还有啊，加密的位数在md5 进行控制了

Answer 3

我做了一些修改，代码如下：
<%
Sql = "select username,password from forum_Userdb order by id asc"
set rs = conn.execute(sql)
while not rs.eof
pwd=rs("password")
pwd=md5("pwd")
sql="insert into dv_user(userpassword) values('" & pwd & "')"
conn.execute sql
rs.movenext
wend
Rs.close
%>
运行出现错误提示：
Microsoft VBScript 运行时错误 错误 '800a01c2' 错误的参数个数或无效的参数属性值: 'MD5' 0624.asp，行9 
这个该如何解决？另外要修改MD5.ASP里什么地方才能实现加密为32位的？

Answer 4

pwd=md5("pwd")
要加上位数呀，如：
pwd=md5(pwd，16)
pwd=md5(pwd，32)
并把“”去掉，因为你这里是变量了而不是字符