|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
使用filesystemobject,可以对服务器上的文件进行操作,浏览、复制、移动、删除等。有ado的支持,asp对数据库的操作非常得心应手。你甚至可以像使用本地数据库那样,管理远程主机上的数据库,对表格、记录进行各种操作。这是一个摹拟股票滚屏的看板程序,程序将10个股票的代价和张跌幅信息以每次5组的体例显现,轮回瓜代,分歧以往滚屏尾部留有空缺的情形。因为代码复杂,这里就不合错误其多加正文了。
<html>
<head>
<!--sunboy008@sina.com.cn-->
<scriptLANGUAGE="VBScript">
<!--
dimj,arry1(10),arry2(10),arry3(10),arry4(10)
分离界说转动子段的数组
arry1(0)="数码科技"
arry1(1)="太子收集"
arry1(2)="小邦会社"
arry1(3)="正年夜团体"
arry1(4)="聚友收集"
arry1(5)="全向科技"
arry1(6)="清华紫光"
arry1(7)="同创科技"
arry1(8)="中关村"
arry1(9)="TCL电子"
arry2(0)="12.56"
arry2(1)="56.50"
arry2(2)="5.54"
arry2(3)="23.11"
arry2(4)="16.70"
arry2(5)="14.00"
arry2(6)="9.20"
arry2(7)="12.30"
arry2(8)="87.56"
arry2(9)="12.30"
arry3(0)="12.10"
arry3(1)="55.70"
arry3(2)="5.36"
arry3(3)="22.80"
arry3(4)="16.50"
arry3(5)="13.60"
arry3(6)="9.20"
arry3(7)="12.89"
arry3(8)="88.00"
arry3(9)="12.56"
arry4(0)="6.2%"
arry4(1)="-5%"
arry4(2)="1.2%"
arry4(3)="8%"
arry4(4)="-5.6%"
arry4(5)="3%"
arry4(6)="-3%"
arry4(7)="4%"
arry4(8)="-2.2%"
arry4(9)="-6.3%"
转动程序
Subtoplay()
j=j+1
fori=0to4
a(i).innerhtml=show1(j-1+i)
b(i).innerhtml=show2(j-1+i)
c(i).innerhtml=show3(j-1+i)
d(i).innerhtml=show4(j-1+i)
next
ifj>9thenj=0
settimeout"toplay",2000
endsub
functionshow1(num)
ifnum=>10then
show1=arry1(num-10)
else
show1=arry1(num)
endif
endfunction
functionshow2(num)
ifnum=>10then
show2=arry2(num-10)
else
show2=arry2(num)
endif
endfunction
functionshow3(num)
ifnum=>10then
show3=arry3(num-10)
else
show3=arry3(num)
endif
endfunction
functionshow4(num)
ifnum=>10then
show4=arry4(num-10)
else
show4=arry4(num)
endif
endfunction
-->
</script>
<style>
<!--
td{font-size:9pt}
-->
</style>
</head>
<body>
<tableborder="0"cellpadding="5"cellspacing="1">
<tr>
<tdbgcolor="#FFCC66">证券称号</td>
<tdbgcolor="#FFCC66">成交</td>
<tdbgcolor="#FFCC66">收盘</td>
<tdbgcolor="#FFCC66">涨跌</td>
</tr>
<%
fori=0to4
dimbg
bg="F0EDE6"
ifimod2=0thenbg="D2E0F0"
%>
<tr>
<tdid="a"bgcolor=<%=bg%>align="right"></td>
<tdid="b"bgcolor=<%=bg%>align="right"></td>
<tdid="c"bgcolor=<%=bg%>align="right"></td>
<tdid="d"bgcolor=<%=bg%>align="right"></td>
</tr>
<%next%>
</table>
</body>
</html>
注:你能够变动个中的每组显现股票的行数,这里设置的是5个。
ActiveServerPage技术为应用开发商提供了基于脚本的直观、快速、高效的应用开发手段,极大地提高了开发的效果。在讨论ASP的安全性问题之前,让我们来看看ASP是怎么工作的。 |
|