% id=request.QueryString("id") if id<>"" then set rs=conn.execute("select title,content,classid,adddate from kh_article where p_id="&id&"") if not rs.eof then title=rs(0) content=rs(1) classid=rs(2) adddate=rs(3) end if rs.close:set rs=nothing if classid<>"" then set rs2=conn.execute("select top 1 classname from kh_articleclass where classid="&classid&" ") if not rs2.eof then classname=rs2(0) end if rs2.close:set rs2=nothing end if end if %>