⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 add.asp

📁 asp的新闻网站
💻 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">
<%
imageUp=0
set rs=server.CreateObject("adodb.recordset")
if request("submit")<>"" then
	sql="select * from news2_predictGame order by predictid desc"
	rs.open sql,conn,3,3
	if rs.EOF then 
	predictid=1
	else
	predictid=rs("predictid")+1
	end if
	if request("gameId")="" then
		response.write "数据保存出错!原因:特定字段不允许为空!<a href=javascript:history.back()>按此返回</a>"
		response.end
	end if
	gameId=killStr(request("gameId"))
	if not isnumeric(request("gameTerm")) then
		response.write "数据保存出错!原因:字段类型不符!<a href=javascript:history.back()>按此返回</a>"
		response.end
	end if
	'如果类型不符合,请修改转换函数!
	if request("gameTerm")="" then
		gameTerm=0
	else
		gameTerm=cLng(killStr(request("gameTerm")))
	end if
	if request("gameTime")="" then
		response.write "数据保存出错!原因:特定字段不允许为空!<a href=javascript:history.back()>按此返回</a>"
		response.end
	end if
	if not isdate(request("gameTime")) then
		response.write "数据保存出错!原因:字段类型不符!<a href=javascript:history.back()>按此返回</a>"
		response.end
	end if
'如果出错,请检查下面的语句。
	if killStr(request("gameTime"))="" then
		gameTime=now()
	else
		gameTime=killStr(request("gameTime"))
	end if
	for i=1 to 10
		ownerclient="ownerclient"&cstr(i)
		'Response.write trim(request(ownerclient))
		'Response.End 
		if trim(request(ownerClient))<>"" then
			rs.addnew
			rs("predictid")=predictid
			rs("regTime")=now()
			rs("gameid")=gameid
	        rs("gametime")=gametime
	        rs("gameterm")=gameterm
			rs("ownerClient")=left(rtrim(killStr(request(ownerClient))),100)
			rs.update
			predictid=predictid+1
		end if
	next		
	rs.close%>
<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.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);
		}
	if (trim(form1.gameTime.value)=='')
		{alert('字段比赛日期不允许为空!');
		form1.gameTime.focus();
		form1.gameTime.select();
		return (false);
		}
	
	if (trim(form1.ownerClient1.value)=='')
		{alert('字段主客队1不允许为空!');
		form1.ownerClient1.focus();
		form1.ownerClient1.select();
		return (false);
		}
	if (trim(form1.ownerClient1.value).length>100)
		{alert('主客队超长(100 字以内)!');
		form1.ownerClient1.focus();
		form1.ownerClient1.select();
		return (false);
		}
	}
</script>

</head>
<body bgcolor="#FFFFE0">
<%
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><center>
	注:同一轮次;同一比赛时间的赛程可-次添加10条。
	<table style="border: 1 solid #0000FF" width=85%>
		<tr>
			<td style="border: 1 solid #0000FF" align=center>联赛<br>名称</td>
			<td style="border: 1 solid #0000FF" align=center>
				<select size=1 name=gameId>
					<%sqlSelect ="select gameId,gameName from news2_game "
					rsSelect.open sqlSelect,conn,3,1
					while not rsSelect.eof%>
					<option value=<%=rsSelect("gameId")%>><%=rsSelect("gameName")%>
					<%rsSelect.movenext
					wend
					rsSelect.close%>
				</select>
			</td><td style="border: 1 solid #0000FF"  align=center>轮次</td>
			<td style="border: 1 solid #0000FF"  align=center>
			<input type=Text name=gameTerm size=3 maxLength=3></td>
			<td style="border: 1 solid #0000FF"  align=center>比赛<br>日期</td>
			<td style="border: 1 solid #0000FF"  align=center>
			<input type=Text name=gameTime size=20 maxLength=18><br>
			&nbsp;格式:2001-01-11&nbsp;08:11</td>
		</tr>
		<%for i=1 to 10%>
		<tr>
			
		    <td style="border: 1 solid #0000FF" align=center colspan=2>主客队<%=trim(cstr(i))%></td>
		    <td style="border: 1 solid #0000FF"  align=center colspan=4>
		    <input type=Text name=ownerClient<%=i%> size=40 maxLength=100></td>
		</tr>
		<%next%>
		<!--<tr>
			
			<td style="border: 1 solid #0000FF" width="10%" align=center><input type=Text name=gameTerm size=10 maxLength=9></td>
		    <td style="border: 1 solid #0000FF" width="30%" align=center><input type=Text name=gameTime size=20 maxLength=18>
			&nbsp;格式:2001-01-11&nbsp;08:11</td>
			<td style="border: 1 solid #0000FF" width="50%" align=center><input type=Text name=ownerClient size=40 maxLength=100></td>
		
		</tr>-->
		
		<tr>
			<td style="border: 1 solid #0000FF" colspan=6 align=center>
			<input type=submit value=' 确定 ' name=submit> <input type=reset value=' 重写 ' name=reset></td>
		</tr>
	</table>
	</center></div>
</form>
</body>
</html>

⌨️ 快捷键说明

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