财务图表
来源:互联网 发布:网络歌手招聘 编辑:程序博客网 时间:2024/04/30 08:22
利用一些简单的html,来自可以生成的没有第三个元素需求的数据库有效图表的输出。这个数据库的例子包含每周的高度,以周结束的日期(weekof))和分开的股票信息。图像文件的高度(blue.jpg)被调整到以周结束的高度(high),图像的高度被设置成以周结束的日期(weekof)和值(high)。
<%
accessdb="stocks"
cn="DRIVER={Microsoft Access Driver (*.mdb)};"
cn=cn & "DBQ=" & server.mappath(accessdb)
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "select * from yahoo order by weekof asc "
rs.Open sql, cn
%>
<div align="center">
<table cellspacing="0" cellpadding="0">
<tr>
<%
On Error Resume Next
rs.MoveFirst
'设置成和第一周高度相同的高低范围
low = rs("high")
high=rs("high")
do while Not rs.eof
%>
<td width="5" align="left" valign="bottom">
<img src="images/blue.jpg" width="5" height="<%= rs("high") %>"
alt="Week of <%= rs("weekof") %>, High was $<%= formatnumber(rs("high"),2) %>"></td>
<%
'如果当前的周更低,那就把第一个或者更低的周放到低的地方
if low > rs("high") then
low = rs("high")
end if
'如果当前的周更高,那就把第一个或者更高的周放到高的地方
if high < rs("high") then
high = rs("high")
end if
'什么是最近的周
last_week=rs("weekof")
'计算出被用老生成动态图表的元件数
count_cells=count_cells+1
'如果有一个划分,把它添加了用来分开
if rs("split") <> "" then
splits= splits & "<br>" & rs("split") & "-" & rs("weekof")
end if
rs.MoveNext
loop
%>
<table cellspacing="0" cellpadding="0"><tr>
<td align="center" valign="top" width="<%= count_cells*5 %>">
<% rs.Movefirst %>
<br>
Yahoo Weekly Highs from <%= rs("weekof")%> to <%= last_week %>
<br>Low for this range : $<%= formatnumber(low,2) %>
<br>High for this range : $<%= formatnumber(high,2) %>
<br> <%= splits %>
</td></tr></table>
<%
accessdb="stocks"
cn="DRIVER={Microsoft Access Driver (*.mdb)};"
cn=cn & "DBQ=" & server.mappath(accessdb)
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "select * from yahoo order by weekof asc "
rs.Open sql, cn
%>
<div align="center">
<table cellspacing="0" cellpadding="0">
<tr>
<%
On Error Resume Next
rs.MoveFirst
'设置成和第一周高度相同的高低范围
low = rs("high")
high=rs("high")
do while Not rs.eof
%>
<td width="5" align="left" valign="bottom">
<img src="images/blue.jpg" width="5" height="<%= rs("high") %>"
alt="Week of <%= rs("weekof") %>, High was $<%= formatnumber(rs("high"),2) %>"></td>
<%
'如果当前的周更低,那就把第一个或者更低的周放到低的地方
if low > rs("high") then
low = rs("high")
end if
'如果当前的周更高,那就把第一个或者更高的周放到高的地方
if high < rs("high") then
high = rs("high")
end if
'什么是最近的周
last_week=rs("weekof")
'计算出被用老生成动态图表的元件数
count_cells=count_cells+1
'如果有一个划分,把它添加了用来分开
if rs("split") <> "" then
splits= splits & "<br>" & rs("split") & "-" & rs("weekof")
end if
rs.MoveNext
loop
%>
<table cellspacing="0" cellpadding="0"><tr>
<td align="center" valign="top" width="<%= count_cells*5 %>">
<% rs.Movefirst %>
<br>
Yahoo Weekly Highs from <%= rs("weekof")%> to <%= last_week %>
<br>Low for this range : $<%= formatnumber(low,2) %>
<br>High for this range : $<%= formatnumber(high,2) %>
<br> <%= splits %>
</td></tr></table>
</div>
简单生活,希望对大家有用!要觉得本文有价值请分享给您的朋友,生活就是人来人往,分享越多!收获越多!作者:天天ASP家园
0 0
- 财务图表
- 财务
- 图表
- 财务章程
- 标准财务
- 财务分析
- 财务基本概念
- 财务概念
- 财务基本概念
- 财务流程
- 财务记账
- 财务自由
- 财务规划
- 财务公司
- 财务基础知识
- 财务常识
- 财务知识
- 财务特点
- 2015年伊朗国际石油、天然气展览会
- 第75届美国芝加哥食品科技-IFT展
- 文件下载方法和细节
- Linux crontab 命令格式与详细例子
- 2015年美国第56届Chem-show 国际化工展
- 财务图表
- 2015年英国(阿布丁)欧洲国际石油、天然气展览会
- AIX详细查看用户/进程使用内存
- UML 学习笔记
- 三层实例--添加信息
- c语言循环结构
- 2015年日本INCHEM国际化工展
- Reverse Linked List II leetcode
- 2015巴西OTC(里约)国际石油展