Question

请高手帮忙解释一下这段代码的意思

请高手帮忙解释一下这段代码的意思，能每一句解释详细一点儿嘛，非常感谢！
<%
rs.close
set rs=nothing
if request("action")="savereply" then
call savereply()
end if
%>
<%
sub savereply()
dim reply
reply=trim(request.Form("reply"))
set rs=server.CreateObject("ADODB.Recordset")
sql="select * from info where id="&id
rs.open sql,conn,3,3
rs("reply")=reply
rs.update
rs.close
set rs=nothing
response.Redirect "index.asp"
end sub
%>

Answer 1

rs.close 关闭连接
if request("action")="savereply" then
call savereply()
end if
得到地址栏中的值,调用过程.
sub savereply()
dim reply
reply=trim(request.Form("reply"))
set rs=server.CreateObject("ADODB.Recordset")
sql="select * from info where id="&id
rs.open sql,conn,3,3
rs("reply")=reply
rs.update
rs.close
set rs=nothing
response.Redirect "index.asp"
end sub
编写过程