<% Specialid=request.QueryString("AlbumID") set rs=server.createobject("adodb.recordset") sql="select * from Special where Specialid="&cstr(Specialid) rs.open sql,conn,1,3 if rs.EOF then errmsg= "

服务器出错！请联系管理员

" call error() Response.End else rs("hits")=rs("hits")+1 rs.update hits=rs("hits") Classid=rs("Classid") SClassid=rs("SClassid") NClassid=rs("NClassid") Nclass=rs("Nclass") name=rs("name") xh=rs("xh") Gongsi=rs("Gongsi") Yuyan=rs("Yuyan") pic=rs("pic") intro=rs("intro") %>