downnews.asp

政府网站集成OA办公考勤新闻发布网站信息管理会员管理

<!--#include file="head.asp"-->
<%
    sub navigation()
    response.write " &gt;&gt; "
    response.write "软件下载"
    end sub
%>

<!--主要内容开始-->
	<table border="0" cellpadding="0" cellspacing="0" width=996 style="border: 1px solid #CECFCE" bgcolor="#FFFFFF">
		<tr>
					    <!--左边内容-->
			<td width="216" valign="top" background="images/2/left_bg.gif">
			
      <div align="center">
			<%call a125_tianqi()%>
			</div>
			<div align="center">
<% Call a125_acticletype(15,-1,"下载分类") %>
      </div>
		   <div align="center">
			<% call a125_Search5() %>
      </div>	   

            <div align="center">
<% Call a125_otherInfo(1,8,20,"down",0) %>
           </div>	 
		   
          </td>	
       <!--右边内容-->     
			<td width="780" valign="top">
       <div align="center">
				<table border="0" cellpadding="0" cellspacing="0" width="780" height="20" >
					<tr>
         <TD width="100%" height="20" ><IMG height=45 src="images/2/class_top.gif" width=780></TD>
					</tr>
				</table>
</div>
<%
dim founderr
founderr=false
if request.querystring("id")="" then
  founderr=true
  Response.Write "<script language=javascript>alert('请指定操作的对象！');javascript:history.back();</script>"
else
  if not isInteger(request.querystring("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 id,soft_rcount from a125_d_news")
sql="UPDATE a125_d_news SET soft_rcount = soft_rcount + 1  WHERE id="&request.querystring("id")
conn.execute (sql)
rs.close
set rs=nothing
sql="select * from a125_d_news where id="&request.querystring("id")
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
soft_name=rs("soft_name")
%>

<table width="650"  border="0" align="center" cellspacing="0" cellpadding="3" bgcolor="#FFFFFF" bordercolor="#f0f0f0" style="border-collapse: collapse">
        <tr> 
          <td width=100% colspan=3 align="center" HEIGHT=60 valign="middle"><b><font size="4"><%=rs("soft_name")%></font></b></td>
        </tr>
</table>      
 <table width="650"  border="1" align="center" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF" bordercolor="#f0f0f0" style="border-collapse: collapse">
 <TBODY><tr>
  <td width="60%">        
    <table cellspacing="0"  width="100%" border="1" bgcolor="#FFFFFF" bordercolor="#f0f0f0" style="border-collapse: collapse">
        <tr> 
          <td height="25" align="center" width="40%"><img border="0" src="Images/a125_Guide.gif"> 加入时间</td>
          <td width="60%" >&nbsp;&nbsp;&nbsp;<%=rs("soft_joindate")%>　</td>
        </tr>
<%
if RS("department")<>"" then
    InfoSql="select * from HX_Department where WS_Did="&RS("department")
    Set InfoRs=Conn.Execute(InfoSql)
    DepartmentName=Infors("WS_DepartmentName")
    Infors.close
    set Infors=nothing
   else
    DepartmentName="" 
end if   
    if switch_author="2" or switch_author="3" then    
%>       
        <tr> 
          <td height="25" align="center" ><img border="0" src="Images/a125_Guide.gif"> 上传部门</td>
          <td >&nbsp;&nbsp;&nbsp;<%=DepartmentName%></td>
        </tr> 
<%  end if
    if switch_author="1" or switch_author="3" then
%>
        <tr> 
          <td height="25" align="center" ><img border="0" src="Images/a125_Guide.gif"> 上传人员</td>
          <td >&nbsp;&nbsp;&nbsp;<%=rs("author")%></td>
        </tr> 
<% end if%>
        <tr> 
          <td height="25" align="center"><img border="0" src="Images/a125_Guide.gif"> 程序类别</td>
          <td >&nbsp;&nbsp;&nbsp;<%=rs("soft_classname")%></td>
        </tr>
        <tr> 
          <td height="25" align="center"><img border="0" src="Images/a125_Guide.gif"> 文件大小</td>
          <td >&nbsp;&nbsp;&nbsp;<%=rs("soft_size")%></td>
        </tr>
        <tr> 
          <td height="25" align="center"><img border="0" src="Images/a125_Guide.gif"> 下载浏览</td>
          <td >&nbsp;&nbsp;下载:<%=rs("soft_dcount")%> 浏览:<%=rs("soft_rcount")%></td>
        </tr>
        <tr> 
          <td height="25" align="center"><img border="0" src="Images/a125_Guide.gif"> 下载地址</td>
          <td colspan=3 bgcolor="#FFFFFF">&nbsp;&nbsp;<% if rs("soft_url1")<>"" then %><a href="opensoft.asp?id=<%=rs("id")%>&url=1" title="本地高速下载">本地下载</a>
<% end if %><%if rs("soft_url2")<>"" then%>
             | <a href="opensoft.asp?id=<%=rs("id")%>&url=2" title="镜像站高速下载">镜像下载</a>
            <%end if%>
          </td>
        </tr>
       </table>
     </td>
     <td rowspan="8" align="center" width="40%" 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/a125_nopic.gif' border='0'><%end if%></td>
     </tr> </TBODY></table>
<table width="650"  border="1" align="center" cellspacing="0" cellpadding="10" bgcolor="#FFFFFF" bordercolor="#f0f0f0" style="border-collapse: collapse">
        <tr> 
          <td colspan=3 style="line-height: <%=a125_line_H%>"  height="400" valign="top"><p style="margin-left: 10px; margin-right: 10px">&nbsp;&nbsp;<b><img border="0" src="Images/a125_ico.gif"> 相关简介：</b><br><br><%=rs("soft_desc")%></td>
        </tr>
</table>

<% 
rs.close
set rs=nothing
 %>
　</td>
	</tr>
	</table>

<!--主要内容结束-->　

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

<SCRIPT language=javascript>
document.title="<%=soft_name%>--<%=a125_title%>";
</SCRIPT>