<%
'set cn=fd_cn()
Function fd_cn(fdcn)
set fd_conn = server.CreateObject("adodb.connection")
fd_conn.open fdcn
set fd_cn=fd_conn
End Function
Function fd_rs(fdcn,fdsql)
set fd_rrss = server.CreateObject("adodb.recordset")
fd_rrss.open fdsql,fdcn,1,3
set fd_rs=fd_rrss
End Function
Function fd_free(rscn)
rscn.close
set rscn=nothing
end Function
%>
帮我解释一下