📄 aviewrecord.asp

📁 online sales system of texttile mill was a project within which there was great opportunity for Lear
💻 ASP
字号:
<!-- #include file="conn.asp" -->
<html>
<head>
<script language="JavaScript">
	function performCheck()
	{
		var day = document.recordform.day.value;
		var month = document.recordform.month.value;
		var year = document.recordform.year.value;
		
		if ( year == "" )
		{
			alert ( "Please enter the year." );
			return false;
		}
		
		return true;
	}
</script>
</head>

<body bgcolor="">
<center><FONT face=Georgia color=#cc0033 size=2><b>Welcome Administrator</font></center><br>
<%
if session("admin") = "" then
'administrator not logged in
response.redirect "administrator.asp"
end if
%>
<form action="ashowrecord.asp" name="recordform" method="post" onsubmit="return performCheck()">
<center>&nbsp;
</center>
<CENTER>&nbsp;</CENTER>
<CENTER>&nbsp;</CENTER>
<CENTER>&nbsp;</CENTER>
<CENTER>Select Date&nbsp;&nbsp;<SELECT style="WIDTH: 108px" name=day> <OPTION 
  value=0 selected>Whole Month</OPTION> <OPTION value=1>1</OPTION> <OPTION 
  value=2>2</OPTION> <OPTION value=3>3</OPTION> <OPTION value=4>4</OPTION> 
  <OPTION value=5>5</OPTION> <OPTION value=6>6</OPTION> <OPTION 
  value=7>7</OPTION> <OPTION value=8>8</OPTION> <OPTION value=9>9</OPTION> 
  <OPTION value=10>10</OPTION> <OPTION value=11>11</OPTION> <OPTION 
  value=12>12</OPTION> <OPTION value=13>13</OPTION> <OPTION value=14>14</OPTION> 
  <OPTION value=15>15</OPTION> <OPTION value=16>16</OPTION> <OPTION 
  value=17>17</OPTION> <OPTION value=18>18</OPTION> <OPTION value=19>19</OPTION> 
  <OPTION value=20>20</OPTION> <OPTION value=21>21</OPTION> <OPTION 
  value=22>22</OPTION> <OPTION value=23>23</OPTION> <OPTION value=24>24</OPTION> 
  <OPTION value=25>25</OPTION> <OPTION value=26>26</OPTION> <OPTION 
  value=27>27</OPTION> <OPTION value=28>28</OPTION> <OPTION value=29>29</OPTION> 
  <OPTION value=30>30</OPTION> <OPTION 
value=31>31</OPTION></SELECT>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
Select Month
<select name="month">
	<option value="1" selected>January</option>
	<option value="2">February</option>
	<option value="3">March</option>
	<option value="4">April</option>
	<option value="5">May</option>
	<option value="6">June</option>
	<option value="7">July</option>
	<option value="8">August</option>
	<option value="9">September</option>
	<option value="10">October</option>
	<option value="11">November</option>
	<option value="12">December</option>
</select><br><br>
Enter the Year <input name="year" size="20" ><br><br>
Select the distribution office
<select name="city">
<%
	Set oRs = Server.CreateObject("ADODB.RecordSet")
	SQL = "select distinct city from Buyers"
	Set oRs = objcon.execute(SQL)
	while not oRs.EOF
			response.write "<Font face=Tahoma size=2><option value='" & oRs.Fields("city") & "'></Font>" & oRs.Fields("city")
	oRs.MoveNext
	Wend
	oRs.close

	Set oRs = nothing

%>		
</select><br><br>
<input type="reset" value=Reset>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<input type="submit" value="Show Record"> 
</b><br><br><b><Font face=Tahoma><a href=admin_options.asp><font size="2">Back 
to options </font></a></Font><font size="2">&nbsp;</font></b></CENTER>
</form>
</body>
</html>
⌨️ 快捷键说明

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