<% Dim Itempage:Itempage = Checkstr(VerificationUrlParam("page","string","0")) Dim ItemID:ItemID = Checkstr(VerificationUrlParam("ID","string","0")) set rs = UICon.Query("select * from user_al where ID="&ItemID&"") if rs.recordcount=0 then Alert "找不到對應的信息","" else UICon.Execute("update user_al set hots= hots+1 where ID="&ITemID&"") news_title=rs("title") news_imgurl=rs("imgurl") news_content=rs("Field_content") news_time=rs("posttime") news_hots=rs("hots") news_categoryid=rs("categoryid") end if rs.close set rs=nothing %> <%pathstr = Checkstr(VerificationUrlParam("pathstr","string","")) sql2="select * from SP_dictionary where id="&news_categoryid&"" set rs=UIcon.query(sql2) if rs.recordcount<>0 then categoryname=rs("categoryname") pathstr=rs("pathstr") categoryid=rs("id") end if rs.close set rs=nothing if categoryname="" then categoryname="榮譽資質" end if dh="ry" db=pathstr %> <%=config_sitename%>
    <track id="frfl5"></track><video id="frfl5"></video><big id="frfl5"></big>

    <big id="frfl5"><ruby id="frfl5"></ruby></big>

        <big id="frfl5"><ruby id="frfl5"><i id="frfl5"></i></ruby></big>
        <video id="frfl5"><rp id="frfl5"><ruby id="frfl5"></ruby></rp></video>
        <sub id="frfl5"></sub><ol id="frfl5"><strike id="frfl5"><listing id="frfl5"></listing></strike></ol><p id="frfl5"><del id="frfl5"></del></p>

              <form id="frfl5"></form>
                <menuitem id="frfl5"><strike id="frfl5"></strike></menuitem>

              <%=categoryname%>

              當前位置:首頁 - <%=categoryname%> - 詳細信息

              <%=news_title%>

              發表時間:<%=news_time%>  閱讀次數:<%=news_hots%>
              <%=news_content%>
              <%sql1="select * from user_al where id>"&ItemID&" and isdel=0 and categoryid="&categoryid&" order by id asc" set rs1=UIcon.query(sql1) if rs1.recordcount<>0 then %>
              上一篇文章:"><%=rs1("title")%>
              <%end if rs1.close set rs1=nothing %> <%sql2="select * from user_al where id<"&ItemID&" and isdel=0 and categoryid="&categoryid&" order by id desc" set rs2=UIcon.query(sql2) if rs2.recordcount<>0 then %>
              下一篇文章:"><%=rs2("title")%>
              <%end if rs2.close set rs2=nothing %>
              四虎国产精品永久地址51,亚洲精品成人在线观看,日韩一级精品视频在线观看,欧美爆乳乱妇高清免费
                <track id="frfl5"></track><video id="frfl5"></video><big id="frfl5"></big>

                <big id="frfl5"><ruby id="frfl5"></ruby></big>

                    <big id="frfl5"><ruby id="frfl5"><i id="frfl5"></i></ruby></big>
                    <video id="frfl5"><rp id="frfl5"><ruby id="frfl5"></ruby></rp></video>
                    <sub id="frfl5"></sub><ol id="frfl5"><strike id="frfl5"><listing id="frfl5"></listing></strike></ol><p id="frfl5"><del id="frfl5"></del></p>

                          <form id="frfl5"></form>
                            <menuitem id="frfl5"><strike id="frfl5"></strike></menuitem>