📄 update.asp
字号:
<%Response.Buffer=true%>
<%
'修改：
'时间：
'模板设计：秦怀平(jincao@yeah.net)
'开发时间：2000.12
%>
<!--#include file="../include/odbc.asp" -->
<!--#include file="../include/killStr.asp" -->
<!--#include file="../include/checkUser.asp" -->
<!--#include file="../include/checkServer.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Qinhp NetModel Generator">
<meta name="Author" content="QinHuaiPing(秦怀平)">
<link rel="stylesheet" href="../script/style.css" type="text/css">
<%
set rs=server.CreateObject("adodb.recordset")
if request("submit")<>"" then '数据添加/修改
stoptime=request("stoptime") '保存相同信息
gameterm=clng(request("gameterm"))
gameid=request("gameid")
issue=request("issue")
for i=1 to 20 '取名次信息
teamname= request("teamname"&trim(cstr(i)))
if trim(teamname)<>"" then
integralid=request("integralid"&trim(cstr(i)))
successnum=clng(request("successnum"&trim(cstr(i))))
tienum=clng(request("tienum"&trim(cstr(i))))
failnum=clng(request("failnum"&trim(cstr(i))))
toporder=clng(request("toporder"&trim(cstr(i))))
goalnum=clng(request("goalnum"&trim(cstr(i))))
lostgoal=clng(request("lostgoal"&trim(cstr(i))))
totalscore=clng(request("totalscore"&trim(cstr(i))))
if trim(integralid)="" then
sql="select * from news2_integral order by integralid desc"
rs.Open sql,conn,3,3
if rs.Eof then '积分榜编号
integralidtemp=1
else
integralidtemp=rs("integralid")+1
end if
rs.Close
sql="select * from news2_integral where issue='"&issue&"' and gameid='"&gameid&"' "
rs.Open sql,conn,3,3
rs.AddNew '添加新数据
rs("integralid")=integralidtemp
rs("gameid")=gameid
rs("stoptime")=stoptime
rs("gameterm")=gameterm
rs("teamname")=teamname
rs("successnum")=successnum
rs("tienum")=tienum
rs("failnum")=failnum
rs("toporder")=toporder
rs("goalnum")=goalnum
rs("lostgoal")=lostgoal
rs("totalscore")=totalscore
rs("issue")=issue
rs.Update
rs.close
else '更新数据
sql="select * from news2_integral where integralid="&clng(integralid)
rs.Open sql,conn,3,3
rs("gameid")=gameid
rs("stoptime")=stoptime
rs("gameterm")=gameterm
rs("teamname")=teamname
rs("successnum")=successnum
rs("tienum")=tienum
rs("failnum")=failnum
rs("toporder")=toporder
rs("goalnum")=goalnum
rs("lostgoal")=lostgoal
rs("totalscore")=totalscore
rs("issue")=issue
rs.Update
rs.close
end if
end if
next
if trim(request("flag"))="on" then '置立即有效
sql="select * from news2_integral where gameid='"&gameid&"' and flag='1' "
rs.Open sql,conn,3,3
if not rs.EOF then
for i=1 to rs.RecordCount
rs("flag")="0"
rs.Update
rs.MoveNext
next
end if
rs.Close
sql="select * from news2_integral where issue='"&issue&"' and gameid='"&gameid&"' "
rs.Open sql,conn,3,3
if not rs.EOF then
for i=1 to rs.RecordCount
rs("flag")="1"
rs.Update
rs.MoveNext
next
end if
rs.Close
end if
%>
<script language=javascript>
alert("修改成功！");
//location.href =history.back();
</script>
<%end if%>
<script src="../script/trim.js" language="JavaScript"></script>
<script src="../script/validdate.js" language="JavaScript"></script>
<script language='JavaScript'>
function check(form1){
if (trim(form1.stopTime.value)=='')
{alert('字段截止日期不允许为空!');
form1.stopTime.focus();
form1.stopTime.select();
return (false);
}
if (trim(form1.gameTerm.value)=='')
{alert('字段轮次不允许为空!');
form1.gameTerm.focus();
form1.gameTerm.select();
return (false);
}
if (isNaN(form1.gameTerm.value))
{alert('字段轮次必须是数字!');
form1.gameTerm.focus();
form1.gameTerm.select();
return (false);
}
for (var i=3;i<170;i=i+9) //检测名次
{if (isNaN(form1.elements[i].value))
{alert("请在该1字段内填入数字");
form1.elements[i].focus();
form1.elements[i].select();
return (false); }
if (form1.elements[i].value<0)
{alert("数字必须大于0");
form1.elements[i].focus();
form1.elements[i].select();
return (false); }
}
if (trim(form1.teamName1.value)=='')
{alert('字段队名不允许为空!');
form1.teamName1.focus();
form1.teamName1.select();
return (false);
}
for (var i=4;i<172;i=i+9) //检测队名
{
if (trim(form1.elements[i].value).length>50)
{alert("队名超长（50 字以内）");
form1.elements[i].focus();
form1.elements[i].select();
return (false); }
}
for (var i=5;i<180;i=i+9)
{
if (isNaN(form1.elements[i].value))
{alert("请在获胜场次字段内填入数字");
form1.elements[i].focus();
form1.elements[i].select();
return (false); }
if (form1.elements[i].value<0)
{alert("数字必须大于0");
form1.elements[i].focus();
form1.elements[i].select();
return (false); }
}
for (var i=6;i<180;i=i+9)
{
if (isNaN(form1.elements[i].value))
{alert("请在平局场次字段内填入数字");
form1.elements[i].focus();
form1.elements[i].select();
return (false); }
if (form1.elements[i].value<0)
{alert("数字必须大于0");
form1.elements[i].focus();
form1.elements[i].select();
return (false); }
}
for (var i=7;i<182;i=i+9)
{
if (isNaN(form1.elements[i].value))
{alert("请在负场次字段内填入数字");
form1.elements[i].focus();
form1.elements[i].select();
return (false); }
if (form1.elements[i].value<0)
{alert("数字必须大于0");
form1.elements[i].focus();
form1.elements[i].select();
return (false); }
}
for (var i=8;i<182;i=i+9)
{
if (isNaN(form1.elements[i].value))
{alert("请在进球字段内填入数字");
form1.elements[i].focus();
form1.elements[i].select();
return (false); }
if (form1.elements[i].value<0)
{alert("数字必须大于0");
form1.elements[i].focus();
form1.elements[i].select();
return (false); }
}
for (var i=9;i<184;i=i+9)
{
if (isNaN(form1.elements[i].value))
{alert("请在失球字段内填入数字");
form1.elements[i].focus();
form1.elements[i].select();
return (false); }
if (form1.elements[i].value<0)
{alert("数字必须大于0");
form1.elements[i].focus();
form1.elements[i].select();
return (false); }
}
for (var i=10;i<186;i=i+9)
{
if (isNaN(form1.elements[i].value))
{alert("请在积分字段内填入数字");
form1.elements[i].focus();
form1.elements[i].select();
return (false); }
if (form1.elements[i].value<0)
{alert("数字必须大于0");
form1.elements[i].focus();
form1.elements[i].select();
return (false); }
}
}
</script>
</head>
<body bgcolor="#FFFFE0">
<%
sql = "select * from news2_integral where gameid='"&request("gameid")&"' and left(issue,8)='"&request("issue")&"' order by totalscore desc,goalnum-lostgoal desc"
rs.open sql,conn,3,3
'if rs.eof then
' response.write "记录没有找到！"
' response.end
'end if
%>
<%
set rsSelect=server.CreateObject("adodb.recordset")
%>
<form method=POST action=<% =request.servervariables("path_info")%> name=add onsubmit="return check(this);">
<p align=center><b><font size=4 color=#0000FF><u>积分榜数据修改</u></font></b></p>
<div align=center>
<%
if trim(request("gamename"))="" then
sqlSelect ="select gameId,gameName from news2_game where gameid='"&request("gameid")&"'"
rsSelect.open sqlSelect,conn,3,1
Response.Write rsselect("gamename")
rsselect.close
else
Response.Write request("gamename")
end if
%> 期号：<%=request("issue")%>
截止日期:<input type=Text name=stopTime value='<%=now()%>' size=16 maxLength=16>格式:2001-01-11 08:11
<%' Response.end %>轮次:<input type=Text name=gameTerm <%if not rs.eof then Response.write "value="&rs("gameterm")%> size=2 maxLength=2><center>
<br>注：队名为空时整行无效
<table style="border: 1 solid #0000FF" width=95% >
<tr>
<td style="border: 1 solid #0000FF" align=center>名次:</td>
<td style="border: 1 solid #0000FF" align=center>队名:</td>
<td style="border: 1 solid #0000FF" align=center>获胜场次:</td>
<td style="border: 1 solid #0000FF" align=center>平局场次:</td>
<td style="border: 1 solid #0000FF" align=center>负场次:</td>
<td style="border: 1 solid #0000FF" align=center>进球:</td>
<td style="border: 1 solid #0000FF" align=center>失球:</td>
<td style="border: 1 solid #0000FF" align=center>积分:</td>
</tr>
<%
flag=0
for i=1 to 20
if not rs.EOF then
if i=1 and rs("flag")="1" then '保存时是否有效标志
flag=1
end if
%><tr>
<input type=hidden name=integralid<%=trim(cstr(i))%> value=<%=rs("integralid")%> >
<td style="border: 1 solid #0000FF" align=center><input type=Text name=topOrder<%=trim(cstr(i))%> value='<%=i%>' size=3 maxLength=3></td>
<td style="border: 1 solid #0000FF" align=center><input type=Text name=teamName<%=trim(cstr(i))%> value='<%=rs("teamName")%>' size=10 maxLength=50></td>
<td style="border: 1 solid #0000FF" align=center><input type=Text name=successNum<%=trim(cstr(i))%> value='<%=rs("successNum")%>' size=3 maxLength=3></td>
<td style="border: 1 solid #0000FF" align=center><input type=Text name=tieNum<%=trim(cstr(i))%> value='<%=rs("tieNum")%>' size=3 maxLength=3></td>
<td style="border: 1 solid #0000FF" align=center><input type=Text name=failNum<%=trim(cstr(i))%> value='<%=rs("failNum")%>' size=3 maxLength=3></td>
<td style="border: 1 solid #0000FF" align=center><input type=Text name=goalNum<%=trim(cstr(i))%> value='<%=rs("goalNum")%>' size=3 maxLength=3></td>
<td style="border: 1 solid #0000FF" align=center><input type=Text name=lostGoal<%=trim(cstr(i))%> value='<%=rs("lostGoal")%>' size=3 maxLength=3></td>
<td style="border: 1 solid #0000FF" align=center><input type=Text name=totalScore<%=trim(cstr(i))%> value='<%=rs("totalScore")%>' size=3 maxLength=3></td>
<%
rs.MoveNext
else%><tr>
<input type=hidden name=integralid<%=trim(cstr(i))%> >
<td style="border: 1 solid #0000FF" align=center><input type=Text name=topOrder<%=trim(cstr(i))%> value=<%=i%> size=3 maxLength=3></td>
<td style="border: 1 solid #0000FF" align=center><input type=Text name=teamName<%=trim(cstr(i))%> size=10 maxLength=50></td>
<td style="border: 1 solid #0000FF" align=center><input type=Text name=successNum<%=trim(cstr(i))%> value=0 size=3 maxLength=3></td>
<td style="border: 1 solid #0000FF" align=center><input type=Text name=tieNum<%=trim(cstr(i))%> value=0 size=3 maxLength=3></td>
<td style="border: 1 solid #0000FF" align=center><input type=Text name=failNum<%=trim(cstr(i))%> value=0 size=3 maxLength=3></td>
<td style="border: 1 solid #0000FF" align=center><input type=Text name=goalNum<%=trim(cstr(i))%> value=0 size=3 maxLength=3></td>
<td style="border: 1 solid #0000FF" align=center><input type=Text name=lostGoal<%=trim(cstr(i))%> value=0 size=3 maxLength=3></td>
<td style="border: 1 solid #0000FF" align=center><input type=Text name=totalScore<%=trim(cstr(i))%> value=0 size=3 maxLength=3></td>
<%
end if%></tr><%
next
rs.Close
%>
</table><input type=hidden name=gameid value=<%=request("gameid")%>>
<input type=hidden name=gamename value=<%=request("gamename")%>>
<tr><input type=hidden name=issue value=<%=request("issue")%>>
<p align=center valign=bottom><INPUT type="checkbox" name=flag <%if flag=1 then Response.Write "checked"%>>WEB上立即有效 <input type=submit value=' 确定 ' name=submit> <input type=reset value=' 重写 ' name=reset></p>
</tr>
</center></div>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -