showdown.asp

这是作的一个网站,修改很方便,可以做网站设计.管理登陆：admin.asp 帐号和密码：admin/admin

<!--#include file="Gaobei_head.asp"-->

<%
    sub navigation()
    response.write " &gt;&gt; "
    response.write "软件下载"
    end sub
%>
<%
dim founderr
founderr=false
if request.querystring("soft_id")="" then
  founderr=true
  Response.Write "<script language=javascript>alert('请指定操作的对象！');javascript:history.back();</script>"
else
  if not isInteger(request.querystring("soft_id")) then
    founderr=true
    Response.Write "<script language=javascript>alert('参数非法！');javascript:history.back();</script>"
  end if
end if
call head()
call menu()
set rs=conn.execute("select soft_id,soft_rcount from soft")
sql="UPDATE soft SET soft_rcount = soft_rcount + 1  WHERE soft_id="&request.querystring("soft_id")
conn.execute (sql)
rs.close
set rs=nothing
sql="select * from soft where soft_id="&request.querystring("soft_id")
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
%>


<div align="center">
	<table border="0" cellpadding="0" cellspacing="0" width="778" height="20" bgcolor="#EFEFE7">
		<tr>
			<td>
			<div align="center">
				<table border="0" cellpadding="0" cellspacing="0" width="768" height="20" background="images/gaobei_skin/public_dh.gif">
					<tr>
						<td style='FILTER: DropShadow(Color=#ffffff, OffX=1, OffY=1, Positive=1); PADDING-TOP: 2px'>&nbsp;&nbsp;&nbsp;&nbsp;<span style="letter-spacing: 3px">文件下载</span></td>
					</tr>
				</table>
			</div>
			</td>
		</tr>
	</table>
</div>
<div align="center">
	<table border="0" cellpadding="0" cellspacing="0" width="778" height="5" bgcolor="#EFEFE7">
		<tr>
			<td></td>
		</tr>
	</table>
</div>



<!--主要内容开始-->

<div align="center">
	<table border="0" cellpadding="0" cellspacing="0" style="border: 1px solid #CECFCE" bgcolor="#FFFFFF">
		<tr>
			<td>


<%
    if Request.Cookies(GaoBei_Sys)("Grade")="" then 
    Grade=0
    else 
    Grade=Request.Cookies(GaoBei_Sys)("Grade")+1
    end if
    if Grade>=RS("ReadGrade") then 
    Call SoftRead()
    else
    Call SoftReadErro()
    end if
%>


　</td>
		</tr>
	</table>
</div>
<!--主要内容结束-->

<% sub SoftReadErro() %>
<br>
<table width="768" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<div align="center">

<span style="letter-spacing: 3px"> 「 <%=rs("soft_name")%> 」 </span>

<br><br><br><br>
<font color="#FF0000">您的浏览权限不够！</font><br><br><br>
        这条信息要
<font color=red><%if rs("ReadGrade")=1 then%> 
本站注册用户
<%end if%>
<%if rs("ReadGrade")=2 then%> 
 高贝会员
<%end if%>
</font>
才能游览！
</div></td>
</tr>
</table>
<% end sub %>


<% sub SoftRead() %>
<table width="768"  border="1" align="center" cellspacing="0" cellpadding="3" bgcolor="#FFFFFF" bordercolor="#f0f0f0" style="border-collapse: collapse">

<tr> 
          <td width=100% colspan=3 align="center" HEIGHT=30><span style="letter-spacing: 3px"> 「 <%=rs("soft_name")%> 」 </span></td>
        </tr> 
        <tr> 
          <td height="25" align="center" width="15%"><img border="0" src="Images/Gaobei_Guide.gif"> 加入时间</td>
          <td width="35%" ><%=rs("soft_joindate")%>　</td>
