" name="keywords" /> " name="description" /> <% Type1=Request.QueryString("id") Rs.Open"Select * From B_News Where Cstr(ID)='"&Type1&"'",Conn(),1,3 If Not Rs.Eof Then Title=Rs("N_Title") Content=Rs("N_Content") Content2=Rs("Content2") Type1=Rs("Type") ClassID=Rs("ClassID") Pic_=Rs("Pic") Order=Rs("Order") Rs("N_Num")=Rs("N_Num")+1 Rs.UpdateBatch Num=Rs("N_Num") Date1=Rs("N_Date") Else Response.Redirect"index.asp" Response.End() End If Rs.Close Rs.Open"Select Top 1 * From B_News Where [Order]>"&Order&" And Type='"&Type1&"' Order By [Order] Asc",Conn(),1,1 If Not Rs.Eof Then ID1=Rs("ID") Title1=Rs("N_Title") End If Rs.Close Rs.Open"Select Top 1 * From B_News Where [Order]<"&Order&" And Type='"&Type1&"' Order By [Order] Desc",Conn(),1,1 If Not Rs.Eof Then ID2=Rs("ID") Title2=Rs("N_Title") End If Rs.Close %>
信息详情

您当前的位置是:网站首页 > <%=BigClassName(Type1,"gonggao","BigClassName","Bs_PrBigClass","")%> > 信息详情

<%=Title%>
来源:<%=WebConfig("WebName")%> 作者:admin 发表时间: <%=Date1%> 阅读数:<%=Num%>

<%=Content%>

上一篇:<%if Title2="" then%>没有了<%else%><%=Title2%> <%end if%>
下一篇:<%if Title1="" then%>没有了<%else%><%=Title1%><%end if%>