viewinfo.asp

网站代码

<!--#include file="head.asp" -->
<%
'* 个人版价格：500元 商业版价格：700元
'* 演示：http://Demo.wenday.com
'* 版本：Engine_WenDay网站信息系统 Ver 2.0 演示版
'* 版权所有: 一奔网络工作室(Wenday.Com)
'* 联系QQ: 42367091
'* Email :[e-mail]
'* 程序开发: Wenday
%>
<%
   	dim sql
   	dim rs
   	dim rstype
   	dim typesql
   	dim title
	 if request("id")="" then
	 response.Redirect("index.asp")
	 else 
	 end if
	set rs=server.createobject("adodb.recordset")
	sql="update Info set hits=hits+1 where ID="&request("id")
	rs.open sql,conn,1,3 
%> 
<%
ID=request("ID")
sqla="select * from Info where ID="&ID&""
Set Rsa=conn.execute (sqla)
if rsa.eof and rsa.bof then
response.Redirect("index.asp")
end if
ClassID=Rsa("Sort2")
SortID=Rsa("Sort1")

if ClassID<>0 then

sqlc="select * from Sort where ID="&ClassID&""
Set Rsc=conn.execute (sqlc)
if rsc.eof and rsc.bof then
response.Redirect("index.asp")
end if
Classname=Rsc("names")
B_ID=Rsc("B_ID")

sqls="select * from Sort where ID="&B_ID&""
Set Rss=conn.execute (sqls)
if Rss.eof and Rss.bof then
response.Redirect("index.asp")
end if
SortName=Rss("names")

end if

if ClassID=0 then
sqls="select * from Sort where ID="&SortID&""
Set Rss=conn.execute (sqls)
SortName=Rss("names")
end if
'Info=RsS("Info")
'Title = SortName & " >> " & Classname
%>
<TABLE width=778 border=0 align="center" cellPadding=0 cellSpacing=0>
<TBODY>
        <TR> 
          <TD width="100%"> <TABLE cellSpacing=0 cellPadding=0 width=778 align=center border=0>
              <TBODY>
                <TR bgColor=#ffffff> 
                  <TD colSpan=3 height=2></TD>
                </TR>
                <TR> 
                  <TD width="19" height=22 align=right><img src="Img/02_1.gif" width="12" height="9"></TD>
                  
<TD width="748"><FONT color=#333333>&nbsp;您的位置：&nbsp;</FONT>网站的首页 &gt;&gt; 
<%if ClassID<>0 then%><a href="Sort.asp?SortID=<%=B_ID%>"><%=SortName%></a> &gt;&gt; <a href="Class.asp?ClassID=<%=ClassID%>"><%=ClassName%></a><%end if%>
<%if ClassID=0 then%><a href="Sort.asp?SortID=<%=SortID%>"><%=SortName%></a><%end if%>
&gt;&gt; 浏览信息</TD>
                  <TD width="11">&nbsp;</TD>
                </TR>
              </TBODY>
            </TABLE>
            
      </TD>
    </TR></TBODY></TABLE>
<table width="777" border="0" align="center" cellpadding="0" cellspacing="0" style="BORDER-RIGHT: #d8d8d8 1px solid;BORDER-left: #d8d8d8 1px solid">
  <tr>
    <td><TABLE cellSpacing=0 cellPadding=0 width=100% border=0>
        <TBODY>
          <TR> 
            <TD vAlign=top colSpan=2> <TABLE cellSpacing=0 cellPadding=0 width="100%" align=center 
            border=0>
                <TBODY>
                  <TR bgColor=#cccccc> 
                    <TD colSpan=2 height=1></TD>
                  </TR>
                  <TR> 
                    <TD colSpan=2 height=2></TD>
                  </TR>
                  <TR> 
                    <TD width=62 bgColor=#eeeeee height=22>&nbsp;</TD>
                    <TD bgColor=#eeeeee> <% Call Marquee()%></TD>
                  </TR>
                  <TR> 
                    <TD bgColor=#cccccc colSpan=2 
        height=3></TD>
                  </TR>
                </TBODY>
              </TABLE></TD>
          </TR>
          <TR> 
            <TD vAlign=top width=185 
          bgColor=#f6f6f6 id="trNewsContent" style="BORDER-RIGHT: #d8d8d8 1px solid" > 
              <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                <TBODY>
                  <TR> 
                    <TD background=""> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                        <TBODY>
                          <TR> 
                            <TD height=34 background="Img/homedhbg.gif"><IMG 
                    src="Img/hydl.gif"></TD>
                          </TR>
                        </TBODY>
                      </TABLE></TD>
                  </TR>
                  <TR> 
                    <TD height=40><TABLE width=95% height="100" border=0  align=center cellPadding=0 cellSpacing=1 bgColor=#e8e8e8>
                        <TBODY>
                          <TR> 
                            <TD height="53" bgColor=#f9f9f9> 
                              <% Call UserLogin() %>
                            </TD>
                          </TR>
                      </TABLE></TD>
                  </TR>
                  <TR> 
                    <TD></TD>
                  </TR>
                  <TR> 
                    <TD></TD>
                  </TR>
                  <TR> 
                    <TD height="34"><table width="100%" border="0" cellspacing="2" cellpadding="5">
                        <tr> 
                          <TD height="33" background=Img/homedhbg.gif> <div align="center"><strong>信 
                              息 搜 索</strong></div></TD>
                        </TR>
                        <TR> 
                          <TD height="52" vAlign=top> 
                            <% Call Ew_ShowSearch() %>
                          </TD>
                        </tr>
                      </table></TD>
                  </TR>
                  <TR> 
                    <TD height="34" background=Img/homedhbg.gif> <div align="center"> 
                        <strong>热 门 信 息</strong></div></TD>
                  </TR>
                  <TR> 
                    <TD vAlign=top> <TABLE style="WORD-BREAK: break-all" height="100%" cellPadding=4 width="100%" border=0>
                        <TBODY>
                          <TR> 
                            <TD vAlign=top height=80> 
                              <% Call Ew_ShowInfo(1,10,13,0,0) %>
                            </TD>
                          </TR>
                        </TBODY>
                      </TABLE></TD>
                  </TR>
                  <TR> 
                    <TD></TD>
                  </TR>
                  <TR> 
                    <TD background=Img/homedhbg.gif> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                        <TBODY>
                          <TR> 
                            <TD height=34><div align="center"><strong>网 站 调 查</strong></div></TD>
                          </TR>
                        </TBODY>
                      </TABLE></TD>
                  </TR>
                  <TR> 
                    <TD vAlign=top><TABLE style="WORD-BREAK: break-all" height="100%" cellPadding=4 width="100%" border=0>
                        <TBODY>
                          <TR> 
                            <TD vAlign=top height=80> <TABLE width=99% height="100%" border=0 align=center cellPadding=0 cellSpacing=1 bgColor=#e8e8e8>
                                <TBODY>
                                  <TR> 
                                    <TD width="100%" height="52" bgColor=#f9f9f9> 
<% Call Ew_FlashVote() %>
                                    </TD>
                                  </TR>
                              </TABLE></TD>
                          </TR>
                        </TBODY>
                      </TABLE></TD>
                  </TR>
                  <TR> 
                    <TD></TD>
                  </TR>
                  <TR> 
                    <TD height="34" background=Img/homedhbg.gif>&nbsp; </TD>
                  </TR>
                  <TR> 
                    <TD>&nbsp; </TD>
                  </TR>
                  <TR> 
                    <TD></TD>
                  </TR>
                  <TR>