热门标签：中国办理电信400电话河北智能外呼系统软件伊春外呼业务系统福建外呼增值业务线路绵阳防封电销卡价格电销机器人源码网盘下载调度系统外呼电销机器人教育宜宾语音外呼系统软件'================================================ '函数名：ReplaceTrim '作 用：过滤掉字符中所有的tab和回车和换行 '================================================ Public Function ReplaceTrim(ByVal strContent) On Error Resume Next Dim re Set re = New RegExp re.IgnoreCase = True re.Global = True re.Pattern = "(" Chr(8) "|" Chr(9) "|" Chr(10) "|" Chr(13) ")" strContent = re.Replace(strContent, vbNullString) Set re = Nothing ReplaceTrim = strContent Exit Function End Function
