<%Dim ID ID = SQLStr(Request.QueryString("id")) Call SetRecord(rb,"Select * From Ce_NewsTable Where ID = "&ID,Conn,1,3) If rb.Bof Or rb.Eof Then Call MyAlert("erren","") Response.End() End If Conn.Execute("Update Ce_NewsTable Set Click = Click + 1 Where ID = "&ID)%> <%=rb("Title")%> - <%=ToReturn("WebsiteTitle","Ce_SchoolWebsiteTable","Where ID = 5")%> " /> " />
首页 > 新闻通告
<%=rb("Title")%>
<%=rb("Content")%>
<%closed rb%>