|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
由于ASP还是一种Script语言所没除了大量使用组件外,没有办法提高其工作效率。它必须面对即时编绎的时间考验,同时我们还不知其背后的组件会是一个什么样的状况;<scriptlanguage="vbscript"src="infoshow.vbs"></script>
<scriptlanguage="vbscript"src="friendshow.vbs"></script>
用来挪用这两个.vbs文件,
<tablewidth="100%"border="0"cellspacing="0"cellpadding="2"><tr>
<tdheight="25"align="center"valign="bottom"id="info"></td>
</tr></table>
<tablewidth="100%"border="0"cellspacing="1"cellpadding="2"class=bdall><tr>
<tdheight="15"align="center"id="friend"></td>
</tr></table>
+++++++friendshow.vbs++++++++++++++++++++++++++++++++++++
显现友谊毗连
arf=0
diminff(4)
inff(0)="<ahref=http://www.chinausbiz.comtarget=_blank>纽约中美商务网</a>|"&_
"<ahref=../ad/luck.asptarget=_blank>保定乐凯光学电子无限公司</a>|"&_
"<ahref=http://www.chinamet.com/target=_blank>中国电机商业网</a>|"&_
"<ahref=http://www.ccct.org.cn/target=_blank>中国纺织品收支口商会</a>"
inff(1)="<ahref=http://www.icecf.com/target=_blank>中国出口商品买卖会</a>|"&_
"<ahref=http://www.chinaim-export.com/cn/target=_blank>中华收支口在线</a>|"&_
"<ahref=http://www.cn.bizipoint.com/gb/index.php3target=_blank>中国电子商会</a>|"&_
"<ahref=http://www.chinafiw.com/e_m/site/mysystem154.asptarget=_blank>中外洋资网</a>|"&_
"<ahref=http://www.cctvcr.com.cntarget=_blank>央视国际</a>|"&_
"<ahref=http://www.mc-ccpit.comtarget=_blank>中国冶金商业会</a>"
inff(2)="<ahref=http://www.base56.com.cntarget=_blank>中国物流基地同盟网</a>|"&_
"<ahref=http://www.clii.comtarget=_blank>中国轻产业团结会</a>|"&_
"<ahref=http://www.china-retailers.com/xr/dahui/target=_blank>2003中国乡村贸易服务业对外开放与使用外资年夜会</a>"
inff(3)="<href=http://www.chinabidding.com/pub/other/consultcenter/index.jsptarget=_blank>中国国际投标网推销征询站点</a>|"&_
"<ahref=http://www.bjtzhwjmw.gov.cntarget=_blank>北京市通州区对外经济商业委员会</a>|"&_
"<ahref=http://www.soufun.comtarget=_blank>房地产流派-搜房网</a>"
inff(4)="<ahref=http://www.agriffchina.com/target=_blank>中国食物土畜收支口商会</a>|"&_
"<ahref=http://www.chinaip.nettarget=_blank>中国投资项目网</a>|"&_
"<ahref=http://www.oil.hc360.comtarget=_blank>hc360慧聪网石油</a>"
functionfriend_show()
friend.innerhtml=inff(arf)
arf=arf+1
ifarf>ubound(inff)thenarf=0
settimeout"friend_show()",5000
endfunction
friend_show
+++++++infoshow.vbs+++++++++++++++++++++++++++++++++++++++++
显现逐日提醒
op=0
flag=0
ar=0
diminf(3)
inf(0)="<fontcolor=#FF0000>服务热线:020-67665548</font>"
inf(1)="<fontcolor=#0099FF>您的存眷就是我们的动力。</font>"
inf(2)="<fontcolor=#FF9900>接待到场手机商业网会员服务。</font>"
inf(3)=""
functioninfo_show()
ifop=0then
info.innerhtml=inf(ar)
ar=ar+1
ifar>ubound(inf)thenar=0
endif
info.style.filter="alpha(opacity="&op&")"
ifflag=0thenop=op+20
ifop>=300thenflag=100
ifflag=100thenop=op-20
ifop<=0thenflag=0
settimeout"info_show()",200
endfunction
info_show
</p>Access是一种桌面数据库,只适合数据量少的应用,在处理少量数据和单机访问的数据库时是很好的,效率也很高。但是它的同时访问客户端不能多于4个。access数据库有一定的极限,如果数据达到100M左右,很容易造成服务器iis假死,或者消耗掉服务器的内存导致服务器崩溃。 |
|