快速业务通道

用vbs将名称截断以使其最多包含 16 个字符的代码

作者 佚名 来源 ASP编程 浏览 发布时间 2013-07-09
问:
您好,脚本专家!如何将名称截断以使其最多包含16个字符?
--BN
答:
您好,BN。打起精神来:我们又要开始记忆长廊之旅了。曾经有个脚本专家上大学的时候,他在绿巨人公司找了一份暑期临时工,任务就是在办公室里监督华盛顿东部的芦笋收割。当时,绿巨人有一个陈旧笨重的计算机系统,用来记录芦笋的数量-然后再记录要付给所有收割者多少钱。这个系统有一个问题,但是(事实上,它的问题不只一个,不过…):它被设置为姓氏最多可使用10个字符,而许多工人的姓都比10个字符要长(例如,Myer-Ackerman)。每次数据输入人员输入一个比10个字符长的名称时,整个系统都会锁死,因此他们的工作站常常必须重新启动。(这都是在出现MicrosoftWindows之前的事了。)
这个脚本专家那时根本谈不上是脚本专家;事实上,他使用计算机的经验主要局限于在Commodore64上玩Zork。可是现在,作为办公室里唯一的大学生,他被委任以修复此数据输入程序的重任(幸运的是,数据库本身没有这种限制)。他的工作就是在程序试图将名称保存到数据库之前,确保截断所有多于10个字符的名称。
换句话说,这与您需要完成的任务非常相似。那时我们的脚本专家工作在BASIC的某个专有分支领域,他的解决方案就是使用Left函数获取某个名称的前10个字母,并以此来作为此工人的姓。现在,差不多20年之后,想想您的问题的解决方案是什么?
复制代码 代码如下:

strName="ABCDEFGHIJKLMNOPQRSTUVWXYZ"
strName=Left(strName,16)
Wscript.EchostrName

经典的解决方案从来不会过时,是吧?这个脚本从我们20年前停手的地方开始:它将一个很长的字符串(本例中为字母表)赋值给名为strName的变量:
strName="ABCDEFGHIJKLMNOPQRSTUVWXYZ"
接下来是下面这行代码:
strName=Left(strName,16)
这行代码将一个新值赋给变量strName。那么这个新值是什么呢?它将是strName当前值的前16个字符。这就是Left函数的作用:它从此字符串的第一个字符开始计数,一直数到16个字符,就像这样:
ABCDEFGHIJKLMNOPQRSTUVWXYZ
这16个字符,且仅这16个字符,将赋给变量strName。然后,回显strName的新值,我们会得到如下字符串:
ABCDEFGHIJKLMNOP
很酷吧。此脚本很有效,即使strName是从2600个字符的26个字符开始效果也一样:结果都是仅使用前16个字符。啊,但是如果字符串少于16个字符会怎么样?例如,此脚本会失败吗,因为它试图获取16个字符,而根本没有16个字符?
strName="ABCD"
strName=Left(strName,16)
Wscript.EchostrName
幸运的是答案是否定的:此脚本会顺利运行。如果某字符串少于16个字符,则Left函数只获取它所能找到的所有字符,并将此值赋值给strName。在本例中,strName等于ABCD,此字符串中仅有的4个字符。
现在,再缅怀一下过去的美好时光。我们告诉过您当这个脚本专家正坐在他的绿巨人办公室里时,一条响尾蛇爬进来吗?这是真的。他正坐在那儿,努力思考将姓限制为10个字符的方法,正在这时--天哪;今天的时间到了。我们必须改天再继续讲这个故事了。

凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务,公司网站:http://www.lingzhong.cn 为了给广大客户了解更多的技术信息,本技术文章收集来源于网络,凌众科技尊重文章作者的版权,如果有涉及你的版权有必要删除你的文章,请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!

分享到: 更多

Copyright ©1999-2011 厦门凌众科技有限公司 厦门优通互联科技开发有限公司 All rights reserved

地址(ADD):厦门软件园二期望海路63号701E(东南融通旁) 邮编(ZIP):361008

电话:0592-5908028 传真:0592-5908039 咨询信箱:web@lingzhong.cn 咨询OICQ:173723134

《中华人民共和国增值电信业务经营许可证》闽B2-20100024  ICP备案:闽ICP备05037997号