ASP中调用AES加、解密组件，难度高，本人菜，在线等待给100，不够再加分!

Question

现在我得到了一个AES 的rijndael模式的加解密的ActiveX dll文件，里面有这些函数：
1、加密：EncryptStr
2、解密：DecryptStr
3、密钥：ChinaXP
4、组件名称：AESdll
5、类名称：rijndael
我现在想用asp来连接mssql数据库并且把user表里的password字段进行加解密码处理，请问我改如何写？我现在已经有的代码是：
<%
 dim conn 
 dim rs
 dim sql
set conn=server.createobject("ADODB.connection") 
conn.open "PROVIDER=SQLOLEDB;DATA SOURCE=ChinaXP;UID=sa;PWD=sa;DATABASE=test;"
set rs=server.CreateObject ("adodb.recordset")
sql="select * from user where id="&request("id")
rs.open sql,conn,1,3
rs("name")=request.form("name")
rs("password")=request.form("password")--这里是我想用AES处理加密的地方
rs.addnew '或者rs.update
rs.close  
set rs=nothing 
conn.close
set conn=nothing  
%>
我因该如何把1~5的函数使用起来，让我的password可以被加密成功？现在我就会：
Set AESdll=Server.Createobject("AESdll.rijndael") 
其他的就不会些了？请高手指点，分不够再加，或者QQ指教：44636859，着急使用，感激！！！

Answer 1

VB高手+ASP高手快来帮小弟看下，如何处理啊，感激不尽！！！！！！！！！！！

Answer 2

//我因该如何把1~5的函数使用起来，让我的password可以被加密成功？现在我就会：
Set AESdll=Server.Createobject("AESdll.rijndael") 
然后，大致应该这样
dim s as string
s=request.form("password")
S=AESdll.EncryptStr(参数，应该有一个位置填入S，具体应该是什么，在你给出函数的说明前，我想我不会准确的回答你）
rs.addnew