如何实现优惠打折？
时间：2010-06-03 10:27:00
如何实现优惠打折？
代码及说明见下：
<％@ LANGUAGE = "VBScript"
ENABLESESSIONSTATE = False ％>
<％
percent_discount = "10"
' 打折的百分比（％），如 2, 5, 10, 20
If Len(percent_discount) > 1 Then pd = "."&percent_discount&"" Else pd = ".0"&percent_discount&""
％>
<html>
<body>
<％
normal_cost = "50"
discounted_cost = normal_cost - (normal_cost * pd)
％>
Normal Cost: <％=FormatCurrency(normal_cost)％><br>
Discounted Cost: <％=FormatCurrency(discounted_cost)％>
</body>
</html>
标签：打折,asp,分数
0
投稿猜你喜欢
JMail（4.3版本）发信asp代码
2007-08-03 12:40:00
asp如何制作一个防止多次刷新计数的图片计数器？
2010-06-29 21:28:00
FSO中的SubFolders 属性介绍
2008-01-05 13:57:00
数字人组件反写[asp组件开发实例2]
2009-06-09 13:15:00
理解JavaScript中的事件 Event
2008-03-19 11:16:00
使用 TRUNCATE TABLE 删除所有行
2008-04-24 19:20:00
CSS:浮动清理另类方法
2008-11-17 11:45:00
JavaScript中的64位加密及解密
2009-12-23 19:10:00
asp IsValidEmail 验证邮箱地址函数(email)
2011-03-03 10:42:00
IE7 与 IE6 的模式窗口尺寸差异
2008-03-06 13:49:00
ASP实现网站智能分词搜索
2007-10-18 13:50:00
通过session在ASP中改善动态分页的性能
2007-09-11 14:00:00
getElementsByAttribute
2009-10-27 12:13:00
如何用ASP获知机器的网络配置？
2010-06-11 19:58:00
为SWFUpload增加ASP版本的上传处理程序
2011-04-28 08:01:00
Pivot，信息组织的梦想之窗
2009-12-25 14:32:00
细品Dreamweaver MX 内建FW技术
2008-06-04 09:41:00
on error goto (Vbscript)和try catch
2008-08-04 13:22:00
几个ASP字符串处理函数
2008-04-23 12:55:00
VS 2010 Ultimate架构代码探索
2010-05-02 20:38:00
