split被报毒！什么情况？

Question

写个程序，360老是报毒，经过反复定位，定位到下面这句，去掉则不报毒
SendFilePath2 = Split(SendFilePath, "#and#")这是什么道理哦？这完全就是一个对字符处理的语句，为何报毒？

Answer 1

应该是你SendFilePath里面的内容引起的，你试试把这个字符串内容设置为空看看，肯定不报错。
360真弱智，上次被杀，反复研究最后发现是它看到了microsoft字母，然后改成mlcrosoft就不报错了。

Answer 2

"#and#"估计是个某个病毒特征串？换个字符串试试

Answer 3

3楼和4楼朋友的建议我都试过了，依然报毒，不得行。
我甚至试过把变量名改变，还是要报毒。
SendFilePath2 = Split(SendFilePath, "#and#")  这句代码多特殊的，又找不到替代函数可使用，纠结啊。在此对360表示强烈谴责！

Answer 4

http://topic.csdn.net/u/20111213/10/2d21879a-e397-49a2-a3ff-9ae7ea345250.html?63380
看看这个也许有用。

Answer 5

就非得装360才不叫裸奔？ -> 就非得装=要装 -> 要装360才不叫裸奔？   我说的裸奔是不装任何杀毒软件。

Answer 6

我以为那个split内容是楼主问题的，结果发现id不一致，该不会是马甲吧。这里也顺便贴上挣分。
'此代码由“正则测试工具 v1.1.35”自动生成，请直接调用TestReg过程
'此代码由“正则测试工具  v1.1.35”自动生成，请直接调用TestReg过程
Private Sub TestReg()
    Dim strData As String
    Dim reg As Object
    Dim matchs As Object, match As Object    strData = "a-bcd-4324-f23"    Set reg = CreateObject("vbscript.regExp")
    reg.Global = True
    reg.IgnoreCase = False
    reg.MultiLine = True
    reg.Pattern = "(.+?)(?:-|\b)"
    Set matchs = reg.Execute(strData)
    For Each match In matchs
        'Debug.Print match.Value
        Debug.Print match.SubMatches(0)
    Next
End Sub

Answer 7

          Dim SendFilePath2(20) As String
          Dim iPath As Byte
          Dim iiPath As Byte
          Dim iiiPath As Byte
          iiPath = 1
          iiiPath = 0
          For iPath = 0 To Len(SendFilePath)
              If Mid(SendFilePath, iPath, 5) = "#and#" Then
                 SendFilePath2(iiiPath) = Mid(SendFilePath, iiPath, iPath - iiPath)
                 iiPath = iPath + 5
                 iiiPath = iiiPath + 1
              End If
          Next
没那么麻烦，我用另外的办法解决了。

Answer 8

我写下载文件,也被报毒..
还是mcafee

Answer 9

 我不知道LZ怎么会和360叫上劲，我也装360，但是下面代码运行很正常Private Sub Command1_Click()
    Dim SendFilePath2() As String
    Dim SendFilePath As String
    
    SendFilePath = "1#and#2#and#3#and#4#and#5"
    SendFilePath2 = Split(SendFilePath, "#and#")    Dim i As Long
    For i = 0 To UBound(SendFilePath2)
        Debug.Print SendFilePath2(i)
    Next
End Sub

Answer 10

痛恨360，现在这句不报毒了，但另外的地方又开始报毒，我已经修改过至少5次了，但都治标不治本。
我感觉360先是查看整个程序内是否有危险代码，如果有，则随机选择另外一处代码为特征码。
现在的关键就是要知道360到底是从哪句代码判断出程序是危险程序。
我另外开了一贴：
http://topic.csdn.net/u/20111215/09/6dc3a40f-db69-48a1-92fb-54c98906a1b5.html