- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 碰到一个乱码的问题( 跟复制黏贴有关系) (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=130475)
-- 发布时间：2019/1/23 9:15:00
-- 碰到一个乱码的问题( 跟复制黏贴有关系)
现在实行新旧系统对接,将老系统的数据全部导入到我现在写的系统内.发现了一个变态的问题,我这边输入的电话号码,再次输入就会报警已经录入.
但是从老系统导入的数据里面的有一部分相同电话号码居然不报警
此主题相关图片如下：微信图片_20190123091337.png
我们做了去除空格等等的处理,但是无效.
昨日我们又发现了两个电话号码有这个情况,所以试着将老系统的电话号码拷贝出来,黏贴到WORD上面去,居然发现里面带着一个乱码.
此主题相关图片如下：微信图片_20190123091337.png这个不知道如何来清除了,不知道大家有没有发现过这个问题.
图片中上面一个是黏贴的,下面的是正确的,我这边输入的.
我们了解了一下老系统的录入,他们很多电话都是从其他的软件拷贝下来黏贴进去的.不知道如何处理.
[此贴子已经被作者于2019/1/23 9:20:39编辑过]
-- 发布时间：2019/1/23 9:44:00
--
正则处理，把非数值的字符删除。
Dim str As String = chr(11) & "123abc你我他"
msgbox(str)
str = System.Text.RegularExpressions.Regex.replace(str, "[^0-9]", "")
msgbox(str)
-- 发布时间：2019/1/23 9:45:00
--
或者，你可以直接读取字符的编码，如
Dim str = ClipBoard.GetText
For Each s As String In str
output.show(s & " " & asc(s))
Next
-- 发布时间：2019/1/23 9:49:00
--
老大,现在不是我这边复制黏贴的问题,应该上面的正则有用.我过会试试
-- 发布时间：2019/1/23 9:53:00
--
以下是引用blackzhu在2019/1/23 9:49:00的发言：
老大,现在不是我这边复制黏贴的问题,应该上面的正则有用.我过会试试
老大,现在不是我这边复制黏贴的问题,应该上面的正则有用.我过会试试
你复制有错的数据，然后再在命令窗口测试，看特殊编码是什么。