<td rowspan="8" align="center" width="65%" valign="middle">
<%if rs("soft_showpic")<>"" then%><a href="<%=rs("soft_showpic")%>" title="<%=rs("soft_showpic")%>" target=_blank><img src='<%=rs("soft_showpic")%>' border='0' onload="javascript:DownImage(this);" title="按此在新窗口打开图片" onmouseover="this.style.cursor='hand';" onclick="window.open(this.src);"></a><%else%><img src='Images/Gaobei_skin/Gaobei_nopic.gif' border='0'><%end if%></td>
</tr>
        <tr> 
          <td height="25" align="center" width="15%"><img border="0" src="Images/Gaobei_Guide.gif"> 程序类别</td>
          <td width="35%"><%=rs("soft_classname")%></td>
        </tr>
        <tr> 
          <td height="25" align="center"><img border="0" src="Images/Gaobei_Guide.gif"> 文件大小</td>
          <td ><%=rs("soft_size")%>　</td>
</tr>
        <tr> 
          <td height="25" align="center"><img border="0" src="Images/Gaobei_Guide.gif"> 授权方式</td>
          <td ><%=rs("soft_mode")%>　</td>
        </tr>
        <tr> 
          <td height="25" align="center"><img border="0" src="Images/Gaobei_Guide.gif"> 应用平台</td>
          <td ><%=rs("soft_roof")%>　</td>
</tr>
        <tr> 
          <td height="25" align="center"><img border="0" src="Images/Gaobei_Guide.gif"> 推荐程度</td>
          <td ><img src="images/zw_star<%=rs("soft_commend")%>.gif"align="absmiddle"></td>
        </tr>
        <tr> 
          <td height="25" align="center"><img border="0" src="Images/Gaobei_Guide.gif"> 程序演示</td>
          <td > 
            <%if rs("soft_home")<>"" then%>
            <a href="<%=rs("soft_home")%>" title="<%=rs("soft_home")%>" target="_blank">主页</a> 
            <%end if%>
            <%if rs("soft_demo")<>"" then%>
             | <a href="<%=rs("soft_demo")%>" title="<%=rs("soft_demo")%>" target=_blank>演示</a>  
            <%end if%>
          </td>
</tr>
        <tr> 
          <td height="25" align="center"><img border="0" src="Images/Gaobei_Guide.gif"> 下载浏览</td>
          <td >下载:<%=rs("soft_dcount")%> 浏览:<%=rs("soft_rcount")%></td>
        </tr>




<tr> 
          <td height="25" align="center"><img border="0" src="Images/Gaobei_Guide.gif"> 下载地址</td>
          <td colspan=3 bgcolor="#FFFFFF">
<% if rs("soft_url1")<>"" then %>
               <a href="opensoft.asp?soft_id=<%=rs("soft_id")%>&url=1" title="本地高速下载">本地下载</a>
<% end if %> 
            <%if rs("soft_url2")<>"" then%>
             | <a href="opensoft.asp?soft_id=<%=rs("soft_id")%>&url=2" title="镜像站高速下载">镜像下载</a>
            <%end if%>
            <%if rs("soft_url3")<>"" then%>
             | <a href="opensoft.asp?soft_id=<%=rs("soft_id")%>&url=3" title="远程下载一" target='_blank'>远程下载一</a> 
            <%end if%>
            <%if rs("soft_url4")<>"" then%>
             | <a href="opensoft.asp?soft_id=<%=rs("soft_id")%>&url=4" title="远程下载二" target='_blank'>远程下载二</a> 
            <%end if%>
          </td>
        </tr>

        <tr> 
          <td colspan=3 style="line-height: <%=Gaobei_line_H%>"><p style="margin-left: 10px; margin-right: 10px"><b><img border="0" src="Images/Gaobei_skin/Gaobei_ico.gif"> 相关简介：</b><br>&nbsp;&nbsp;<%=ubb2html(formatStr(autourl(rs("soft_desc"))), true, true)%></td>
        </tr> 


</table>
<% end sub %><!--#include file="Gaobei_foot.asp"-->