数据库通过日期显示

通过日期值显示数据库就像显示你的所有数据子集一样容易。当你在比较你的sql和数据库的数量目录时,这对于划定被通过的值
(example: sql="select * from table where number = " &input value )不是那么必要。需要划定的字符目录需要被划定(example: sql="select * from table where text ='" &input value &"'")。为了能让日期值和其他区分(example: sql="select * from table where date = #" & input value &"#" ),日期值需要一个定界符。
<%
u_date=request.form("u_date")
u_exp=request.form("u_exp")



 ‘检查看用户是否输入了u日期的值
‘如果是无效值,跳转到查询数据库,只显示输入表单
 if u_date<>"" then
accessdb="stocks" 
cn="DRIVER={Microsoft Access Driver (*.mdb)};"
cn=cn & "DBQ=" & server.mappath(accessdb)
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "select date,close,volume from epos where date "& u_exp& " #" & u_date & "# " 
rs.Open sql, cn
%>
<title>EPOS Daily Stock Info where the trading date is 
<%= server.htmlencode(u_exp) %> <%= u_date %> </title> 
<table border="0" align="center" width="100%">
<tr><td align="center">
EPOS Daily Stock Info where<br> the trading date is 
<%= server.htmlencode(u_exp) %> <%= u_date %> <br> 
<table border="5" cellpadding="3" cellspacing="3" align="center">
<tr><td>
Date
</td> 
<td>
Close
</td> 
<td>
Volume
</td> 
</tr>
<%
rs.movefirst
do while not rs.eof
%>
<tr><td>
<%= rs("date") %>
</td>
<td>
<%= "$ "& formatnumber(rs("close"),2,0) %>
</td>
<td>
<%= formatnumber(rs("volume"),0) %>
</td>
</tr>
<%
rs.movenext
loop
%>
</table>
<% 
end if
%>
<form action="<%= request.servervariables("script_name") %>"
method="post">
<%
if u_date = "" then %>
Please make a selection<br>
<% end if %>
<select name="u_exp" size="1">
<%


 
‘检查看这是否有u.exp值
‘如果有那么就把它当做下拉菜单的选项值来写


i
f u_exp <> "" then %>
<option selected value="<%= u_exp %>"><%= server.htmlencode(u_exp) %></option>
<% end if %>
<option value="=">=</option>
<option value=">">></option>
<option value="<"><</option>
<option value=">=">>=</option>
<option value="<="><=</option>
<option value="<>"><></option>
</select>
 
<select name="u_date" size="1">
<% 




‘检查看看这是否有u_date值
‘如果有那么就把它当做下拉菜单的选项值来写
 通过日期值显示数据库就像显示你的所有数据子集一样容易。当你在比较你的sql和数据库的数量目录时,这对于划定被通过的值
(example: sql="select * from table where number = " &input value )不是那么必要。需要划定的字符目录需要被划定(example: sql="select * from table where text ='" &input value &"'")。为了能让日期值和其他区分(example: sql="select * from table where date = #" & input value &"#" ),日期值需要一个定界符。
<%
u_date=request.form("u_date")
u_exp=request.form("u_exp")


 ‘检查看用户是否输入了u日期的值
‘如果是无效值,跳转到查询数据库,只显示输入表单
if u_date<>"" then
accessdb="stocks" 
cn="DRIVER={Microsoft Access Driver (*.mdb)};"
cn=cn & "DBQ=" & server.mappath(accessdb)
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "select date,close,volume from epos where date "& u_exp& " #" & u_date & "# " 
rs.Open sql, cn
%>
<title>EPOS Daily Stock Info where the trading date is 
<%= server.htmlencode(u_exp) %> <%= u_date %> </title> 
<table border="0" align="center" width="100%">
<tr><td align="center">
EPOS Daily Stock Info where<br> the trading date is 
<%= server.htmlencode(u_exp) %> <%= u_date %> <br> 
<table border="5" cellpadding="3" cellspacing="3" align="center">
<tr><td>
Date
</td> 
<td>
Close
</td> 
<td>
Volume
</td> 
</tr>
<%
rs.movefirst
do while not rs.eof
%>
<tr><td>
<%= rs("date") %>
</td>
<td>
<%= "$ "& formatnumber(rs("close"),2,0) %>
</td>
<td>
<%= formatnumber(rs("volume"),0) %>
</td>
</tr>
<%
rs.movenext
loop
%>
</table>
<% 
end if
%>
<form action="<%= request.servervariables("script_name") %>"
method="post">
<%
if u_date = "" then %>
Please make a selection<br>
<% end if %>
<select name="u_exp" size="1">
<% 


‘检查看这是否有u.exp值
‘如果有那么就把它当做下拉菜单的选项值来写


if u_exp <> "" then %>
<option selected value="<%= u_exp %>"><%= server.htmlencode(u_exp) %></option>
<% end if %>
<option value="=">=</option>
<option value=">">></option>
<option value="<"><</option>
<option value=">=">>=</option>
<option value="<="><=</option>
<option value="<>"><></option>
</select>
 
<select name="u_date" size="1">
<% 


‘检查看看这是否有u_date值
‘如果有那么就把它当做下拉菜单的选项值来写
if u_date <> "" then %>
<option selected value="<%= u_date %>"><%= u_date %></option>
<% end if %>
<option value="10/19/1999">10/19/1999</option>
<option value="10/26/1999">10/26/1999</option>
<option value="11/03/1999">11/03/1999</option>
<option value="11/10/1999">11/10/1999</option>
<option value="11/17/1999">11/17/1999</option>
<option value="11/24/1999">11/24/1999</option>
<option value="12/01/1999">12/01/1999</option>
<option value="12/08/1999">12/08/1999</option>
<option value="12/15/1999">12/15/1999</option>
<option value="12/22/1999">11/22/1999</option>
<option value="12/29/1999">11/29/1999</option>
<option value="01/05/2000">01/05/2000</option>
<option value="01/12/2000">01/12/2000</option>
<option value="01/19/2000">01/19/2000</option>
</select>
<input type="submit" value="Submit">
</form>
</td></tr></table>

简单生活,希望对大家有用!要觉得本文有价值请分享给您的朋友,生活就是人来人往,分享越多!收获越多!作者:天天ASP家园
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值