📄 showsoft_body.asp
字号:
<%sub showsoft_body()
opendown
sql="select * from soft where soft_id="&request.querystring("soft_id")
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
%>
<link href="site_css.css" rel="stylesheet" type="text/css">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}
function YY_checkform() { //v4.66
//copyright (c)1998,2002 Yaromat.com
var args = YY_checkform.arguments; var myDot=true; var myV=''; var myErr='';var addErr=false;var myReq;
for (var i=1; i<args.length;i=i+4){
if (args[i+1].charAt(0)=='#'){myReq=true; args[i+1]=args[i+1].substring(1);}else{myReq=false}
var myObj = MM_findObj(args[i].replace(/\[\d+\]/ig,""));
myV=myObj.value;
if (myObj.type=='text'||myObj.type=='password'||myObj.type=='hidden'){
if (myReq&&myObj.value.length==0){addErr=true}
if ((myV.length>0)&&(args[i+2]==1)){ //fromto
var myMa=args[i+1].split('_');if(isNaN(myV)||myV<myMa[0]/1||myV > myMa[1]/1){addErr=true}
} else if ((myV.length>0)&&(args[i+2]==2)){
var rx=new RegExp("^[\\w\.=-]+@[\\w\\.-]+\\.[a-z]{2,4}$");if(!rx.test(myV))addErr=true;
} else if ((myV.length>0)&&(args[i+2]==3)){ // date
var myMa=args[i+1].split("#"); var myAt=myV.match(myMa[0]);
if(myAt){
var myD=(myAt[myMa[1]])?myAt[myMa[1]]:1; var myM=myAt[myMa[2]]-1; var myY=myAt[myMa[3]];
var myDate=new Date(myY,myM,myD);
if(myDate.getFullYear()!=myY||myDate.getDate()!=myD||myDate.getMonth()!=myM){addErr=true};
}else{addErr=true}
} else if ((myV.length>0)&&(args[i+2]==4)){ // time
var myMa=args[i+1].split("#"); var myAt=myV.match(myMa[0]);if(!myAt){addErr=true}
} else if (myV.length>0&&args[i+2]==5){ // check this 2
var myObj1 = MM_findObj(args[i+1].replace(/\[\d+\]/ig,""));
if(myObj1.length)myObj1=myObj1[args[i+1].replace(/(.*\[)|(\].*)/ig,"")];
if(!myObj1.checked){addErr=true}
} else if (myV.length>0&&args[i+2]==6){ // the same
var myObj1 = MM_findObj(args[i+1]);
if(myV!=myObj1.value){addErr=true}
}
} else
if (!myObj.type&&myObj.length>0&&myObj[0].type=='radio'){
var myTest = args[i].match(/(.*)\[(\d+)\].*/i);
var myObj1=(myObj.length>1)?myObj[myTest[2]]:myObj;
if (args[i+2]==1&&myObj1&&myObj1.checked&&MM_findObj(args[i+1]).value.length/1==0){addErr=true}
if (args[i+2]==2){
var myDot=false;
for(var j=0;j<myObj.length;j++){myDot=myDot||myObj[j].checked}
if(!myDot){myErr+='* ' +args[i+3]+'\n'}
}
} else if (myObj.type=='checkbox'){
if(args[i+2]==1&&myObj.checked==false){addErr=true}
if(args[i+2]==2&&myObj.checked&&MM_findObj(args[i+1]).value.length/1==0){addErr=true}
} else if (myObj.type=='select-one'||myObj.type=='select-multiple'){
if(args[i+2]==1&&myObj.selectedIndex/1==0){addErr=true}
}else if (myObj.type=='textarea'){
if(myV.length<args[i+1]){addErr=true}
}
if (addErr){myErr+='* '+args[i+3]+'\n'; addErr=false}
}
if (myErr!=''){alert('The required information is incomplete or contains errors:\t\t\t\t\t\n\n'+myErr)}
document.MM_returnValue = (myErr=='');
}
//-->
</script>
<table width="760" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#FFFFFF">
<tr>
<td colspan="3" height="10"></td>
</tr>
<tr>
<td width="527" valign="top">
<table width="98%" border="0" cellspacing="0" cellpadding="0" align="center">
<form name="form1" method="post" action="">
<tr>
<td class="chinese" align="right">
<select name="colname">
<option value=0 selected>--==搜索范围==--</option>
<option value="soft_name">软件名称</option>
<option value="soft_desc">软件描述</option>
</select>
<input type="text" name="keyword" class="textarea" size="20">
<input type="submit" name="Submit" value="搜索" class="button">
</td>
</tr>
</form>
</table>
<table width="98%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td bgcolor="#FFFFFF" class="chinese">
<form>
跳转到
<select name="go" onChange='window.location=form.go.options[form.go.selectedIndex].value'>
<option value="download.asp">---===选择分类===---</option>
<option value="download.asp">---===下载首页===---</option>
<%
Set rscat = Server.CreateObject("ADODB.Recordset")
sqlcat="SELECT * FROM d_cat"
rscat.OPEN sqlcat,Conn,1,1
do while not rscat.eof
colparam1=rscat("cat_id")
%>
<option value="download.asp?cat_id=<%=rscat("cat_id")%>">----<%=rscat("cat_name")%>----</option>
<%
Set rsclass = Server.CreateObject("ADODB.Recordset")
sqlclass="SELECT * FROM d_class where cat_id=" &colparam1& ""
rsclass.OPEN sqlclass,Conn,1,1
do while not rsclass.eof
%>
<option value='download.asp?cat_id=<%=rsclass("cat_id")%>&class_id=<%=rsclass("class_id")%>'><%=rsclass("class_name")%></option>
<%
rsclass.movenext
loop
rsclass.close
set rsclass=nothing
rscat.movenext
loop
rscat.close
set rscat=nothing
set rstotal=nothing
%>
</select>
</form>
</td>
<td align="right" bgcolor="#FFFFFF" class="chinese"> </td>
</tr>
</table>
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse; border-width: 0" bordercolor="#111111" width="100%" id="AutoNumber1">
<tr>
<td width="100%" style="border-style: none; border-width: medium">
<p align="center">
<a target="_blank" title="D-001广告位，欢迎您使用……" href="http://www.cichina.com/me/lian.htm"><img border="0" src="images/ad-d-001.gif"></a></td>
</tr>
<tr>
<td width="100%" style="border-style: none; border-width: medium"> </td>
</tr>
</table>
<div align="center">
<center>
<table width="92%" border="1" cellspacing="0" bgcolor="#C0C0C0" class="chinese" cellpadding="6" style="border-collapse: collapse" bordercolor="#C0C0C0">
<tr>
<td bgcolor="#F5F5F5" height="25" colspan=2 bordercolor="#C0C0C0" background="images/pic000/c007.jpg" ><b><%=rs("soft_name")%></b></td>
<td bgcolor="#F5F5F5" colspan=2 align="right" bordercolor="#C0C0C0" background="images/pic000/c007.jpg" >
<%if rs("soft_demo")<>"" then%>
<a href="<%=rs("soft_demo")%>" title="<%=rs("soft_demo")%>" target=_blank>演示</a>
<%else%>
没有演示
<%end if%>
</td>
</tr>
<tr>
<td bgcolor="#F5F5F5" height="25" align="center" width="15%">加入时间</td>
<td bgcolor="#FFFFFF" width="35%" ><%=rs("soft_joindate")%> </td>
<td bgcolor="#F5F5F5" align="center" width="15%">程序类别</td>
<td bgcolor="#FFFFFF" width="35%"><%=rs("soft_catname")%> | <%=rs("soft_classname")%></td>
</tr>
<tr>
<td bgcolor="#F5F5F5" height="25" align="center">文件大小</td>
<td bgcolor="#FFFFFF" ><%=rs("soft_size")%> </td>
<td bgcolor="#F5F5F5" align="center">授权方式</td>
<td bgcolor="#FFFFFF"><%=rs("soft_mode")%> </td>
</tr>
<tr>
<td bgcolor="#F5F5F5" height="25" align="center">应用平台</td>
<td bgcolor="#FFFFFF"><%=rs("soft_roof")%> </td>
<td bgcolor="#F5F5F5" align="center">推荐程度</td>
<td bgcolor="#FFFFFF"><img src="images/<%=rs("soft_commend")%>stars.gif" width=55 height=12 align="absmiddle"></td>
</tr>
<tr>
<td bgcolor="#F5F5F5" height="25" align="center">程序主页</td>
<td bgcolor="#FFFFFF" >
<%if rs("soft_home")<>"" then%>
<a href="<%=rs("soft_home")%>" title="<%=rs("soft_home")%>" target="_blank">Home
Page</a>
<%else%>
Home Page
<%end if%>
</td>
<td bgcolor="#F5F5F5" align="center">下载/浏览</td>
<td bgcolor="#FFFFFF" ><%=rs("soft_dcount")%>/<%=rs("soft_rcount")%></td>
</tr>
<tr>
<td bgcolor="#F5F5F5" height="25" align="center">下载地址</td>
<td colspan=3 bgcolor="#FFFFFF"> <a href="opensoft.asp?soft_id=<%=rs("soft_id")%>&url=1">下载1</a>
<%if rs("soft_url2")<>"" then%>
<a href="opensoft.asp?soft_id=<%=rs("soft_id")%>&url=2">下载2</a>
<%end if%>
<%if rs("soft_url3")<>"" then%>
<a href="opensoft.asp?soft_id=<%=rs("soft_id")%>&url=3">下载3</a>
<%end if%>
<%if rs("soft_url4")<>"" then%>
<a href="opensoft.asp?soft_id=<%=rs("soft_id")%>&url=4">下载4</a>
<%end if%>
</td>
</tr>
<tr>
<td width=100% colspan=4 bgcolor=#FFFFFF style='table-layout: fixed; word-break: break-all; border-bottom-style: solid; border-bottom-color: #FFFFFF'>
简介：
<%if rs("soft_showpic")<>"" then%>
<a href="<%=rs("soft_showpic")%>" target=_blank><img src='images/img.gif' title='点击查看图片' border=0>点击查看图片</a>
<%end if%> <font color="#666666">本站文件解压缩</font><font color="#FF9A00">
默认密码</font><font color="#666666">：cichina.com</font><p>
<font color="#666666"> ---------------------------大部分资料由CICHINA.com论坛资源共享区专用FTP网友提供</font></td>
</tr>
<tr>
<td width=100% colspan=4 bgcolor=#FFFFFF style='table-layout: fixed; word-break: break-all; text-indent: 40; border-top-style: solid; border-top-color: #FFFFFF'>
<%=ubb2html(formatStr(autourl(rs("soft_desc"))), true, true)%> </td>
</tr>
<%
dim totalremark,Currentpage,totalpages,i
sql5="select * from d_remark where soft_id="&rs("soft_id")
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -