<%Set rs = Server.CreateObject("ADODB.Recordset")
sql="select pass from pws"
rs.open sql,conn,1,3
do while not rs.eof
newpass=replace(rs(0),""&rs("pass")&"",""&md5(rs("pass"))&"")
SQL="update pws set pass="& newpass & ""
conn.Execute SQL
rs.MoveNext
loop
%>
请高手帮忙解决一下,谢谢了!
你要把密码改成什么样的??
str = MD5(trim(rs("pass")))
SQL="update pws set pass="& str & ""
这样就可以改成一样的密码了。
要是改成不一样的。可以使用:
sql="select * from pws "
rs.open sql,conn,3,3
for i=1 to rs.recordcount
rs("pass")=md5(rs("pass"))
rs.update
rs.movenext
next
这样的意思是,首先得出所有的数据,然后循环,把得出的pass的数据用MD5加密后,在赋给pass字段,然后更新,然后下一条,继续循环。这个循环可以得出不同的md5加密密码值。