📄 srch.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">
<script src="../script/trim.js" language="JavaScript"></script>
<script src="../script/validdate.js" language="JavaScript"></script>
<script language='JavaScript'>
function isDate(theYear,theMonth,theDay)
{
//定义年,月,日变量,赋值
var selYear;
var selMonth;
var selDay;
selYear=parseInt(theYear);
selMonth=parseInt(theMonth);
selDay=parseInt(theDay);
//定义12月的天数数组,赋值
var arrMonthDay;
arrMonthDay=new Array(12);
arrMonthDay[0]=31;
arrMonthDay[1]=28;
arrMonthDay[2]=31;
arrMonthDay[3]=30;
arrMonthDay[4]=31;
arrMonthDay[5]=30;
arrMonthDay[6]=31;
arrMonthDay[7]=31;
arrMonthDay[8]=30;
arrMonthDay[9]=31;
arrMonthDay[10]=30;
arrMonthDay[11]=31;
//判断所选的日期是否合法
if (arrMonthDay[selMonth-1]>=selDay)
{
return(true);
}
else
{
//判断是否选为润年的二月
if ((selMonth==2)&&((selYear%4==0 && selYear%100!=0) ||(selYear%100==0 && selYear%400==0) ))
{
if (selDay<=29)
return(true) ;
else
return(false) ;
}
else
{return(false) ;}
}
}
function daychange()
{
var year
var month
var day
year=document.add.year1.options[document.add.year1.selectedIndex].value;
month=document.add.month1.options[document.add.month1.selectedIndex].value;
day=document.add.day1.options[document.add.day1.selectedIndex].value;
if (!(isDate(year,month,day)))
{
alert("您的日期有错误！");
document.add.month1.selectedIndex=0;
document.add.day1.selectedIndex=0;
}
}
function daychange2()
{
var year
var month
var day
year=document.add.year2.options[document.add.year2.selectedIndex].value;
month=document.add.month2.options[document.add.month2.selectedIndex].value;
day=document.add.day2.options[document.add.day2.selectedIndex].value;
if (!(isDate(year,month,day)))
{
alert("您的日期有错误！");
document.add.month2.selectedIndex=0;
document.add.day2.selectedIndex=0;
}
}
</script>
<script language='JavaScript'>
function check1(form1){
if (isNaN(form1.risePercent1.value))
{alert('涨浮必须是数字!');
form1.risePercent1.focus();
form1.risePercent1.select();
return (false);
}
if (isNaN(form1.risePercent2.value))
{alert('涨浮必须是数字!');
form1.risePercent2.focus();
form1.risePercent2.select();
return (false);
}
if (isNaN(form1.stockValue1.value))
{alert('每股价必须是数字!');
form1.stockValue1.focus();
form1.stockValue1.select();
return (false);
}
if (isNaN(form1.stockValue2.value))
{alert('每股价必须是数字!');
form1.stockValue2.focus();
form1.stockValue2.select();
return (false);
}
if (isNaN(form1.topOrder1.value))
{alert('名次必须是数字!');
form1.topOrder1.focus();
form1.topOrder1.select();
return (false);
}
if (isNaN(form1.topOrder2.value))
{alert('名次必须是数字!');
form1.topOrder2.focus();
form1.topOrder2.select();
return (false);
}
}
</script>
</head>
<body bgcolor="#FFFFE0">
<%
set rsSelect=server.CreateObject("adodb.recordset")
%>
<form method=POST action=list.asp name=srch onsubmit="return check1(this);">
<p align=center><b><font size=4 color=#0000FF><u>股市涨浮查询</u></font></b></p>
<div align=center><center>
<table style="border: 1 solid #0000FF" width=85%>
<tr>
<td style="border: 1 solid #0000FF" align=right>地区:</td>
<td style="border: 1 solid #0000FF"><select name=area >
<option value=01>沪A
<option value=02>深A
</select>
</td>
</tr>
<tr>
<td style="border: 1 solid #0000FF" align=right>股票名称:</td>
<td style="border: 1 solid #0000FF"><input type=Text name=stockName size=20 maxLength=50></td>
</tr>
<tr>
<td style="border: 1 solid #0000FF" align=right>涨浮:</td>
<td style="border: 1 solid #0000FF">从<input type=Text name=risePercent1 size=10 maxLength=18>到<input type=Text name=risePercent2 size=10 maxLength=18></td>
</tr>
<tr>
<td style="border: 1 solid #0000FF" align=right>每股价:</td>
<td style="border: 1 solid #0000FF">从<input type=Text name=stockValue1 size=10 maxLength=18>到<input type=Text name=stockValue2 size=10 maxLength=18></td>
</tr>
<tr>
<td style="border: 1 solid #0000FF" align=right>名次:</td>
<td style="border: 1 solid #0000FF">从<input type=Text name=topOrder1 size=10 maxLength=9>到<input type=Text name=topOrder2 size=10 maxLength=9></td>
</tr>
<tr>
<td style="border: 1 solid #0000FF" align=right>更新时间:</td>
<td style="border: 1 solid #0000FF" align=left ><p>是否按时间搜索<input type="checkbox" name="regtime" value="regtimeyes">
<br>起始日期：
<select name="year1" size="1" style=" width:65px" onChange="daychange();">
<%for i=1999 to 2010
if i=year(now) then%>
<option selected value="<%=cstr(year(now))%>"><%=year(now)%></option>
<%else%>
<option value="<%=cstr(i)%>"><%=cstr(i)%></option>
<%end if
next %>
</select>
年<select name="month1" size="1" onchange="daychange();">
<%for i=1 to 12
if i=month(now) then%>
<option selected value="<%=month(now)%>"><%=month(now)%></option>
<%else%>
<option value="<%=i%>"><%=i%></option>
<%end if
next%>
</select>
月
<select name="day1" size="1" onchange="daychange();">
<%for i=1 to 31
if i=1 then%>
<option selected value=<%=i%>><%=i%></option>
<%else%>
<option value="<%=i%>"><%=i%></option>
<%end if
next%>
</select>
日<br>终止日期：
<select name="year2" size="1" style=" width:65px" onChange="daychange2();">
<%for i=1999 to 2010
if i=year(now) then%>
<option selected value="<%=cstr(year(now))%>"><%=year(now)%></option>
<%else%>
<option value="<%=cstr(i)%>"><%=cstr(i)%></option>
<%end if
next %>
</select>
年<select name="month2" size="1" onChange="daychange2();">
<%for i=1 to 12
if i=month(now) then%>
<option selected value="<%=month(now)%>"><%=month(now)%></option>
<%else%>
<option value="<%=i%>"><%=i%></option>
<%end if
next%>
</select>
月<select name="day2" size="1" onChange="daychange2();">
<%for i=1 to 31
if i=day(now) then%>
<option selected value="<%=day(now)%>"><%=day(now)%></option>
<%else%>
<option value="<%=i%>"><%=i%></option>
<%end if
next%>
</select>
日 </p>
</td>
</tr>
<tr>
<td style="border: 1 solid #0000FF" colspan=2 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 + -