华南农业大学党委宣传部

<% NewsID=Request.QueryString("NewsID") request_BigClassName=trim(Request.QueryString("BigClassName")) request_SmallClassName=trim(Request.QueryString("SmallClassName")) conn.execute("update News Set Click=click+1 where NewsID=" & NewsID ) set rs=server.CreateObject("ADODB.RecordSet") rs.Source="select * from News where NewsID=" & NewsID rs.Open rs.Source,conn,1,1 BigClassName=rs("BigClassName") Title=trim(rs("Title")) about=trim(rs("about")) Author=trim(rs("Author")) Original=trim(rs("Original")) image=rs("image") UpdateTime=trim(rs("UpdateTime")) News_Content=trim(rs("Content")) hot=rs("hot") SpecialID=rs("SpecialID") click=rs("click") EnCode=trim(rs("EnCode")) iposition=rs("position") ipicsize=rs("picsize") rs.Close if ipicsize=1 then wid= 400 else if ipicsize=2 then wid= 250 else wid = 150 end if end if if iposition =1 then popo=1 end if %> 华南农业大学党委宣传部