set Rs = Server.CreateObject("ADODB.Recordset")
sql1="select content from bbs"
rs.open sql1,conn,1,3
do while not rs.eof
content=replace(rs("content"),"aaaaaaaaaaaaa","bbbbbbb")
rs("content")=content
rs.update
rs.movenext
loop
rs.close
set rs=nothing