Question

asp中，删除多余空格的函数是什么

比如我文本框传入了一个字符串
aaa="asdf asdf"
中间有6个空格
我想只保留一个
最好是ASP函数
字符串是从用户提交那里获取的
所以第一：人家不一定传过来几个空格
用Replace可以过滤定额的空格转化为一个
可不一定是几个空格啊
trim是去掉两边的空格～对中间的不起作用的要是有这么简单我早用了

注意！我是要把中间的保留一个空格

Answer 1

aaa=replace(aaa," "," ")

第一个双引号内是两个空格，第二个是一个空格。

用trim是不可以去掉中间的空格的。
但用replace可以。之所以第一个引号内是2个空格，第二个是一个空格。是因为replace有叠代的功能。他会每遇到2个空格就用一个空格代替。

如你原来有10个空格，第一次结果变5个，第二次变3个，第三次变2个，第四次就1个。由于是叠代进行。所以一个replace,就能完成所有次数。即无论是你3个空格还是30000个空格，最终都会变成1个。

Answer 2

百宝袋 十级啊,高人呢.
replace还有这功能啊,长见识了.
不过这种问题最好用正则来解决了.
======================

Function RegExpTest(strng)
Dim regEx ' 建立变量。
Set regEx = New RegExp ' 建立正则表达式。
regEx.Pattern = " +" ' 设置模式。
regEx.IgnoreCase = True ' 设置是否区分字符大小写。
regEx.Global = True ' 设置全局可用性。
regexptest = regEx.Replace(strng," ")
End Function
MsgBox (regexptest("dfrg refrfe eee"))
======================================
以上代码自己测试过.
正则很有用的,特别是在vb中,vb处理字符串的能力不怎么强大,但有了正则,嘿嘿,和javascript能力相仿了.

Answer 3

trim（字符串）是把所有的空格都去掉了．应该用replace函数，用一个空格来替换那六个空格

声明：trim函数是去掉字符串首尾空格的，并不是去掉字符串中的空格的，请注意，别弄错了。

Answer 4

for i = 1 to len(aaa)
aaa=replace(aaa," "," ") 'aaa,后面这个双引是双空格,后面这个双引是单空格，这样就会一直替换下去，直到中间只有一个空格
next

Answer 5

trim（字符串）是把所有的空格都去掉了．应该用replace函数，用一个空格来替换那六个空格