📄 admin_jzz_list.asp

📁 本程序采用ACC数据核心构件！！功能介绍：程序代码重新设计与优化
💻 ASP
📖 第 1 页 / 共 2 页
字号:
上一页 12
<td align="center" class=tablerow1><%=rs("vsname")%></td>
<td align="center" class=tablerow1><%=rs("vsserver")%></td>
<td align="center" class=tablerow1><%if rs("top")=true then response.write "<font color=#0000FF>固顶中</font>" else response.write "<font color=#CCCCCC>未固顶</font>" end if%></td>
<td align="center" class=tablerow1><%if rs("ulock")=true then response.write "<font color=#CCCCCC>通过</font>" else response.write "<font color=red>等待</font>" end if%></td>
<td align="center" class=tablerow1><%if rs("top")=false then response.write "<a href=admin_Jzz_list.asp?guiqi=jzztop&id="&rs("id")&"&act=top>固顶</a>" else response.write "<a href=admin_Jzz_list.asp?guiqi=jzztop&id="&rs("id")&"&act=utop><font color=red>解固</font></a>" end if%> | <a href=admin_Jzz_list.asp?action=jzzedit&id=<%=rs("id")%>><font color="#008000">编辑</font></a></td>
</tr>
<%
if i=rs.pagesize then exit do end if
i=i+1
rs.movenext
loop%>
<tr>
<td class=tablerow1 colspan="8">
<input type='checkbox' name='chkall' value='on' onclick='CheckAll(this.form)'> 全选/反选
<input type=submit value=批量固顶> <input type=button value=批量删除 onclick=chkid()>
</td>
</tr>
<tr>
<td class=tablerow1 colspan="8"><%call page%></td>
</tr>
</form>
</table>
<%end if
end if
if request.querystring("action")="jzzulock" then%>
<table width=98% align="center" border="0" cellspacing="1" cellpadding="2" class="tableBorder">
<form method=post name=formguiqi action=admin_Jzz_list.asp?guiqi=jzzulock>
<tr>
<th width="4%">选择</th>
<th width="9%">所在游戏</th>
<th width="*">发布家族名称</th>
<th width="*">对方家族名称</th>
<th width="*">对战服</th>
<th width="8%">对战时间</th>
<th width="8%">家族联系QQ</th>
<th width="12%">操作</th>
</tr>
<% 
sql="select Gq_jzzdata.id,Gq_jzzdata.jzname,Gq_jzzdata.vsname,Gq_jzzdata.vstime,Gq_jzzdata.jzmaster,Gq_jzzdata.jzqq,Gq_jzzdata.jzTel,Gq_jzzdata.vsserver,Gq_jzzdata.about,Gq_jzzdata.vsweb,Gq_jzzdata.vswebqq,Gq_jzzdata.vswebtel,Gq_jzzdata.addtime,Gq_jzzdata.gameid,Gq_jzzdata.ulock,Gq_jzzdata.top,Gq_gametype.game FROM Gq_jzzdata,Gq_gametype where Gq_jzzdata.gameid=Gq_gametype.id and Gq_jzzdata.ulock=0 order by addtime desc"
rs.open sql,conn,1,1 
if rs.eof and rs.bof then
response.write "<tr><td align='center' class=tablerow1 colspan='8'>当前没有未通过审核的家族战信息！</td></tr>" 
else 
do while not rs.eof
%>
<tr>
<td align="center" class=tablerow1><input name="sel" type="checkbox" id="sel" value="<%=rs("id")%>"></td>
<td align="center" class=tablerow1><%=rs("game")%></td>
<td align="center" class=tablerow1><a href="###" onClick="window.open('admin_Jzz_display.asp?id=<%=rs("id")%>','info','scrollbars=yes,resizable=no,width=520,height=460,menubar=no,left=0')" title="查看详细内容"><%=rs("jzname")%></a></td>
<td align="center" class=tablerow1><%=rs("vsname")%></td>
<td align="center" class=tablerow1><%=rs("vsserver")%></td>
<td align="center" class=tablerow1><%=rs("vstime")%></td>
<td align="center" class=tablerow1><%=rs("jzQQ")%></td>
<td align="center" class=tablerow1><%if rs("top")=false then response.write "<a href=admin_Jzz_list.asp?guiqi=jzztop&id="&rs("id")&"&act=top>固顶</a>" else response.write "<a href=admin_Jzz_list.asp?guiqi=jzztop&id="&rs("id")&"&act=utop><font color=red>解固</font></a>" end if%> | <a href=admin_Jzz_list.asp?action=jzzedit&id=<%=rs("id")%>><font color="#008000">编辑</font></a></td>
</tr>
<%
rs.movenext
loop
rs.close
end if
%>
<tr>
<td class=tablerow1 colspan="8">
<input type='checkbox' name='chkall' value='on' onclick='CheckAll(this.form)'> 全选/反选
<input type=submit value=批量审核> <input type=button value=批量删除 onclick=chkid()>
</td>
</tr>
</form>
</table>
<%end if
if request.querystring("action")="jzztop" then%>
<table width=98% align="center" border="0" cellspacing="1" cellpadding="2" class="tableBorder">
<form method=post name=formguiqi action=admin_Jzz_list.asp?guiqi=utop>
<tr>
<th width="4%">选择</th>
<th width="9%">所在游戏</th>
<th width="*">发布家族名称</th>
<th width="*">对方家族名称</th>
<th width="*">对战服</th>
<th width="*">对战时间</th>
<th width="*">家族联系QQ</th>
<th width="12%">操作</th>
</tr>
<% 
sql="select Gq_jzzdata.id,Gq_jzzdata.jzname,Gq_jzzdata.vsname,Gq_jzzdata.vstime,Gq_jzzdata.jzmaster,Gq_jzzdata.jzqq,Gq_jzzdata.jzTel,Gq_jzzdata.vsserver,Gq_jzzdata.about,Gq_jzzdata.vsweb,Gq_jzzdata.vswebqq,Gq_jzzdata.vswebtel,Gq_jzzdata.addtime,Gq_jzzdata.gameid,Gq_jzzdata.ulock,Gq_jzzdata.top,Gq_gametype.game FROM Gq_jzzdata,Gq_gametype where Gq_jzzdata.gameid=Gq_gametype.id and Gq_jzzdata.top=true order by addtime desc"
rs.open sql,conn,1,1 
if rs.eof and rs.bof then 
response.write "<tr><td colspan=10 class=guiqids><p align='center'><font color=red>当前没有未固定的家族战信息~！</font></p></td></tr>" 
else 
do while not rs.eof
%>
<tr>
<td align="center" class=tablerow1><input name="sel" type="checkbox" id="sel" value="<%=rs("id")%>"></td>
<td align="center" class=tablerow1><%=rs("game")%></td>
<td align="center" class=tablerow1><a href="###" onClick="window.open('admin_Jzz_display.asp?id=<%=rs("id")%>','info','scrollbars=yes,resizable=no,width=520,height=460,menubar=no,left=0')" title="查看详细内容"><%=rs("jzname")%></a></td>
<td align="center" class=tablerow1><%=rs("vsname")%></td>
<td align="center" class=tablerow1><%=rs("vsserver")%></td>
<td align="center" class=tablerow1><%=rs("jzQQ")%></td>
<td align="center" class=tablerow1><%if rs("top")=false then response.write "<a href=admin_Jzz_list.asp?guiqi=jzztop&id="&rs("id")&"&act=top>固顶</a>" else response.write "<a href=admin_Jzz_list.asp?guiqi=jzztop&id="&rs("id")&"&act=utop><font color=red>解固</font></a>" end if%> | <a href=admin_Jzz_list.asp?action=jzzedit&id=<%=rs("id")%>><font color="#008000">编辑</font></a></td>
</tr>
<%
rs.movenext
loop
rs.close
end if
%>
<tr>
<td class=tablerow1 colspan="8">
<input type='checkbox' name='chkall' value='on' onclick='CheckAll(this.form)'> 全选/反选
<input type=submit value=批量解固> <input type=button value=批量删除 onclick=chkid()>
</td>
</tr>
</form>
</table>
<%end if%>
<%
if request.querystring("action")="jzzedit" then
dim jzid
id=htmlencode(request("id"))
if id="" or (not isnumeric(id)) then
response.write "<script>alert('参数不正确！！！');window.close()</script>"
response.end
end if
set rs = server.createobject("adodb.recordset")
sql="SELECT Gq_jzzdata.id,Gq_jzzdata.jzname,Gq_jzzdata.vsname,Gq_jzzdata.vstime,Gq_jzzdata.jzmaster,Gq_jzzdata.jzqq,Gq_jzzdata.jzTel,Gq_jzzdata.vsserver,Gq_jzzdata.about,Gq_jzzdata.vsweb,Gq_jzzdata.gameover,Gq_jzzdata.vswebqq,Gq_jzzdata.vswebtel,Gq_jzzdata.addtime,Gq_jzzdata.gameid,Gq_jzzdata.hits,Gq_jzzdata.ulock,Gq_jzzdata.top,Gq_gametype.game FROM Gq_jzzdata,Gq_gametype where Gq_jzzdata.gameid=Gq_gametype.id and Gq_jzzdata.id="&id
rs.open sql,conn,1,1 
if rs.bof and rs.eof then 
rs.close
response.write "<script>alert('无此数据！！！');window.close()</script>"
response.end
else
end if
%>
<SCRIPT language=JavaScript>
function check(){
if(document.form1.jzname.value=="")
  {
alert("发布家族名称不能为空！");
document.form1.jzname.focus();
return false;
}
if(document.form1.vsname.value=="")
{
alert("对战家族名称不能为空！");
document.form1.vsname.focus();
return false;
}
if(document.form1.gameid.value=="")
{
alert("请选择对战服所属的游戏类型！");
document.form1.gameid.focus();
return false;
}
if(document.form1.vstime.value=="")
{
alert("请填写对战时间！");
document.form1.vstime.focus();
return false;
}
if(document.form1.jzmaster.value=="")
{
alert("请填写家族联系人名字！");
document.form1.jzmaster.focus();
return false;
}
if(document.form1.jzqq.value=="")
{
alert("请填写家族联系人QQ！");
document.form1.jzqq.focus();
return false;
}
if(document.form1.jzTel.value=="")
{
alert("请填写家族联系人电话！");
document.form1.jzTel.focus();
return false;
}
if(document.form1.vsserver.value=="")
{
alert("请填写对战服务器名称！");
document.form1.vsserver.focus();
return false;
}
if(document.form1.vsweb.value=="")
{
alert("请填写对战服网站！");
document.form1.vsweb.focus();
return false;
}
if(document.form1.vswebqq.value=="")
{
alert("请填写对战服管理员联系QQ！");
document.form1.vswebqq.focus();
return false;
}
if(document.form1.vswebtel.value=="")
{
alert("请填写对战服管理员联系电话！");
document.form1.vswebtel.focus();
return false;
}
if(document.form1.about.value=="")
{
alert("对战简要简介不能为空！");
document.form1.about.focus();
return false;
}
}
</SCRIPT>
<table width=98% align="center" border="0" cellspacing="1" cellpadding="2" class="tableBorder">
<FORM name=form1 onsubmit="return check()" action=admin_jzz_list.asp?guiqi=jzzedit method=post>
<tr> 
<th colspan="2">家族战管理－－修改家族战</th>
</tr>
<tr>
<td width="18%" align="right" class="TableRow1">发布家族名称：</td>
<td width="82%" class="TableRow1"><INPUT name=jzname value="<%=rs("jzname")%>" maxLength=14><FONT color=#c0c0c0>(<%=rs("addtime")%>发布)</FONT></td>
</tr>
<tr>
<td width="18%" align="right" class="TableRow1">Vs 对战家族名称：</td>
<td class="TableRow1"><INPUT name=vsname id="vsname" value="<%=rs("vsname")%>" size="30" maxLength=30></td>
</tr>
<tr>
<td width="18%" align="right" class="TableRow1">Vs 时间：</td>
<td class="TableRow1"><INPUT name=vstime id=vstime value="<%=rs("vstime")%>" size=19 maxLength=19></td>
</tr>
<tr>
<td width="18%" align="right" class="TableRow1">所在游戏：</td>
<td class="TableRow1"><%
Set Rs_type = Server.CreateObject("ADODB.RecordSet")
Sql_Type="select * from Gq_GameType order by orderid"
rs_type.open sql_type,conn,1,1
%>
                                  <SELECT id=gameid size=1 name=gameid>
                                    <%
