Case和If哪个更好用？
来源：asp之家 发布时间：2009-10-28 18:25:00
标签：case,if,asp
见下：
<％
FOR i = 1 TO 1000
n = i
Response.Write AddSuffix(n) & "<br>"
NEXT
％>
<％
Function AddSuffix(num)
numpart = RIGHT(num,1)
SELECT CASE numpart
CASE "1"
IF InStr(num,"11") THEN
num = num & "th"
ELSE
num = num & "st"
END IF
CASE "2"
IF InStr(num,"12") THEN
num = num & "th"
ELSE
num = num & "nd"
END IF
CASE "3"
IF InStr(num,"13") THEN
num = num & "th"
ELSE
num = num & "rd"
END IF
CASE "4"
num = num & "th"
CASE ELSE
num = num & "th"
END SELECT
AddSuffix = num
END FUNCTION
％>
0
投稿猜你喜欢
- 总的来说，提高应用程序性能的最好的方法是发现应用的瓶径之所在，和数据库进行交互的性能无疑是决定应用程序性能的重要环节之一。因为ADO是当前最
可能是我“火星”了，不过在 空虚 的 Blog 中学到的一招。这个技巧的原理是利用 iframe 载入本机各盘符的根目录，然后判断 ifra- 假设有一个表，结构如下：mysql> CREATE TABLE `a` ( `id
- 此前piscdong已经做过一次评测了,这次的Beta正式推出,我也来参与一下.当回小白鼠吧.新的界面设计非常让人兴奋750){this.r
- 原理：自定义javascript中的oncontextmenu事件，然后使用div层模拟菜单。知道了这个原理结合美工相信你可以做出很漂亮的自
- XML即可扩展标记语言（eXtensible Markup Language）。标记是指计算机所能理解的信息符号，通过此种标记，计算机之间可
- 相关代码如下： 1. 创建sequence： 代码如下:CREATE SEQUENCE SEQU_DATA_DATAINFO IN
- 数据库操作类在网上一搜一大把，我这并不比那些好，只是是自己写的，用着更习惯。所以我这个类没有什么特别的地方，只是自己用着习惯罢了，至于效率等
- 代码如下:Class Vector Private vector_datas() Private&n
- 一、介绍这篇文档旨在介绍如何安装配置基于2台服务器的MySQL集群。并且实现任意一台服务器出现问题或宕机时MySQL依然能够继续运行。虽然这
- 以前看过有人转换过的，当时仅仅惊叹了一下，就过去了，没有记下来，直至于用到的时候呢，开始到处找，找来找去都没有找不到痕迹了，心里也就郁郁寡欢
- ASP中的全角和半角转化函数，使用方法，传入要转换的字符给str即可，flag设置要转换的类型。<％ Function&n
- <％'***********************************************'函数
- 在asp编程中，我们常常使用trim(rtrim ,ltrim)函数去掉一些数据的开头和结尾的空格，笔者最近写了一个asp聊天室，看到下面的
- Web2.0时代，体验式营销，体验式网站设计开始走向主流，那么体验式网站到底意味着什么？具体表现在那些地方？周末，根据建站的一点经验和观察，
- 原作者：Jonathan 翻译：charlee原文：http://f6design.com/journal/2006/10/21/the-v
- 本来在网上有不少关于这方面的文章，可是我找了好久也没看到把（可能我的搜索水平有线把）不过倒是聊天室的很多。如何统计会员再线状态，希望对刚开始
- folder.htm<html><head><title>闪亮日子之在线创建文件夹</title&
- 一、前言：在经过一段时间的存储过程开发之后，写下了一些开发时候的小结和经验与大家共享，希望对大家有益，主要是针对Sybase和SQL Ser
- 代码如下:<％ sql="select * from serr where
