www.gusucode.com > 共享世纪内容管理系统 2.1 build 080704 全站开源版 > admin/down_cx_add.asp
<%Admin="DownAdd"%>
<!--#include file="check.asp"-->
<!--#include file="mdb_path_down.asp"-->
<!--#include file="Downconfig.asp"-->
<%
'强制浏览器重新访问服务器下载页面，而不是从缓存读取页面
Response.Buffer = True
Response.Expires = -1
Response.ExpiresAbsolute = Now() - 1
Response.Expires = 0
Response.CacheControl = "no-cache"
%>
<%
if CheckAdmin("DownTS",admin) then
DownTS="ok"
end if
DownHot=3
if CheckAdmin("DownHot3",xoYuStudioAdminAdmin) then DownHot=3
if CheckAdmin("DownHot4",xoYuStudioAdminAdmin) then DownHot=4
if CheckAdmin("DownHot5",xoYuStudioAdminAdmin) then DownHot=5
if xoYuStudioCheckAdminAll="ok" then DownHot=5
savetime=Now()+webtime/24
set rs=server.CreateObject("ADODB.RecordSet")
TT=TT & "<a class=xoYuStudioSort href=down_sort.asp>软件首页</a>"
if request("id")<>"" then
rs.open "select * from downtype where id="&request("id"),conn,1,1
if not rs.EOF then
TN=split(rs("tname"),"|")
TI=split(rs("ts"), ",")
for i = 0 to ubound(TN)-1
TT=TT & ">> <a class=xoYuStudioSort href=down_sort.asp?id="&TI(i)&">"&TN(i)&"</a>"
next
tj=rs("tj")
end if
rs.close
end if
thistype=TT
rs.open ("select * from downtype where tj>1 order by ts"),conn,1,1
tn=""
do while not rs.eof
tname=replace(rs("tname"),"|","->")
if rs("tj")=2 and rs("tn")<>tn then
i=i+1
if i=2 then
i=0
color="#808000"
else
color="#000000"
end if
end if
tn=rs("tn")
if rs("tstart")<>"" then
else
typelist=typelist&"<option style='COLOR:"&color&"' value='"&rs("id")&"'>"&tname&"</option>"
end if
rs.MoveNext
loop
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
<SCRIPT LANGUAGE="JavaScript">
helpstat = false;
stprompt = true;
basic = false;
function thelp(swtch){
if (swtch == 1){
basic = false;
stprompt = false;
helpstat = true;
} else if (swtch == 0) {
helpstat = false;
stprompt = false;
basic = true;
} else if (swtch == 2) {
helpstat = false;
basic = false;
stprompt = true;
}
}
function AddText(NewCode) {
document.frmAnnounce.body.value+=NewCode
}
function runEx(){
//alert('请注意，按下确定将生成页面，按下后请稍后....');
var winEx = window.open("", "winEx", "width=0,height=0,status=no,menubar=no,scrollbars=no,resizable=no");
winEx.document.open("text/html", "replace");
winEx.document.write(unescape(event.srcElement.parentElement.children[2].value));
winEx.document.close();
}
</SCRIPT>
<script language="Javascript">
<!-- hide
function insertsmilie(smilieface){
document.frmAnnounce.body.value+=smilieface;
}
// -->
</script>
<script language="javascript">
function ToSystem(addTitle) {
var revisedTitle;
var currentTitle;
currentTitle = document.frmAnnounce.system.value;
revisedTitle = currentTitle+addTitle;
document.frmAnnounce.system.value=revisedTitle;
document.frmAnnounce.system.focus();
return; }
</script>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta copy="WWW.2KY.CN 共享世纪">
<title>晓宇听幽网站内容管理系统</title>
<link rel="stylesheet" href="admin.css" type="text/css">
<title>添加软件</title>
</head>
<body topmargin="1" leftmargin="1">
<form action="down_cx_add_save.asp?d=addsave&id=<%=request("id")%>" method=post name="frmAnnounce">
<div align="center">
<center>
<table border="0" cellspacing="0" class="tableBorder" width="98%" cellpadding="2" height="316" style="border-collapse: collapse;background-color:#E3E3E3;" bordercolor="#111111">
<tr>
<th width="100%" height="22"><b><%=thistype%>++（添加程序
2/2）++</b></td>
</tr>
<tr>
<td width="100%" height="15" class="forumRow"><font color="#000080"><b>软件信息</b> </font>
<font color="#808080">红字必填</font></td>
</tr>
<tr>
<td width="100%" height="185">
<table border="0" cellspacing="0" style="border-collapse: collapse" class="forumRow" height="246">
<tr>
<td class="forumRow" width="60" height="20"><font color="#FF0000">程序类别</font>：</td>
<td class="forumRow" height="20"><select size="1" name="tid">
<%if request("id")<>"" then
response.write("<option selected value='"&request("id")&"'>"&thistype&"("&request("id")&")</option>")
else
response.write("<option selected value=''>- - = = = 请选择软件分类 = = = - -</option>")
end if%><%=typelist%>
</select></td>
</tr>
<tr>
<td class="forumRow" width="60" height="20"><font color="#FF0000">软件名称</font>：</td>
<td class="forumRow" height="20">
<input type="text" size=27 name="cxn" value="<%=request("cxn")%>"> 软件版本：<input type="text" size=29 name="cxv"></td>
</tr>
<input type=hidden checked type="radio" value="0" name="gs">
<tr>
<td height="20" height="60" width="60">软件性质：</td>
<td height="20"><select name="cd" size="1">
<option selected value="">选择类别</option>
<%
if xoYuDownLb<>"" then
LB=split(xoYuDownLb,",")
for i=0 to ubound(LB)
if LB(i)<>"在线电影" and LB(i)<>"精彩动画" and LB(i)<>"特别软件" then
response.write "<option value='"&LB(i)&"'>"&LB(i)&"</option>"
end if
next
end if
%>
</select><select name="yy" size="1">
<option selected>选择语言</option>
<%
if xoYuDownYy<>"" then
YY=split(xoYuDownYy,",")
for i=0 to ubound(YY)
response.write "<option value='"&YY(i)&"'>"&YY(i)&"</option>"
next
end if
%>
</select><select name="sq" size="1">
<option selected value="">授权方式</option>
<%
if xoYuDownSq<>"" then
SQ=split(xoYuDownSq,",")
for i=0 to ubound(SQ)
response.write "<option value='"&SQ(i)&"'>"&SQ(i)&"版</option>"
next
end if
%>
</select>大小:<input type="text" size=6 name="size"> 评价:<select size="1" name="hot">
<%for i=1 to DownHot%>
<option<%if i=3 then%> selected<%end if%> value="<%=i%>"><%=i%>星</option>
<%next%>
</select></td>
</tr>
<tr>
<td width="60" height="35">系统平台：</td>
<td height="35">
<input type="text" size=74 name="system" value=""><br>
<font color="#808080">平台选择：<%
if xoYuDownPt<>"" then
PT=split(xoYuDownPt,",")
for i=0 to ubound(PT)
response.write "<a href='javascript:ToSystem("""&PT(i)&""")'>"&PT(i)&"</a>/"
next
end if
%></font></td>
</tr>
<tr>
<td width="60" height="20">演示网站： </td>
<td height="20"><input type="text" size=28 name="lu"> 联系信箱：<input type="text" size=28 name="ln"></td>
</tr>
<tr>
<td width="60" height="20">注册连接：</td>
<td height="20"><input type="text" size=74 name="reg"></td>
</tr>
<tr>
<td width="60" height="20">软件图片： </td>
<td height="20"><input type="text" size=35 name="pic">会员软件<select size="1" name="hy">
<option value="0"></option>
<option value="1">普通会员</option>
<option value="2">高级会员</option>
</select> 推荐软件<input type="checkbox" name="show" value="1"></td>
</tr>
<tr>
<td nowrap valign="top" height="88" width="60">软件简介：<br>
<input type="checkbox" name="html" value="yes" checked>HTML<br>
</td>
<td class="forumRow" height="88"><textarea style="display:none" rows="6" name="body" cols="70"></textarea>
<iframe ID="eWebEditor1" src="../edit/bianji.asp?id=body&style=full_code" frameborder="0" scrolling="no" width="490" HEIGHT="350"></iframe></td>
</tr>
<tr>
<td height="20">解压密码：</td>
<td width="554" height="20"><input type="text" size=20 name="pwd"><%if DownTS="ok" then%>
<input type="checkbox" name="zd_date_yes" value="yes">自定修改时间<input type="text" size=19 name="zd_date" value="<%=savetime%>"> 关键字<input type="text" size=10 name="keyword" value=""><%end if%></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="100%" height="15"><font color="#FF0000">下载地址</font> <font color="#808080">(序号|下载说明|下载地址|删除)
下载地址都不能为空</font></td>
</tr>
<tr>
<td width="100%" height="22">
<script language="javascript">
function setid()
{
str='';
if(!window.frmAnnounce.no.value)
window.frmAnnounce.no.value=1;
for(i=1;i<=window.frmAnnounce.no.value;i++)
str+=''+'<INPUT TYPE="text" NAME=no'+i+' value='+i+' size=2>: <input type="text" name="filename'+i+'" value="厦门电信下载" style="padding-left:1pt" size=23> <input type="text" name="file'+i+'" style="padding-left:1pt" size=55 value="http://www3.2ky.cn/down/200708/"><BR>';
window.upid.innerHTML=str+'<br>';
}
</script>设置添加地址的数量:<input type="text" name="no" value="1" size=2><input type="button" name="Button" onClick="setid();" value="添加"></td>
</tr>
<tr>
<td id="upid" height="1">
</td>
</tr>
<tr>
<th width="100%" align="center" height="22">
<input name="change" value="添加" type="submit">
<input name="change1" value="重置" type="reset"> <input type="checkbox" name="makehtml" value="yes" checked>自动生成HTML页</td>
</tr>
</table>
</center>
</div>
</form>
</body>
</html>