vbscript 过滤 特殊字符

最近遇到一个特别棘手的问题,从数据库中读出一条记录赋值给一个变量,但当该变量 & 其他字符串的时候,输出的结果只是原来的字符串:

<%

       Dim Str1, Str2, Str3

       Dim Num1, Num2

       Str1 = objRs.Fields("abc").Value '从数据库中读出记录,假设为"123"

       Str2 = "abcdef"                  '这个地方可以是任意字符串

        Str3=Str1&Str2

       Response.Write(Str3&"--"&Len(Str1)&"--"&Len(Str2)&"--"&Len(Str3))

       Response.End()

%>

上面的结果是:123—-4—-4--10

总是感觉Str1的最后一个就像c语言中的‘\0’,后面虽然能连接上其他字符串,但输出的时候到这一位就停止了。但是如果用Right函数截取最后一个,输出时,既不是空格也没有什么其他东西

通过网上搜索,知道char(0)……char(31)都是特殊字符……

来点狠的,写了一个循环,将32个特殊字符都给替换掉,这样问题就解决了事实证明,Str1中最后一位是char(0)

你可能感兴趣的:(VBScript)