dim rs,sql
set rs = server.createobject("adodb.recordset")
sql="select * from NwebCn_ProductSort where ViewFlag and ID="&request.QueryString("SortID")
rs.open sql,conn,1,1
WebLocation=WebLocation&SortPathTXT("NwebCn_ProductSort",rs("ID"))
rs.close
set rs=nothing
这段代码是什么意思啊?