ASP中的全角和半角之间的转化
来源：asp之家 发布时间：2008-06-06 13:34:00
标签：全角,半角,换行,函数,asp
ASP中的全角和半角转化函数，使用方法，传入要转换的字符给str即可，flag设置要转换的类型。
<％
Function DBC2SBC(Str, flag)
rem 全角半角转换函数
rem flag=-1时进行半角转全角
rem flag=0时进行半角全角互转
rem flag=1时进行全角转半角
Dim i, sStr
If Len(Str)<= 0 Then Exit Function
DBC2SBC = ""
For i = 1 To Len(Str)
sStr = Asc(Mid(Str, i, 1))
Select Case flag
Case -1
If sStr>0 And sStr<= 125 Then
DBC2SBC = DBC2SBC & Chr(Asc(Mid(Str, i, 1)) -23680)
Else
DBC2SBC = DBC2SBC & Mid(Str, i, 1)
End If
Case 0
If sStr>0 And sStr<= 125 Then
DBC2SBC = DBC2SBC & Chr(Asc(Mid(Str, i, 1)) -23680)
Else
DBC2SBC = DBC2SBC & Chr(Asc(Mid(Str, i, 1)) + 23680)
End If
Case 1
If sStr<0 Or sStr>125 Then
DBC2SBC = DBC2SBC & Chr(Asc(Mid(Str, i, 1)) + 23680)
Else
DBC2SBC = DBC2SBC & Mid(Str, i, 1)
End If
End Select
Next
End Function
％>
测试代码：
key="关键词：asp之家 www.aspxhome.com"
response.write "<b>"&key&"</b>"
response.write "<br>半角转全角： "&DBC2SBC(key,-1)
response.write "<br>半角全角互转： "&DBC2SBC(key,0)
response.write "<br>全角转半角： "&DBC2SBC(key,1)
输入：
0
投稿猜你喜欢
喜欢Gucci的优雅吗？或者痴迷美国普普艺术？谷歌中国最近改版的谷歌个性化首页iGoogle集中了近1500个主题，包括近120多位全球顶级- 原则：1. 我们测试的是产品可用性，不是使用者的个人能力2. 尽量不要打断用户的操作3. &
- Expires 属性 Expires 属性指定了在浏览器上缓冲存储的页距过期还有多少时间。如果用户在某个页过期之前又回到此页，就会显示缓冲区
- HTTP头中一般断点下载时才用到Range和Content-Range实体头，Range用户请求头中，指定第一个字节的位置和最后一个字节的位
- 2010新的架构工具可以让我们了解应用程序和功能设计，并帮助验证设计和执行不偏离。它除了支持一般系统分析设计流程(需求→实体)外，也支持另一
- 问题：如果一个网站拥有两个域名：domain1.com和domain2.com。在网站运营前期，主推domain1.com，但发展到中期，由
- 阅读上一篇：微软建议的ASP性能优化28条守则(2) 技巧 5：不要将数据库连接缓存在 Application 或 Session 对象中
- Div+CSS+JS组和能够实现很多好看的特殊的效果，这里推荐一款可刷新的下拉菜单：下面是js代码部分：<script type=te
- 在本文中我们将展示一种新的使用仿CSS选择器的语法来快速开发HTML和CSS的方法。它由Sergey Chikuyonok开发。你在写HTM
- 为什么要使用php缓存技术？理由很简单：提高效率。在程序开发中，获取信息的方式主要是查询数据库，除此以外，也可能是通过Web Service
- 简介 函数式编程语言在学术领域已经存在相当长一段时间了，但是从历史上看，它们没有丰富的工具和库可供使用。随着 .NET 平台上的
- 为什么我把自己机子上的数据库备份文件往另一台机子上还原不成功？可能是你在Restore的对话框中选项不正确。Restore 有三个选项，分别
- 很多时候关心的是优化SELECT 查询，因为它们是最常用的查询，而且确定怎样优化它们并不总是直截了当。相对来说，将数据装入数据库是直截了当的
- 主键表的主键（primary key，主关键字）是表中的一个或多个字段，它的值用于惟一地标识表中的某一条记录。一个表不能有多个主关键字，并且
- 1、IIS为一个死循的执行过程设定执行时间（缺省为90秒）超时事件：<％response.buffer=true％><BO
- 一旦被黑客获取到webshell，黑客就知道了你的sqlserver管理员密码，如果sqlserver再没有经过安全设置那么黑客很容易就提权
- 因为外贸网站,禁止同行抄袭，所以防止中国ip访问访问,访问的时候有密码提示,这样的代码如何写.请给一个提示.或者有好的代码,请分享下。 &n
- ..:: 巧用CSS制作艺术字 ::..如果灵活应用CSS各种滤镜的特点并加以组合，我们可以得到许多意想不到的效果。这是一些效果示范，供各位
- ASP实现语音分时问候,其实asp实现这个功能很容易，时间判断一下，在某个时间段就调用某个的背景语音。下面是源代码：
- HTML5，被传为Flash 的杀手，是一种用于web 应用程序开发、具有变革意义的网络技术。HTML 5提供了一些新的元素和属性，其中有些
