|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
写软件都是想的时间比写的时间要长的.如果反过来了就得看看是什么原因了.另外大家可以回去问问公司里的小MM.(一般企业里,跟你们交付软件接触得最多的是她们)演示地点:
http://61.172.255.65/dvbbs/t3/t17.asp
<%
dimtotal(7,2)
total(1,1)=200
total(2,1)=800
total(3,1)=1000
total(4,1)=600
total(5,1)=1222
total(6,1)=3213
total(7,1)=8
total(1,2)="中国谋划报"
total(2,2)="雇用网"
total(3,2)="51Job"
total(4,2)="新平易近晚报"
total(5,2)="旧事晚报"
total(6,2)="北方周末"
total(7,2)="羊城晚报"
total_no=7
%>
<htmlxmlns:v="urn:schemas-microsoft-com:vml"xmlns:o="urn:schemas-microsoft-com:office:office">
<!--[if!mso]>
<style>
v:*{behavior:url(#default#VML)}
o:*{behavior:url(#default#VML)}
.shape{behavior:url(#default#VML)}
</style>
<![endif]-->
<head>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<title></title>
<style>
TD{FONT-SIZE:9pt}
</style></head>
<bodytopmargin=5leftmargin=0scroll=AUTO>
<%calltable1(total,200,20,20,30,400,200,"A")%>
<%calltable1(total,200,320,20,20,400,250,"B")%>
</body>
</html>
<%
functiontable1(total,table_x,table_y,thickness,table_width,all_width,all_height,table_type)
参数寄义(传送的数组,横坐标,纵坐标,柱子的厚度,柱子的宽度,图表的宽度,图表的高度,图表的范例)
纯ASP代码天生图表函数1――柱状图
龚叫(Passwordgm)QQ:25968152MSN:passwordgm@sina.comEmail:passwordgm@sina.com
自己十分乐意和ASP,VML,Flash的喜好者在HTTP://topclouds.126.com举行交换和切磋
版本2.0最初修正日期2003-7-22
十分感激您利用这个函数,请您利用和转载时保存版权信息,这是对作者事情的最好的尊敬。
dimtb_color(7,2)
tb_color(1,1)="#d1ffd1"
tb_color(2,1)="#ffbbbb"
tb_color(3,1)="#ffe3bb"
tb_color(4,1)="#cff4f3"
tb_color(5,1)="#d9d9e5"
tb_color(6,1)="#ffc7ab"
tb_color(7,1)="#ecffb7"
tb_color(1,2)="#00ff00"
tb_color(2,2)="#ff0000"
tb_color(3,2)="#ff9900"
tb_color(4,2)="#33cccc"
tb_color(5,2)="#666699"
tb_color(6,2)="#993300"
tb_color(7,2)="#99cc00"
line_color="#69f"
left_width=70
length=thickness/2
total_no=ubound(total,1)
temp1=0
fori=1tototal_no
iftemp1<total(i,1)thentemp1=total(i,1)
next
temp1=int(temp1)
iftemp1>9then
temp2=mid(cstr(temp1),2,1)
iftemp2>4then
temp3=(int(temp1/(10^(len(cstr(temp1))-1)))+1)*10^(len(cstr(temp1))-1)
else
temp3=(int(temp1/(10^(len(cstr(temp1))-1)))+0.5)*10^(len(cstr(temp1))-1)
endif
else
iftemp1>4thentemp3=10elsetemp3=5
endif
temp4=temp3
response.write"<!--[ifgtevml1]><v:rectid=_x0000_s1027alt=style=position:absolute;left:"&table_x+left_width&"px;top:"&table_y&"px;width:"&all_width&"px;height:"&all_height&"px;z-index:-1fillcolor=#9cfstroked=f><v:fillrotate=tangle=-45focus=100%type=gradient/></v:rect><![endif]-->"
response.write"<!--[ifgtevml1]><v:lineid=_x0000_s1027alt=style=position:absolute;left:0;text-align:left;top:0;flip:y;z-index:-1from="&table_x+left_width&"px,"&table_y+all_height&"pxto="&table_x+all_width+left_width&"px,"&table_y+all_height&"px/><![endif]-->"
response.write"<!--[ifgtevml1]><v:lineid=_x0000_s1027alt=style=position:absolute;left:0;text-align:left;top:0;flip:y;z-index:-1from="&table_x+left_width&"px,"&table_y&"pxto="&table_x+left_width&"px,"&table_y+all_height&"px/><![endif]-->"
selectcasetable_type
case"A"
table_space=(all_width-table_width*total_no)/total_no
response.write"<!--[ifgtevml1]><v:lineid=_x0000_s1027alt=style=position:absolute;left:0;text-align:left;top:0;flip:y;z-index:-1from="&table_x+left_width+length&"px,"&table_y&"pxto="&table_x+left_width+length&"px,"&table_y+all_height-length&"pxstrokecolor="&line_color&"/><![endif]-->"
fori=0toall_height-1stepall_height/5
response.write"<!--[ifgtevml1]><v:lineid=_x0000_s1027alt=style=</p>asp,jsp,php是web开发的三大技术,asp简单易用且有microsoft做靠山,jsp功能强大是因为有java支持,php则开源跨平台.在国内,asp应用范围最广,jsp发展势头最猛,php则处于劣势.这可能与公司的支持以及技术的培训有关. |
|