www.gusucode.com > 星云DJ舞曲 4.5a源码程序 > soft.asp
<!--#include file="connkkp.asp"-->
<%
if not isempty(request("page")) then
currentPage=cint(request("page"))
else
currentPage=1
end if
%>
<%
id=request.QueryString("id")
set rs=server.createobject("adodb.recordset")
sql="select * from softdown where id="&cstr("id")
rs.open sql,conn,1,3
if rs.EOF then
errmsg= "<li>服务器出错！请联系管理员QQ:183536099</li>"
call error()
Response.End
else
hits=rs("hits")
name=rs("name")
pic=rs("pic")
intro=rs("intro")
size=rs("size")
dateandtime=DateValue(rs("dateandtime"))
system=rs("size")
home=rs("home")
end if
rs.close
set rscc=server.createobject("adodb.recordset")
sqlcc="select * from home"
rscc.open sqlcc,conn,1,1
if not rscc.eof then
zhanming=rscc("homes")
yuming=rscc("url")
beian=rscc("msn")
bdizhi=rscc("urls")
jishuqi=rscc("qqtwo")
banquan=rscc("qqthree")
cardhufour=rscc("cardhufour")
cardnbfour=rscc("cardnbfour")
cardcityfour=rscc("cardcityfour")
end if
rscc.close
set rscc=nothing
%><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="zh-CN">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta http-equiv="Content-Language" content="zh-CN" />
<meta content="all" name="robots" />
<meta name="author" content="dj235.com" />
<title>■程序出售-<%=zhanming%>-<%=yuming%></title>
<meta name="description" content="<%=yuming%>,<%=zhanming%>" />
<meta name="keywords" content="<%=zhanming%>" />
<link rel="stylesheet" rev="stylesheet" href="i/css.css" type="text/css" media="all" />
<script language="javascript" type="text/javascript" src="js/js.js"></script>
</head>
<body>
<div id="ww">
<div id="w">
<div id="h">
<div id="l"><img src="i/logo.gif"/></div>
<div id="b">
<div id="s">
<form name="Search" action="Search.asp" method="get" target="_blank">
<p style="margin: 6px 0px 0px 160px;"> </p>
<p style="margin-left: 100px;">
<span style="font-size: 14px; font-weight: bold;">搜 索：</span>
<input type="text" name="keyword" value="输入您想搜索的舞曲名" onblur="if(this.value=='')this.value='输入您想搜索的舞曲名';" onfocus="if(this.value=='输入您想搜索的舞曲名')this.value='';" size="60" style="width:260px;height:18px;" />
<input type="submit" value="舞曲搜索" style="font-size:15px;width:90px; "/>
</p>
</form>
</div>
<div class="m">
<ul>
<li id="m1"><a href="/" target="_blank">首 页</a></li>
<li><a href="List/djmc_1_1.html" target="dj">现场舞曲</a></li>
<li><a href="List/djmc_3_1.html" target="dj">中文舞曲</a></li>
<li><a href="List/djmc_5_1.html" target="dj">英文舞曲</a></li>
<li><a href="List/djmc_4_1.html" target="dj">慢嗨舞曲</a></li>
<li><a href="List/djmc_6_1.html" target="dj">加盟作品</a></li>
<li><a href="List/djmc_10_1.html" target="dj">综合舞曲</a></li>
<li><a href="List/djmc_2_1.html" target="dj">慢摇串烧</a></li>
<li><a href="Zj/djmc_41_1.html" target="dj">交谊舞曲</a></li>
<li><a href="List/djmc_7_1.html" target="dj">翻唱歪歌</a></li>
<li><a href="List/djmc_9_1.html" target="dj">MTV 视频</a></li>
<li><a href="soft.asp" target="_blank">程序出售</a></li>
</ul>
</div>
</div>
</div>
<div id="n">
<ul>
<li style="width: 180px;"/></li>
<li><a href="Zj/djmc_43_1.html" target="dj">感人故事</a></li>
<li><a href="Zj/djmc_42_1.html" target="dj">恐怖故事</a></li>
<li><a href="search.asp?keyword=旋风谷" target="dj">旋风谷</a></li>
<li><a href="search.asp?keyword=王志" target="dj">Dj王志</a></li>
<li><a href="search.asp?keyword=DjKK" target="dj">花都DjKK</a></li>
<li><a href="search.asp?keyword=凤舞九天" target="dj">凤舞九天</a></li>
<li><a href="search.asp?keyword=现场" target="dj">现场</a></li>
<li><a href="search.asp?keyword=电音" target="dj">电音</a></li>
<li><a href="search.asp?keyword=旋律" target="dj">旋律</a></li>
<li><a href="search.asp?keyword=纯弹" target="dj">纯弹</a></li>
<li><a href="search.asp?keyword=嗨爆" target="dj">嗨爆</a></li>
<li><a href="search.asp?keyword=RnB" target="dj">R&B</a></li>
<li><a href="search.asp?keyword=House" target="dj">House</a></li>
<li><a href="search.asp?keyword=PoP" target="dj">PoP</a></li>
<li><a href="Book/" target="_blank">网站留言</a></li>
</ul>
</div>
<div class="b0">
<div id="n2">
<ul>
<li><a href="djtop/index.html" target="dj"> 最新上传舞曲</a></li>
<li><a href="djtop/h.html" target="dj">试听总排行</a></li>
<li><a href="djtop/d1.html" target="dj">今日视听排行</a></li>
<li><a href="djtop/d2.html" target="dj">昨日视听排行</a></li>
<li><a href="djtop/w2.html" target="dj">上周试听排行</a></li>
<li><a href="djtop/w1.html" target="dj">本周试听排行</a></li>
<li><a href="djtop/m2.html" target="dj">上月试听排行</a></li>
<li><a href="djtop/m1.html" target="dj">本月试听排行</a></li>
<li><a href="DjTop/good.html" target="dj">精选舞曲视听</a></li>
<li><a href="Good/Index.html" target="dj">推荐舞曲视听</a></li>
<li><a href="get.asp" target="_blank">会员宣传积分 </a></li>
</ul>
</div>
</div>
</div>
</div>
<div id="ww">
<div id="w">
<div id="w2">
<div class="b6">
<h3><span style="float: right; padding-right: 2px;"><a href="djtop/h.html" target="_blank">更多>></a></span><span style="float: left;">24小时试听总榜</span></h3>
<form name="xydjplay" method="get" target="xydj" action="playsong.asp">
<script src="Js/paihang.js"></script>
<div class="e">
<input type="submit" value="连播舞曲" title="请先选择你想听的歌曲后再点击连播" /> <input type="reset" name="Submit22" value="重 选" />
</div>
</form>
</div>
</div>
<div id="w1">
<table border="1" width="764" id="table14" cellpadding="0" style="border-collapse: collapse" bordercolor="#3B80C6">
<tr>
<td bgcolor="#ffffff" align="left">
<table border="2" cellpadding="0" cellspacing="0" width="760" height="0" bordercolor="#E4E9F0">
<tr>
<td bgcolor=#E4E9F0>
<p align="center" style="line-height: 150%"><font color=#000000 size=4><b><%=zhanming%>--程序出售与提供--<%=yuming%></b>
</td>
</tr>
<tr>
<td>
<table border="0" cellpadding="0" cellspacing="0" width="750" height="0">
<tr>
<td bgcolor=#3B80C6 width="177">
<table border="0" cellpadding="0" cellspacing="0" width="177" height="0">
<TR>
<TD vAlign=top align=middle width=99%
colSpan=3> <IMG style="WIDTH: 177px; HEIGHT: 79px" height=79
alt="" hspace=0 src="i/gongh.gif"
width=177 border=0></TD></TR>
</table>
</td>
<td width="100%">
<table border="0" cellpadding="0" cellspacing="0" width="100%" height="0">
<TR>
<TD vAlign=top align=middle width=100% colSpan=3>
<P align=left><SPAN
style="FONT-SIZE: 9pt"><FONT color=#ff6600><SPAN
style="FONT-SIZE: 9pt">开户姓名：</SPAN></FONT><SPAN
style="FONT-SIZE: 9pt"><%=cardhufour%> </SPAN></P></SPAN></TD></TR>
<TR>
<TD vAlign=top align=middle width=100% colSpan=3>
<P align=left><SPAN
style="FONT-SIZE: 9pt"><FONT color=#ff6600><SPAN style="FONT-SIZE: 9pt">工行卡号：</SPAN></FONT><SPAN style="FONT-SIZE: 9pt"><%=cardnbfour%></SPAN></P></SPAN></TD></TR>
<TR>
<TD vAlign=top align=middle width=100% colSpan=3>
<P align=left><SPAN
style="FONT-SIZE: 9pt"><FONT color=#ff6600><SPAN
style="FONT-SIZE: 9pt">开户地址：</SPAN></FONT><SPAN
style="FONT-SIZE: 9pt"><%=cardcityfour%></SPAN></P></SPAN></TD></TR>
<TR>
<TD vAlign=top align=middle width=100% colSpan=3>
<P align=left><SPAN
style="FONT-SIZE: 9pt"><FONT color=#ff6600><SPAN
style="FONT-SIZE: 9pt">汇款说明：</SPAN></FONT><SPAN
style="FONT-SIZE: 9pt">请在您当地工商银行汇款</SPAN></P></SPAN></TD></TR>
</table>
</td>
<td width="277">
<table border="0" cellpadding="0" cellspacing="0" width="277" height="0">
<TR>
<TD vAlign=top align=left width=99%
colSpan=3><b><font color=#ff0000>>>注意：<br> 程序购买后请联系站长<a target=blank href=http://wpa.qq.com/msgrd?V=1&Uin=183536099&Site=[<%=yuming%>]&Menu=yes><img border="0" src=http://wpa.qq.com/pa?p=1:183536099:10 alt="<%=zhanming%>"></a><br> 售后手机联系：13874215670(Q咨询) <br> 售后服务好-信誉有保证~</b></TD></TR>
</table>
</td>
</TR>
</table>
</td>
</TR>
</table>
<table width="100%" border="1" align="center" cellpadding="1" cellspacing="0" bordercolorlight="#E4E9F0" bordercolordark="#F7F7F7"><tr><td><table cellSpacing=0 cellPadding=1 width=100% align=center border=0>
<tr align="center" bgcolor=#FFFFFF>
<%
sql="select * from softdown order by id desc"
rs.open sql,conn,1,1
if rs.EOF then
response.write "未收录软件"
else
MaxPerPage=7
PageUrl="soft.asp"
totalPut=rs.recordcount
if currentpage<1 then currentpage=1
if (currentpage-1)*MaxPerPage>totalput then
if (totalPut mod MaxPerPage)=0 then
currentpage= totalPut \ MaxPerPage
else
currentpage= totalPut \ MaxPerPage + 1
end if
end if
if currentPage=1 then
showContent
showpage totalput,MaxPerPage,PageUrl
else
if (currentPage-1)*MaxPerPage<totalPut then
rs.move (currentPage-1)*MaxPerPage
dim bookmark
bookmark=rs.bookmark
showContent
showpage totalput,MaxPerPage,PageUrl
else
currentPage=1
showContent
showpage totalput,MaxPerPage,PageUrl
end if
end if
end if
rs.close
sub showContent
%>
<%
i=0
do while not rs.eof
i=i+1
%>
<table width="100%" border="1" align="center" cellpadding="1" cellspacing="0" bordercolorlight="#E4E9F0" bordercolordark="#F7F7F7">
<TBODY>
<tr>
<%
if rs("pic")<>"" then
tpic=rs("pic")
else
tpic="i/cxno.gif"
end if
%>
<td width="20%" rowspan="5" align="center"><a href=<%=tpic%> target=_blank>
<img border="0" src="<%=tpic%>" width="120" height="180" alt="点击放大"></a></td>
<td width="39%" height="20" colspan=2><b><FONT color=#FF6600>软件名称：</font><%=rs("name")%><b></td>
<td width="10%" align="center">
<a target="_blank" href="sdown.asp?id=<%=rs("id")%>"><FONT color=#FF0000>点这里下载</FONT></a></td>
</tr>
<tr>
<td width="15%" height="20"> <font color="#FF0000">软件大小：</font><%=rs("size")%></td>
<td width="35%" align="center">
<font color="#FF0000">演示地址：</font><a target="_blank" href="<%=rs("home")%>"><%=rs("home")%></a></td>
<td width="18%" align="center">
<font color="#FF0000">运行环境：</font><%=rs("system")%></td>
</tr>
<tr>
<td width="79%" height="20" colspan=3> <font color="#FF0000">更新时间：</font><%=rs("dateandtime")%></td>
</tr>
<tr>
<td width="79%" valign="top" colspan=3>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr><td width="100%" height="3"> </td></tr></table>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr valign=top><td width="100%" height="20"><font color="#FF0000">软件简介：</font></td></tr>
<tr><td width="100%"><%=rs("intro")%></td></tr></table>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr><td width="100%" height="3"> </td></tr></table>
</td>
</tr>
<%
if i>=MaxPerPage then exit do
rs.movenext
loop
%>
</TBODY></TABLE>
<%
end sub
function showpage(totalnumber,maxperpage,filename)
dim n
if totalnumber mod maxperpage=0 then
n= totalnumber \ maxperpage
else
n= totalnumber \ maxperpage+1
end if
%>
<table border="1" width="100%" id="table24" bordercolor="#E2DFD5">
<tr>
<td align="center">
<FORM name=form1 onsubmit="return checkdata2()"
action=<%=filename%>?id=<%=id%> method=post>
<font color="#000001">共</font><font color="<%=AlertFColor%>"><font color="#000001"><%=totalnumber%>个软件
<%if CurrentPage<2 then%>
首页 上一页
<%else%>
</font>
<a href="<%=filename%>?page=1"><font color="#000001">首页</font></a><a href="<%=filename%>?page=<%=CurrentPage-1%>"><font color="#000001">上一页</font></a></font><font color="#000001">
<%
end if
if n-currentpage<1 then
%>
下一页 末页
<%else%>
</font>
<a href="<%=filename%>?page=<%=CurrentPage+1%>">
<font color="#000001">下一页</font></font></a><font color="#000001"> </font> <a href="<%=filename%>?page=<%=n%>">
<font color="#000001">末页</font></a><font color="#000001">
<%end if%>
页次:<font color="<%=AlertFColor%>"><%=CurrentPage%>/<%=n%></font>页 </font>
</FORM>
<%end function%>
</td>
</tr>
</table>
<%
set rs=nothing
conn.close
set conn=nothing
%>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr></table>
</div>
</div>
</div>
<div id="ww">
<div id="w">
<div class="bot">
声明：<%=banquan%><br>
CopyRight © 2007-2009, <%=yuming%>, Inc. All Rights Reserved <%=zhanming%> <br><a target="_blank" href="<%=bdizhi%>"><%=beian%></a> <!--jsq--><%=jishuqi%>
</div>
</div>
</div>
<script language="javascript" type="text/javascript" src="js/fenlei.JS"></script>
</body>
</html>