if rs_type.eof and rs_type.bof then
	response.Write "<option value= selected>请添加游戏分类</option>"
else
response.Write "<option value="&rs("gameid")&" selected>"&rs("game")&"</option>"
	do while not rs_type.EOF
		response.Write "<option value="&rs_type("id")&">"&rs_type("game")&"</option>"
	rs_type.movenext
	loop
	rs_type.close
end if
%>
                                  </SELECT></td>
</tr>
<tr>
<td width="18%" align="right" class="TableRow1">家族联系人：</td>
<td class="TableRow1"><INPUT name=jzmaster id=jzmaster value="<%=rs("jzmaster")%>" size="30" maxLength=30></td>
</tr>
<tr>
<td width="18%" align="right" class="TableRow1">家族联系人QQ：</td>
<td class="TableRow1"><INPUT name=jzqq id=jzqq value="<%=rs("jzqq")%>" size="30" maxLength=30></td>
</tr>
<tr>
<td width="18%" align="right" class="TableRow1">家族联系电话：</td>
<td class="TableRow1"><input name=jzTel id="jzTel" value="<%=rs("jzTel")%>" size="30" maxlength=50></td>
</tr>
<tr>
<td width="18%" align="right" class="TableRow1">对战服名称：</td>
<td class="TableRow1"><INPUT name=vsserver id=vsserver value="<%=rs("vsserver")%>" size="30" maxLength=30></td>
</tr>
<tr>
<td width="18%" align="right" class="TableRow1">对战服网战：</td>
<td class="TableRow1"><INPUT name=vsweb id=vsweb value="<%=rs("vsweb")%>" size="30" maxLength=50></td>
</tr>
<tr>
<td width="18%" align="right" class="TableRow1">对战服管理员QQ：</td>
<td class="TableRow1"><INPUT name=vswebqq id=vswebqq value="<%=rs("vswebQQ")%>" maxLength=10></td>
</tr>
<tr>
<td width="18%" align="right" class="TableRow1">对战服管理员电话：</td>
<td class="TableRow1"><INPUT name=vswebtel id=vswebtel value="<%=rs("vswebtel")%>" size="30" maxLength=30></td>
</tr>
<tr>
<td width="18%" align="right" class="TableRow1">对战结果：</td>
<td class="TableRow1"><SELECT id=gameover size=1 name=gameover> 
<option value="<%=rs("gameover")%>" selected><%if rs("gameover")=0 then response.write "<font color=#ff0000>对战尚无结果</font>" else if rs("gameover")=1 then response.write ""&rs("jzname")&" <font color=#ff0000>胜</font>" else if rs("gameover")=2 then response.write ""&rs("vsname")&" <font color=#ff0000>胜</font>" else if rs("gameover")=3 then response.write "<font color=#ff0000>双方战和</font>" end if end if end if end if%></option>
<option value="0">对战尚无结果</option>
<option value="1"><%=rs("jzname")%> 胜</option>
<option value="2"><%=rs("vsname")%> 胜</option>
<option value="3">双方战和</option>
%>
                                  </SELECT></td>
