关于正则表达式替换多个空格的问题

Question

例如：
正文内容为：
str是从表单中取得的用户输入str="        是非功过是非功过是         (注：这前面有八个空格)非功过是非功过    (注：这前面有八个空格)是非功过是非功过是非功过是非功过"

Answer 1

try..<script>
function check()
{
    var s = "I           love        you                  .              .";
    var re = /([ ]{4,})/g;
    var r = s.replace(re,"    ");
    alert(r);
}
check();
</script>

Answer 2

<script language="VBScript">
Dim s,re,r
s = "I           love        you                  .              ."
Set re = New RegExp
re.Pattern ="[ ]{4,}"
re.Global = True
r = re.Replace(s,"    ")
alert(r)
</script>

Answer 3

JavaScript:<script>
function check(s)
{
    //var s = "I           love        you                  .              .";
    var re = /([ ]{4,})/g;
    var r = s.replace(re,"    ");
    alert(r);
}
</script>
<input type=text style="width:500px" name=bao>
<input type=button onclick="check(document.all.bao.value)">
VBScript:<script language="VBScript">
Function vbsCheck(s)
Dim re,r
Set re = New RegExp
re.Pattern ="[ ]{4,}"
re.Global = True
r = re.Replace(s,"    ")
alert(r)
End Function
</script>
<input type=text style="width:500px" name=bao>
<input type=button onclick="vbsCheck(document.all.bao.value)">