VBSCRIPT REPLACE 未从解密字段中删除空格

Question

真是让人头疼....

我正在使用 VBScript 函数 REPLACE 将 MSSQL DB 中解密字段中的空格替换为“/”。

但是 REPLACE 函数并没有“看到”空格。

例如，如果我运行以下任何一项，其中“ITF_U_ClientName_Denc”字段的解密值为“Johnny Carson”：

REPLACE(ITF_U_Ledger.Fields("ITF_U_ClientName_Denc")," ","/")
REPLACE(ITF_U_Ledger.Fields("ITF_U_ClientName_Denc")," ","/")
REPLACE(ITF_U_Ledger.Fields("ITF_U_ClientName_Denc"),"Chr(160)","/")
REPLACE(CSTR(ITF_U_Ledger.Fields("ITF_U_ClientName_Denc"))," ","/")
REPLACE(ITF_U_Ledger.Fields("ITF_U_ClientName_Denc")," ","/",1,-1,1)
REPLACE(ITF_U_Ledger.Fields("ITF_U_ClientName_Denc")," ","/",1,-1,0)

返回值为“Johnny Carson”（空格不替换为/）

问题似乎只与空格有关，因为当我运行它时： REPLACE(ITF_U_Ledger.Fields("ITF_U_ClientName_Denc"),"a","/")

我得到“Johnny C/rson”。

此外，问题似乎完全在于解密值中的空格，因为当我运行这个时：

REPLACE("Johnny Carson"," ","/")

当然，返回值是“Johnny/Carson”。

我已经检查了正在写入页面源的内容，它只是“Johnny Carson”，没有编码或特殊字符。

我也尝试了 SPLIT 函数来查看它是否会“看到”空间，但它没有。

最后，感谢有用的评论，我尝试使用 VBS REGEX 搜索 \s。

Set regExp = New RegExp
regExp.IgnoreCase = True
regExp.Global = True
regExp.Pattern = "\s" 'Add here every character you don't consider as special character
strProcessed = regExp.Replace(ITF_U_Ledger.Fields("ITF_U_ClientName_Denc"), "?")

很遗憾，strProcessed 会返回“Johnny Carson”（即未检测到/删除空格）。

如果我替换 regExp.Pattern = "a"，strProcessed 将返回 "Johnny C?rson"。

非常感谢您的帮助！！

Answer 1

我们发现，正确的字符代码是 160，这就成功了：

replace(..., ChrW(160), "...")

这似乎是特定于数据的，此外，作为替代方案，您可以尝试获取源脚本的相同编码（即使用 Save As with Encoding 保存），或将接收到的数据库值转换为不同的目标编码。