</tr>

<tr>
<td width="18%" align="right" class="TableRow1">状态：</td>
<td class="TableRow1">
<INPUT name=hits id="hits" value="<%=rs("hits")%>" size="10" maxLength=20>&nbsp;&nbsp;审核状态<input name="ulock" type="checkbox" id="ulock" value="1" <%if rs("ulock")=true then response.write "checked"%>>
&nbsp;&nbsp;固顶状态<input name="top" type="checkbox" id="top" value="1" <%if rs("top")=true then response.write "checked"%>>
</td>
</tr>
<tr>
<td width="18%" align="right" class="TableRow1">简要介绍：</td>
<td class="TableRow1"><TEXTAREA id=about name=about rows=10 cols=70><%=rs("about")%></TEXTAREA></td>
</tr>
<tr>
<td class="TableRow1" colspan="2" height="30" align="center"><input name="id" type="hidden" id="id" value="<%=rs("id")%>"><INPUT type=submit value=" 编 辑 " name=submit2>&nbsp;&nbsp;&nbsp;&nbsp;<INPUT type=reset value=" 清 除 " name=cmdcancel></td>
</tr>
</form>
</table>
<%end if%> 
<table width=98% align="center" border="0" cellspacing="0" cellpadding="0">
<tr align="middle">
<td height="30" valign="bottom">Copyright (c) 2007-2009 <a target="_blank" href="http://www.xuncms.cn"><b><font color="#708796">XunCms</font><font color="#cc0000">.Cn</font></b></font></a>. All Rights Reserved .</td>
</tr>
<tr align="middle">
<td>Powered by：<a href="http://www.xuncms.cn" target="_blank"><b><font color="#708796">讯图</font><font color="#cc0000">设计</font></b></font> Version 3.2.0 SP2</a></td>
</tr>
</table>
</body>
</html>
上一页 12
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -