以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  [求助]查找SQL语句中最后一个where，并将where后面的语句替换为1=2  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=100734)

--  作者：狐作非为 --  发布时间：2017/5/17 15:29:00 --  [求助]查找SQL语句中最后一个where，并将where后面的语句替换为1=2 查找SQL语句（此语句在某字段内容中）中最后一个where，并将where后面的语句替换为1=2,请问应该怎么写

--  作者：有点色 --  发布时间：2017/5/17 15:36:00 --   Dim str As String = "1111 where 2222 where 333 where 444 where 1112223344" Dim idx As Integer = str.LastIndexOf("where") If idx >= 0 Then     Dim s1 As String = str.SubString(0, idx)     s1 = s1 & " where 1=2"     msgbox(s1) End If

--  作者：狐作非为 --  发布时间：2017/5/17 15:50:00 --   谢谢