|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
ActiveServerPage技术为应用开发商提供了基于脚本的直观、快速、高效的应用开发手段,极大地提高了开发的效果。在讨论ASP的安全性问题之前,让我们来看看ASP是怎么工作的。<%
Dimsl_gauge
Setsl_gauge=newSlgauge
sl_gauge.BgColor="#FFFFFF"
sl_gauge.FgColor="#990000"
sl_gauge.Width=78
sl_gauge.Height=5
sl_gauge.MinVal=0
sl_gauge.MaxVal=100
sl_gauge.CurVal=iTestScore87%inourexample
%>
<!--Displaythegauge-->
<tablecellpadding=0cellspacing=2>
<tr>
<td>0</td>
<td><%=sl_gauge.RenderHtml%></td>
<td>100%</td>
</tr>
</table>
<%
Handyclassfordisplayingahorizontalpercentagegauge.
%>
<%
classSlgauge
Colors.
publicBgColor
publicFgColor
Dimensions.
publicWidth
publicHeight
Values.
publicMinVal
publicMaxVal
publicCurVal
RenderthisintoHTMLasatable.
functionRenderHtml
Normalizetheproperties.
ifMinVal>MaxValthen
Dimtemp_val
temp_val=MinVal
MinVal=MaxVal
MaxVal=temp_val
endif
ifCurVal<MinValthen
CurVal=MinVal
elseifCurVal>MaxValthen
CurVal=MaxVal
endif
FigureoutthepercentagethattheCurValis
withinMinValandMaxVal.
Dimpercentage_val
percentage_val=(CurVal-MinVal)/(MaxVal-MinVal)
Computethefirstandsecondwidths.
Dimfg_width
fg_width=Round(Width*percentage_val)
Dimbg_width
bg_width=Width-fg_width
RenderHtml="<tablecellspacing=0cellpadding=0width="&_
Width&"height="&Height&">"_
&"<tr>"
iffg_width>0then
RenderHtml=RenderHtml_
&"<tdwidth="&fg_width&"height="&_
Height&"bgcolor="&FgColor&_
"><imgsrc=/demos/Images/"&_
"1_pix_trans.gif></td>"
endif
ifbg_width>0then
RenderHtml=RenderHtml_
&"<tdwidth="&bg_width&"height="&_
Height&"bgcolor=&quo</p>ASP最大的缺点在于网络的安全性和可靠性,企业将经营数据放在开放的平台上,最大的担忧就是如何保证这些数据不被其他人破坏。 |
|